Changeset 14704
- Timestamp:
- 04/22/13 18:00:54 (12 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/objects/Elements/Tria.cpp
r14701 r14704 237 237 Ke=CreateKMatrixDiagnosticMacAyeal(); 238 238 break; 239 case AdjointHorizAnalysisEnum:240 Ke=CreateKMatrixAdjointMacAyeal();241 break;242 239 case DiagnosticHutterAnalysisEnum: 243 240 Ke=CreateKMatrixDiagnosticHutter(); … … 263 260 case AdjointBalancethicknessAnalysisEnum: 264 261 Ke=CreateKMatrixAdjointBalancethickness(); 262 break; 263 case AdjointHorizAnalysisEnum: 264 Ke=CreateKMatrixAdjointMacAyeal(); 265 265 break; 266 266 #endif -
issm/trunk-jpl/src/c/classes/objects/Loads/Pengrid.cpp
r13925 r14704 266 266 267 267 switch(analysis_type){ 268 #ifdef _HAVE_ DIAGNOSTIC_268 #ifdef _HAVE_THERMAL_ 269 269 case ThermalAnalysisEnum: 270 270 pe=PenaltyCreatePVectorThermal(kmax); 271 271 break; 272 #endif273 #ifdef _HAVE_THERMAL_274 272 case MeltingAnalysisEnum: 275 273 pe=PenaltyCreatePVectorMelting(kmax); -
issm/trunk-jpl/src/c/modules/ConstraintsStatex/ConstraintsStatex.cpp
r13622 r14704 28 28 /*Do we have penalties linked to rifts? In this case, run our special rifts penalty 29 29 * management routine, otherwise, skip : */ 30 31 /*No constraints management by default!:*/ 32 num_unstable_constraints=0; 33 converged=1; 34 35 #ifdef _HAVE_RIFTS_ 30 36 if (RiftIsPresent(loads,analysis_type)){ 31 37 RiftConstraintsState(&converged,&num_unstable_constraints,loads,min_mechanical_constraints,analysis_type); 32 38 } 39 #endif 33 40 #ifdef _HAVE_THERMAL_ 34 elseif(ThermalIsPresent(loads,analysis_type)){41 if(ThermalIsPresent(loads,analysis_type)){ 35 42 ThermalConstraintsState(loads,&converged,&num_unstable_constraints,analysis_type); 36 43 } 37 44 #endif 38 else{39 /*Do nothing, no constraints management!:*/40 num_unstable_constraints=0;41 converged=1;42 }43 45 44 46 /*Assign output pointers: */ -
issm/trunk-jpl/src/c/modules/ModelProcessorx/DiagnosticHoriz/CreateLoadsDiagnosticHoriz.cpp
r13803 r14704 154 154 155 155 /*Create Riffront loads for rifts: */ 156 #ifdef _HAVE_RIFTS_ 156 157 if(numrifts){ 157 158 iomodel->FetchData(&riftinfo,&numriftsegments,NULL,RiftsRiftstructEnum); … … 166 167 xDelete<IssmDouble>(riftinfo); 167 168 } 169 #endif 168 170 169 171 /*Assign output pointer: */
Note:
See TracChangeset
for help on using the changeset viewer.