source:
issm/oecreview/Archive/21337-21723/ISSM-21718-21719.diff@
21726
Last change on this file since 21726 was 21726, checked in by , 8 years ago | |
---|---|
File size: 3.5 KB |
-
../trunk-jpl/src/c/cores/depthaverage_core.cpp
13 13 14 14 /*Intermediaries*/ 15 15 int domaintype,elementtype; 16 int inputenum,input_average_enum; 16 17 17 18 if(VerboseSolution()) _printf0_("depth averaging solution...\n"); 18 19 19 20 /*Get parameters*/ 20 21 femmodel->parameters->FindParam(&domaintype,DomainTypeEnum); 21 22 femmodel->parameters->FindParam(&elementtype,MeshElementtypeEnum); 23 femmodel->parameters->FindParam(&inputenum,InputToDepthaverageInEnum); 24 femmodel->parameters->FindParam(&input_average_enum,InputToDepthaverageOutEnum); 22 25 23 /*If this is a 2D horizontal domain, return (no need to extrude)*/ 24 if(domaintype==Domain2DhorizontalEnum) return; 26 /*If this is a 2D horizontal domain: no need to do anything, just copy input*/ 27 if(domaintype==Domain2DhorizontalEnum){ 28 InputDuplicatex(femmodel,inputenum,input_average_enum); 29 return; 30 } 25 31 26 32 /*Special method for Penta, otherwise call solution sequence*/ 27 33 if(elementtype==PentaEnum){ 28 int inputenum,input_average_enum;29 femmodel->parameters->FindParam(&inputenum,InputToDepthaverageInEnum);30 femmodel->parameters->FindParam(&input_average_enum,InputToDepthaverageOutEnum);31 34 InputDepthAverageAtBasex(femmodel,inputenum,input_average_enum); 32 35 } 33 36 else{ -
../trunk-jpl/src/c/analyses/MasstransportAnalysis.cpp
266 266 element->FindParam(&dt,TimesteppingTimeStepEnum); 267 267 element->FindParam(&domaintype,DomainTypeEnum); 268 268 element->FindParam(&stabilization,MasstransportStabilizationEnum); 269 Input* vxaverage_input= NULL;269 Input* vxaverage_input=element->GetInput(VxAverageEnum); _assert_(vxaverage_input); 270 270 Input* vyaverage_input=NULL; 271 if(domaintype==Domain2DhorizontalEnum){ 272 vxaverage_input=element->GetInput(VxEnum); _assert_(vxaverage_input); 273 vyaverage_input=element->GetInput(VyEnum); _assert_(vyaverage_input); 274 } 275 else{ 276 if(dim==1){ 277 vxaverage_input=element->GetInput(VxAverageEnum); _assert_(vxaverage_input); 278 } 279 if(dim==2){ 280 vxaverage_input=element->GetInput(VxAverageEnum); _assert_(vxaverage_input); 281 vyaverage_input=element->GetInput(VyAverageEnum); _assert_(vyaverage_input); 282 } 271 if(dim==2) vyaverage_input=element->GetInput(VyAverageEnum); _assert_(vyaverage_input); 283 272 284 }285 273 h = element->CharacteristicLength(); 286 274 287 275 /* Start looping on the number of gaussian points: */ … … 405 393 element->GetVerticesCoordinates(&xyz_list); 406 394 element->FindParam(&dt,TimesteppingTimeStepEnum); 407 395 element->FindParam(&domaintype,DomainTypeEnum); 408 Input* vxaverage_input=NULL; 409 Input* vyaverage_input=NULL; 410 if(domaintype==Domain2DhorizontalEnum){ 411 vxaverage_input=element->GetInput(VxEnum); _assert_(vxaverage_input); 412 vyaverage_input=element->GetInput(VyEnum); _assert_(vyaverage_input); 413 } 414 else{ 415 vxaverage_input=element->GetInput(VxAverageEnum); _assert_(vxaverage_input); 416 vyaverage_input=element->GetInput(VyAverageEnum); _assert_(vyaverage_input); 417 } 396 Input* vxaverage_input=element->GetInput(VxAverageEnum); _assert_(vxaverage_input); 397 Input* vyaverage_input=element->GetInput(VyAverageEnum); _assert_(vyaverage_input); 418 398 419 399 /* Start looping on the number of gaussian points: */ 420 400 Gauss* gauss=element->NewGauss(2);
Note:
See TracBrowser
for help on using the repository browser.