Changeset 14810
- Timestamp:
- 04/30/13 12:23:10 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/objects/Elements/Tria.cpp
r14807 r14810 3083 3083 3084 3084 /*thickness averages: */ 3085 IssmDouble current_he=NULL;3086 3085 IssmDouble* hes=NULL; 3087 3086 IssmDouble* times=NULL; … … 3106 3105 IssmDouble rho_ice; 3107 3106 3107 /*constants: */ 3108 IssmDouble yts; 3109 3108 3110 /*output: */ 3109 3111 IssmDouble wi; … … 3115 3117 /*how many dofs are we working with here? */ 3116 3118 this->parameters->FindParam(&gsize,MeshNumberofverticesEnum); 3119 this->parameters->FindParam(&yts,ConstantsYtsEnum); 3117 3120 3118 3121 /*recover gia solution parameters: */ … … 3134 3137 thickness_input=inputs->GetInput(ThicknessEnum); 3135 3138 if (!thickness_input)_error_("thickness input needed to compute gia deflection!"); 3136 thickness_input->GetInputAllTimeAverages(&hes,×,&numtimes); 3137 thickness_input->GetInputAverage(¤t_he); 3138 3139 thickness_input->GetInputUpToCurrentTimeAverages(&hes,×,&numtimes,currenttime); 3140 3139 3141 /*recover lithosphere thickness: */ 3140 3142 lithosphere_thickness_input=inputs->GetInput(GiaLithosphereThicknessEnum); … … 3155 3157 /*start loading GiaDeflectionCore arguments: */ 3156 3158 arguments.re=re; 3157 arguments.current_he=current_he;3158 3159 arguments.hes=hes; 3159 3160 arguments.times=times; … … 3170 3171 arguments.irate=output_rates; 3171 3172 arguments.iedge=cross_section_shape; 3173 arguments.yts=yts; 3172 3174 3173 3175 for(i=0;i<gsize;i++){
Note:
See TracChangeset
for help on using the changeset viewer.