Changeset 18726
- Timestamp:
- 11/03/14 15:19:49 (10 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/FemModel.cpp
r18721 r18726 1914 1914 if(VerboseSolution()) _printf0_(" Number of active nodes L2 Projection: "<< counter <<"\n"); 1915 1915 1916 /*+++++++this is done in the solution sequence+++++++++++++++*/ 1916 1917 /*Update dof indexings*/ 1917 this->UpdateConstraintsx(); 1918 } 1919 /*}}}*/ 1918 // this->UpdateConstraintsx(); 1919 /*++++++++++++++++++++++++++*/ 1920 } 1921 /*}}}*/ -
issm/trunk-jpl/src/c/solutionsequences/solutionsequence_hydro_nonlinear.cpp
r18725 r18726 94 94 ResetConstraintsx(femmodel); 95 95 96 /* {{{*//*Treating the sediment*/96 /*{{{*//*Treating the sediment*/ 97 97 for(;;){ 98 98 sedconverged=false; 99 99 uf_sed_sub_iter=uf_sed->Duplicate();_assert_(uf_sed_sub_iter); 100 100 uf_sed->Copy(uf_sed_sub_iter); 101 /* {{{*//*Loop on the sediment layer to deal with the penalization*/101 /*{{{*//*Loop on the sediment layer to deal with the penalization*/ 102 102 for(;;){ 103 /* {{{ *//*Core of the computation*/103 /*{{{*/ /*Core of the computation*/ 104 104 if(VerboseSolution()) _printf0_("Building Sediment Matrix...\n"); 105 105 SystemMatricesx(&Kff,&Kfs,&pf,&df,&sediment_kmax,femmodel); … … 113 113 InputUpdateFromSolutionx(femmodel,ug_sed); 114 114 ConstraintsStatex(&constraints_converged,&num_unstable_constraints,femmodel); 115 /* }}}*/115 /*}}}*/ 116 116 if (!sedconverged){ 117 117 if(VerboseConvergence()) _printf0_(" # Sediment unstable constraints = " << num_unstable_constraints << "\n"); … … 126 126 } 127 127 128 /* }}}*//*End of the sediment penalization loop*/128 /*}}}*//*End of the sediment penalization loop*/ 129 129 /*Update EPL mask*/ 130 if(isefficientlayer){ 131 inefanalysis->ElementizeEplMask(femmodel); 132 } 130 131 /*++++++This is probably useless+++++++*/ 132 /* if(isefficientlayer){ */ 133 /* inefanalysis->ElementizeEplMask(femmodel); */ 134 /* } */ 135 /*+++++++++++++*/ 136 133 137 sedconverged=false; 134 138 … … 156 160 } 157 161 } 158 /* }}}*//*End of the global sediment loop*/159 /* {{{*//*Now dealing with the EPL in the same way*/162 /*}}}*//*End of the global sediment loop*/ 163 /*{{{*//*Now dealing with the EPL in the same way*/ 160 164 if(isefficientlayer){ 161 165 femmodel->SetCurrentConfiguration(HydrologyDCEfficientAnalysisEnum); 162 166 /*updating mask*/ 163 167 femmodel->HydrologyEPLupdateDomainx(); 168 inefanalysis->ElementizeEplMask(femmodel); 164 169 InputUpdateFromConstantx(femmodel,true,ResetPenaltiesEnum); 165 170 InputUpdateFromConstantx(femmodel,false,ConvergedEnum); … … 170 175 ug_epl_sub_iter=ug_epl->Duplicate();_assert_(ug_epl_sub_iter); 171 176 ug_epl->Copy(ug_epl_sub_iter); 172 /* {{{*//*Retrieve the EPL head slopes and compute EPL Thickness*/177 /*{{{*//*Retrieve the EPL head slopes and compute EPL Thickness*/ 173 178 if(VerboseSolution()) _printf0_("computing EPL Head slope...\n"); 174 inefanalysis->ElementizeEplMask(femmodel);179 // inefanalysis->ElementizeEplMask(femmodel); 175 180 femmodel->SetCurrentConfiguration(L2ProjectionEPLAnalysisEnum); 176 181 femmodel->UpdateConstraintsL2ProjectionEPLx(); … … 180 185 femmodel->parameters->SetParam(EplHeadSlopeYEnum,InputToL2ProjectEnum); 181 186 solutionsequence_linear(femmodel); 187 182 188 femmodel->SetCurrentConfiguration(HydrologyDCEfficientAnalysisEnum); 183 184 189 effanalysis->ComputeEPLThickness(femmodel); 185 186 190 //updating mask after the computation of the epl thickness (Allow to close too thin EPL) 187 191 femmodel->HydrologyEPLupdateDomainx(); 188 192 inefanalysis->ElementizeEplMask(femmodel); 189 /* }}}*/193 /*}}}*/ 190 194 191 195 if(VerboseSolution()) _printf0_("Building EPL Matrix...\n"); … … 229 233 } 230 234 } 231 /* }}}*/ /*End of the global EPL loop*/232 233 /* {{{*/ /*Now dealing with the convergence of the whole system*/235 /*}}}*/ /*End of the global EPL loop*/ 236 237 /*{{{*/ /*Now dealing with the convergence of the whole system*/ 234 238 if(!hydroconverged){ 235 239 //compute norm(du)/norm(u) … … 271 275 if(hydroconverged)break; 272 276 } 273 /* }}}*/277 /*}}}*/ 274 278 if(isefficientlayer)InputUpdateFromSolutionx(femmodel,ug_epl); 275 279 femmodel->SetCurrentConfiguration(HydrologyDCInefficientAnalysisEnum);
Note:
See TracChangeset
for help on using the changeset viewer.