Changeset 16913 for issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
- Timestamp:
- 11/24/13 11:01:18 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
r16912 r16913 990 990 } 991 991 /*}}}*/ 992 /*FUNCTION Penta::GetMaterialParameter{{{*/993 IssmDouble Penta::GetMaterialParameter(int enum_in){994 995 _assert_(this->matpar);996 switch(enum_in){ // FIXME: change this to material997 case MaterialsRheologyNEnum:998 return this->material->GetN();999 case MaterialsRheologyBEnum:1000 return this->material->GetB();1001 default:1002 return this->matpar->GetMaterialParameter(enum_in);1003 }1004 }1005 /*}}}*/1006 992 /*FUNCTION Penta::GetGroundedPart{{{*/ 1007 993 void Penta::GetGroundedPart(int* point1,IssmDouble* fraction1,IssmDouble* fraction2, bool* mainlyfloating){ … … 2342 2328 } 2343 2329 else return false; 2344 }2345 /*}}}*/2346 /*FUNCTION Penta::IsFloating{{{*/2347 bool Penta::IsFloating(){2348 2349 bool shelf;2350 int migration_style;2351 parameters->FindParam(&migration_style,GroundinglineMigrationEnum);2352 2353 if(migration_style==SubelementMigrationEnum || migration_style==SubelementMigration2Enum){ //Floating if all nodes are floating2354 if(this->inputs->Max(MaskGroundediceLevelsetEnum) <= 0.) shelf=true;2355 else shelf=false;2356 }2357 else if(migration_style==NoneEnum || migration_style==AgressiveMigrationEnum || migration_style==SoftMigrationEnum){ //Floating if all nodes are floating2358 if(this->inputs->Min(MaskGroundediceLevelsetEnum) > 0.) shelf=false;2359 else shelf=true;2360 }2361 else _error_("migration_style not implemented yet");2362 2363 return shelf;2364 2330 } 2365 2331 /*}}}*/
Note:
See TracChangeset
for help on using the changeset viewer.