Changeset 3598
- Timestamp:
- 04/21/10 17:00:30 (15 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/ModelProcessorx/Balancedthickness2/CreateElementsNodesAndMaterialsBalancedthickness2.cpp
r3588 r3598 135 135 xfree((void**)&iomodel->gridonicesheet); 136 136 xfree((void**)&iomodel->gridoniceshelf); 137 xfree((void**)&iomodel->elements); 137 138 138 139 /*All our datasets are already order by ids. Set presort flag so that later on, when sorting is requested on these -
issm/trunk/src/c/io/ParameterInputsInit.cpp
r3570 r3598 92 92 void ParameterInputs::Init( void* vinput_handle){ 93 93 } 94 #endif //#ifdef _SERIAL -94 #endif //#ifdef _SERIAL_ -
issm/trunk/src/c/parallel/balancedthickness.cpp
r3595 r3598 25 25 Model* model=NULL; 26 26 27 Vec u_g=NULL;28 27 double* u_g_serial=NULL; 29 28 double* melting_g=NULL; … … 67 66 /*Initialize model structure: */ 68 67 MPI_Barrier(MPI_COMM_WORLD); start_init=MPI_Wtime(); 69 model=new Model();70 68 71 69 /*Open handle to data on disk: */ … … 138 136 139 137 /*Free ressources:*/ 138 xfree((void**)&u_g_serial); 139 xfree((void**)&melting_g); 140 xfree((void**)&accumulation_g); 140 141 delete processedresults; 141 142 delete results; -
issm/trunk/src/c/parallel/balancedthickness2.cpp
r3588 r3598 69 69 /*Initialize model structure: */ 70 70 MPI_Barrier(MPI_COMM_WORLD); start_init=MPI_Wtime(); 71 model=new Model();72 71 73 72 /*Open handle to data on disk: */ -
issm/trunk/src/c/parallel/balancedvelocities.cpp
r3567 r3598 64 64 /*Initialize model structure: */ 65 65 MPI_Barrier(MPI_COMM_WORLD); start_init=MPI_Wtime(); 66 model=new Model();67 66 68 67 /*Open handle to data on disk: */ … … 135 134 136 135 /*Free ressources:*/ 136 xfree((void**)&u_g_serial); 137 xfree((void**)&melting_g); 138 xfree((void**)&accumulation_g); 137 139 delete processedresults; 138 140 delete results; -
issm/trunk/src/c/parallel/diagnostic_core.cpp
r3592 r3598 81 81 fem_ds->FindParam(&numberofdofspernode_ds,"numberofdofspernode"); 82 82 83 //for qmu analysis, be sure the velocity input we are starting from is the one in the parameters, otherwise, 84 //we will create sensitivities just because we are starting from different velocities each time (and if tolerance is 85 //not set tight enough): */ 83 //for qmu analysis, be sure the velocity input we are starting from is the one in the parameters: */ 86 84 if(qmu_analysis){ 87 85 model->FindParam(&u_g_initial,NULL,NULL,"u_g",DiagnosticAnalysisEnum,HorizAnalysisEnum);
Note:
See TracChangeset
for help on using the changeset viewer.