Changeset 4055 for issm/trunk/src/c/solutions/bedslope.cpp
- Timestamp:
- 06/18/10 19:24:59 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/solutions/bedslope.cpp
r4030 r4055 37 37 double start_init, finish_init; 38 38 39 int analyses[1]={ BedSlopeComputeAnalysisEnum};40 int solution_type= BedSlopeComputeSolutionEnum;39 int analyses[1]={SlopeAnalysisEnum}; 40 int solution_type=SlopeAnalysisEnum; 41 41 42 42 MODULEBOOT(); … … 67 67 _printf_("create finite element model, using analyses types statically defined above:\n"); 68 68 femmodel=new FemModel(fid,solution_type,analyses,1); 69 70 /*add outputfilename in parameters: */ 71 femmodel->parameters->AddObject(new StringParam(OutputFileNameEnum,outputfilename)); 69 72 70 73 /*get parameters: */ … … 83 86 84 87 _printf_("write results to disk:\n"); 85 OutputResults(femmodel ,outputfilename,DiagnosticAnalysisEnum);88 OutputResults(femmodel->elements, femmodel->loads, femmodel->nodes, femmodel->vertices, femmodel->materials, femmodel->parameters); 86 89 } 87 90 else{ … … 92 95 #ifdef _HAVE_DAKOTA_ 93 96 MPI_Barrier(MPI_COMM_WORLD); start_core=MPI_Wtime( ); 94 Qmux(femmodel, SlopeComputeAnalysisEnum,NoneAnalysisEnum);97 Qmux(femmodel,BedSlopeAnalysisEnum,NoneAnalysisEnum); 95 98 MPI_Barrier(MPI_COMM_WORLD); finish_core=MPI_Wtime( ); 96 99 #else
Note:
See TracChangeset
for help on using the changeset viewer.