- Timestamp:
- 07/10/20 10:50:37 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/analyses/HydrologyDCEfficientAnalysis.cpp
r25251 r25252 224 224 basalelement->NodalFunctions(basis,gauss); 225 225 226 epl_transmitivity = EplTransmitivity(basalelement,gauss,epl_thick_input );227 epl_storing = EplStoring(basalelement,gauss,epl_thick_input );226 epl_transmitivity = EplTransmitivity(basalelement,gauss,epl_thick_input,epl_head_input,base_input); 227 epl_storing = EplStoring(basalelement,gauss,epl_thick_input,epl_head_input,base_input); 228 228 229 229 /*Diffusivity*/ … … 358 358 basalelement ->JacobianDeterminant(&Jdet,xyz_list,gauss); 359 359 basalelement ->NodalFunctions(basis,gauss); 360 epl_storing = EplStoring(basalelement,gauss,epl_thick_input );361 epl_transmitivity = EplTransmitivity(basalelement,gauss,epl_thick_input );360 epl_storing = EplStoring(basalelement,gauss,epl_thick_input,epl_head_input,base_input); 361 epl_transmitivity = EplTransmitivity(basalelement,gauss,epl_thick_input,epl_head_input,base_input); 362 362 363 363 /*Loading term*/ … … 386 386 for(int iv=0;iv<numvertices;iv++){ 387 387 gauss->GaussVertex(iv); 388 epl_transmitivity = EplTransmitivity(basalelement,gauss,epl_thick_input );388 epl_transmitivity = EplTransmitivity(basalelement,gauss,epl_thick_input,epl_head_input,base_input); 389 389 connectivity = IssmDouble(basalelement->VertexConnectivity(iv)); 390 390 residual_input->GetInputValue(&residual,gauss); … … 453 453 454 454 /*Intermediaries*/ 455 IssmDouble HydrologyDCEfficientAnalysis::EplStoring(Element* element,Gauss* gauss, Input2* epl_thick_input ){/*{{{*/455 IssmDouble HydrologyDCEfficientAnalysis::EplStoring(Element* element,Gauss* gauss, Input2* epl_thick_input, Input2* epl_head_input, Input2* base_input){/*{{{*/ 456 456 IssmDouble epl_storing; 457 457 IssmDouble water_sheet,storing; … … 484 484 return storing; 485 485 }/*}}}*/ 486 IssmDouble HydrologyDCEfficientAnalysis::EplTransmitivity(Element* element,Gauss* gauss, Input2* epl_thick_input ){/*{{{*/486 IssmDouble HydrologyDCEfficientAnalysis::EplTransmitivity(Element* element,Gauss* gauss, Input2* epl_thick_input, Input2* epl_head_input, Input2* base_input){/*{{{*/ 487 487 IssmDouble epl_transmitivity; 488 488 IssmDouble water_sheet;
Note:
See TracChangeset
for help on using the changeset viewer.