Changeset 4935
- Timestamp:
- 08/02/10 15:16:44 (15 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 1 deleted
- 10 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/EnumDefinitions/EnumAsString.cpp
r4927 r4935 197 197 case TemperatureEnum : return "Temperature"; 198 198 case TemperatureOldEnum : return "TemperatureOld"; 199 case TemperatureAverageEnum : return "TemperatureAverage";200 199 case ThicknessEnum : return "Thickness"; 201 200 case TypeEnum : return "Type"; -
issm/trunk/src/c/EnumDefinitions/EnumDefinitions.h
r4927 r4935 224 224 TemperatureEnum, 225 225 TemperatureOldEnum, 226 TemperatureAverageEnum,227 226 ThicknessEnum, 228 227 TypeEnum, -
issm/trunk/src/c/EnumDefinitions/StringAsEnum.cpp
r4927 r4935 195 195 else if (strcmp(name,"Temperature")==0) return TemperatureEnum; 196 196 else if (strcmp(name,"TemperatureOld")==0) return TemperatureOldEnum; 197 else if (strcmp(name,"TemperatureAverage")==0) return TemperatureAverageEnum;198 197 else if (strcmp(name,"Thickness")==0) return ThicknessEnum; 199 198 else if (strcmp(name,"Type")==0) return TypeEnum; -
issm/trunk/src/c/Makefile.am
r4927 r4935 554 554 ./modules/InputExtrudex/InputExtrudex.cpp\ 555 555 ./modules/InputExtrudex/InputExtrudex.h\ 556 ./modules/MaterialUpdateFromTemperaturex/MaterialUpdateFromTemperaturex.cpp\557 ./modules/MaterialUpdateFromTemperaturex/MaterialUpdateFromTemperaturex.h\558 556 ./modules/OutputRiftsx/OutputRiftsx.h\ 559 557 ./modules/OutputRiftsx/OutputRiftsx.cpp\ … … 1097 1095 ./modules/InputExtrudex/InputExtrudex.cpp\ 1098 1096 ./modules/InputExtrudex/InputExtrudex.h\ 1099 ./modules/MaterialUpdateFromTemperaturex/MaterialUpdateFromTemperaturex.cpp\1100 ./modules/MaterialUpdateFromTemperaturex/MaterialUpdateFromTemperaturex.h\1101 1097 ./modules/OutputRiftsx/OutputRiftsx.h\ 1102 1098 ./modules/OutputRiftsx/OutputRiftsx.cpp\ -
issm/trunk/src/c/modules/modules.h
r4907 r4935 43 43 #include "./InputUpdateFromVectorx/InputUpdateFromVectorx.h" 44 44 #include "./MassFluxx/MassFluxx.h" 45 #include "./MaterialUpdateFromTemperaturex/MaterialUpdateFromTemperaturex.h"46 45 #include "./MaxAbsVxx/MaxAbsVxx.h" 47 46 #include "./MaxAbsVyx/MaxAbsVyx.h" -
issm/trunk/src/c/objects/Elements/Element.h
r4931 r4935 54 54 virtual void UpdateGeometry(void)=0; 55 55 virtual void InputToResult(int enum_type,int step,double time)=0; 56 virtual void MaterialUpdateFromTemperature(void)=0;57 56 virtual void ProcessResultsUnits(void)=0; 58 57 virtual void MinVel(double* pminvel, bool process_units)=0; -
issm/trunk/src/c/objects/Elements/Penta.cpp
r4931 r4935 1183 1183 double Penta::MassFlux( double* segment){ 1184 1184 ISSMERROR(" not supported yet!"); 1185 }1186 /*}}}*/1187 /*FUNCTION Penta::MaterialUpdateFromTemperature{{{1*/1188 void Penta::MaterialUpdateFromTemperature(void){1189 1190 /*Intermediaries*/1191 double Taverage;1192 double B;1193 1194 /*inputs: */1195 bool collapse;1196 Input *TempInput = NULL;1197 Input *RheologyBInput = NULL;1198 1199 /*retrieve inputs :*/1200 inputs->GetParameterValue(&collapse,CollapseEnum);1201 1202 if (collapse){1203 /*find temperature average*/1204 this->inputs->GetParameterAverage(&Taverage,TemperatureAverageEnum);1205 }1206 else{1207 /*find 3d temperature*/1208 this->inputs->GetParameterAverage(&Taverage,TemperatureEnum);1209 }1210 1211 /*Get B from T using Paterson*/1212 B=Paterson(Taverage);1213 1214 /*Add input to Matice*/1215 this->matice->inputs->AddInput(new DoubleInput(RheologyBEnum,B));1216 1217 1185 } 1218 1186 /*}}}*/ … … 5342 5310 name==VzEnum || 5343 5311 name==TemperatureEnum || 5344 name==TemperatureAverageEnum ||5345 5312 name==RheologyBEnum || 5346 5313 name==RheologyNEnum || -
issm/trunk/src/c/objects/Elements/Penta.h
r4931 r4935 93 93 void InputScale(int enum_type,double scale_factor); 94 94 void InputToResult(int enum_type,int step,double time); 95 void MaterialUpdateFromTemperature(void);96 95 double MassFlux(double* segment); 97 96 void MaxAbsVx(double* pmaxabsvx, bool process_units); -
issm/trunk/src/c/solutions/steadystate_core.cpp
r4880 r4935 35 35 thermal_core(femmodel); 36 36 37 if(verbose)_printf_("%s\n","computing depth average temperature");38 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,TemperatureEnum,TemperatureAverageEnum);39 40 if(verbose)_printf_("%s\n","update B from temperature");41 MaterialUpdateFromTemperaturex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters);42 43 37 if(verbose)_printf_("%s\n","computing new velocity"); 44 38 diagnostic_core(femmodel); -
issm/trunk/src/c/solutions/transient3d_core.cpp
r4873 r4935 47 47 thermal_core_step(femmodel,step,time); 48 48 49 if(verbose)_printf_("%s\n","computing depth average temperature");50 InputDepthAveragex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters,TemperatureEnum,TemperatureAverageEnum);51 52 if(verbose)_printf_("%s\n","update B from temperature");53 MaterialUpdateFromTemperaturex(femmodel->elements,femmodel->nodes, femmodel->vertices,femmodel->loads, femmodel->materials,femmodel->parameters);54 55 49 if(verbose)_printf_("%s\n","computing new velocity"); 56 50 diagnostic_core(femmodel);
Note:
See TracChangeset
for help on using the changeset viewer.