Changeset 1728
- Timestamp:
- 08/17/09 13:49:36 (16 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/EnumDefinitions/EnumDefinitions.cpp
r1726 r1728 90 90 int SpcEnum(void){ return 490; } 91 91 92 /*GEOGRAPHIE/FILL:*/ 93 int WaterEnum(void){ return 601; } 94 int IceEnum(void){ return 602; } 95 int AirEnum(void){ return 603; } 92 /*GEOGRAPHY:*/ 93 int GeographyEnum(void){ return 500; } 94 int WaterEnum(void){ return 501; } 95 int IceSheetEnum(void){ return 502; } 96 int IceShelfEnum(void){ return 502; } 96 97 98 /*FILL:*/ 99 int FillEnum(void){ return 600; } 100 int WaterFillEnum(void){ return 601; } 101 int IceFillEnum(void){ return 602; } 102 int AirFillEnum(void){ return 603; } 97 103 98 104 /*functions on enums: */ -
issm/trunk/src/c/EnumDefinitions/EnumDefinitions.h
r1715 r1728 91 91 int SpcEnum(void); 92 92 93 /*GEOGRAPHY:*/ 94 int GeographyEnum(void); 95 int WaterEnum(void); 96 int IceSheetEnum(void); 97 int IceShelfEnum(void); 93 98 94 /*DIVERSE: */ 99 /*FILL: */ 100 int FillEnum(void); 95 101 int WaterEnum(void); 96 102 int IceEnum(void); -
issm/trunk/src/c/objects/Icefront.cpp
r1717 r1728 366 366 /*Recover material and fill parameters: */ 367 367 matpar=(Matpar*)element->GetMatPar(); 368 if (element->GetShelf())fill=Water Enum();369 else fill=Air Enum();368 if (element->GetShelf())fill=WaterFillEnum(); 369 else fill=AirFillEnum(); 370 370 371 371 //check that the element is onbed (collapsed formulation) otherwise:pe=0 … … 494 494 /*Recover material and fill parameters: */ 495 495 matpar=(Matpar*)element->GetMatPar(); 496 if (element->GetShelf())fill=Water Enum();497 else fill=Air Enum();496 if (element->GetShelf())fill=WaterFillEnum(); 497 else fill=AirFillEnum(); 498 498 499 499 /* Set pe_g to 0: */ … … 657 657 /*Recover material and fill parameters: */ 658 658 matpar=(Matpar*)element->GetMatPar(); 659 if (element->GetShelf())fill=Water Enum();660 else fill=Air Enum();659 if (element->GetShelf())fill=WaterFillEnum(); 660 else fill=AirFillEnum(); 661 661 662 662 /* Set pe_g to 0: */ … … 868 868 bed=b1*(1+segment_gauss_coord[ig])/2+b2*(1-segment_gauss_coord[ig])/2; 869 869 870 if (fill==Water Enum()){870 if (fill==WaterFillEnum()){ 871 871 //icefront ends in water: 872 872 ice_pressure=1.0/2.0*gravity*rho_ice*pow(thickness,2); … … 878 878 water_pressure=1.0/2.0*gravity*rho_water*(pow(surface_under_water,2) - pow(base_under_water,2)); 879 879 } 880 else if (fill==Air Enum()){880 else if (fill==AirFillEnum()){ 881 881 ice_pressure=1.0/2.0*gravity*rho_ice*pow(thickness,2); 882 882 air_pressure=0; … … 1132 1132 1133 1133 //Now deal with water pressure: 1134 if(fill==Water Enum()){ //icefront ends in water1134 if(fill==WaterFillEnum()){ //icefront ends in water 1135 1135 water_level_above_g_tria=min(0,z_g[i]);//0 if the gaussian point is above water level 1136 1136 water_pressure_tria=rho_water*gravity*water_level_above_g_tria; 1137 1137 } 1138 else if(fill==Air Enum()){1138 else if(fill==AirFillEnum()){ 1139 1139 water_pressure_tria=0; 1140 1140 } … … 1381 1381 1382 1382 //Now deal with water pressure: 1383 if(fill==Water Enum()){ //icefront ends in water1383 if(fill==WaterFillEnum()){ //icefront ends in water 1384 1384 water_level_above_g_tria=min(0,z_g[i]);//0 if the gaussian point is above water level 1385 1385 water_pressure_tria=rho_water*gravity*water_level_above_g_tria; 1386 1386 } 1387 else if(fill==Air Enum()){1387 else if(fill==AirFillEnum()){ 1388 1388 water_pressure_tria=0; 1389 1389 }
Note:
See TracChangeset
for help on using the changeset viewer.