Changeset 10310
- Timestamp:
- 10/26/11 09:39:04 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
TabularUnified issm/trunk/src/c/objects/Elements/Tria.cpp ¶
r10298 r10310 281 281 void Tria::AgressiveMigration(void){ 282 282 283 284 double *values = NULL;283 int i; 284 bool elementonshelf = false; 285 285 double h[3],s[3],b[3],ba[3]; 286 286 double bed_hydro; 287 287 double rho_water,rho_ice,density; 288 int i; 289 bool elementonshelf = false; 290 291 /*Recover info at the vertices: */ 292 Input* surface_input =inputs->GetInput(SurfaceEnum); _assert_(surface_input); 293 Input* bed_input =inputs->GetInput(BedEnum); _assert_(bed_input); 294 if((surface_input->ObjectEnum()!=TriaVertexInputEnum) | (bed_input->ObjectEnum()!=TriaVertexInputEnum))_error_(" not supported yet for bed and surface interpolations not P1!"); 288 double *values = NULL; 295 289 296 290 GetInputListOnVertices(&h[0],ThicknessEnum); … … 2194 2188 void Tria::ShelfSync(void){ 2195 2189 2190 int i,swap; 2191 double bed_hydro,gl_melting_rate; 2192 double yts,rho_water,rho_ice,density; 2196 2193 double melting[NUMVERTICES]; 2197 2194 double h[NUMVERTICES],s[NUMVERTICES],b[NUMVERTICES],ba[NUMVERTICES]; 2198 double bed_hydro;2199 double rho_water,rho_ice,density;2200 int i;2201 2195 bool elementonshelf = false; 2202 2203 /*melting rate at the grounding line: */2204 double yts;2205 int swap;2206 double gl_melting_rate;2207 2196 2208 2197 /*recover parameters: */
Note:
See TracChangeset
for help on using the changeset viewer.