source: issm/trunk/src/m/solutions/jpl/prognostic2.m@ 4102

Last change on this file since 4102 was 4102, checked in by seroussi, 15 years ago

changes .m solutions, transient missing

File size: 780 bytes
Line 
1function md=prognostic2(md)
2%PROGNOSITC2 - prognostic2 solution sequence.
3%
4% Usage:
5% md=prognostic2(md)
6
7 %timing
8 t1=clock;
9
10 analysis_types=[Prognostic2AnalysisEnum];
11 solution_type=Prognostic2AnalysisEnum;
12
13 displaystring(md.verbose,'%s',['create finite element model']);
14 femmodel=NewFemModel(md,solution_type,analysis_types);
15
16 %retrieve parameters
17 verbose=femmodel.parameters.Verbose;
18 qmu_analysis=femmodel.parameters.QmuAnalysis;
19
20 %compute solution
21 if ~qmu_analysis,
22 displaystring(verbose,'%s',['call computational core']);
23 prognostic2_core(femmodel);
24 else
25 %launch dakota driver for diagnostic core solution
26 Qmu(femmodel);
27 end
28
29 %stop timing
30 t2=clock;
31 displaystring(md.verbose,'\n%s\n',['solution converged in ' num2str(etime(t2,t1)) ' seconds']);
Note: See TracBrowser for help on using the repository browser.