Changeset 4492
- Timestamp:
- 07/08/10 19:37:01 (15 years ago)
- Location:
- issm/trunk/src/c/objects
- Files:
-
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/objects/Elements/Penta.cpp
r4491 r4492 2044 2044 /*output error if not found*/ 2045 2045 ISSMERROR("Node not found in Penta"); 2046 }2047 /*}}}*/2048 /*FUNCTION Penta::UpdateFromDakota {{{1*/2049 void Penta::UpdateFromDakota(void* vinputs){2050 2051 ISSMERROR("not supported yet!");2052 2053 2046 } 2054 2047 /*}}}*/ -
issm/trunk/src/c/objects/Elements/Penta.h
r4475 r4492 194 194 Tria* SpawnTria(int g0, int g1, int g2); 195 195 void SurfaceNormal(double* surface_normal, double xyz_list[3][3]); 196 void UpdateFromDakota(void* inputs);197 196 void VecExtrude(Vec vector,double* vector_serial,int iscollapsed); 198 197 /*}}}*/ -
issm/trunk/src/c/objects/Elements/Tria.cpp
r4491 r4492 5981 5981 } 5982 5982 /*}}}*/ 5983 /*FUNCTION Tria::UpdateFromDakota {{{1*/5984 void Tria::UpdateFromDakota(void* vinputs){5985 5986 int i;5987 int dofs[1]={0};5988 double temperature_list[3];5989 double temperature_average;5990 double B_list[3];5991 double B_average;5992 double new_h[3];5993 5994 /*Update internal data if inputs holds new values: */5995 /*inputs->Recover("thickness",&this->properties.h[0],1,dofs,3,(void**)nodes);5996 if(inputs->Recover("thickness",&new_h[0],1,dofs,3,(void**)nodes)){5997 //density, needed later:5998 double di=(this->matpar->GetRhoIce()/this->matpar->GetRhoWater());5999 //Go through grids:6000 for (i=0;i<3;i++){6001 if(nodes[i]->IsOnShelf()){6002 this->b[i]=this->b[i]-di*(new_h[i]-h[i]); //hydrostatic equilibrium;6003 }6004 this->s[i]=this->b[i]+new_h[i];6005 this->h[i]=new_h[i];6006 }6007 }*/6008 6009 ISSMERROR("not supported yet!");6010 6011 }6012 /*}}}*/ -
issm/trunk/src/c/objects/Elements/Tria.h
r4475 r4492 171 171 void* SpawnSing(int g0); 172 172 void SurfaceNormal(double* surface_normal, double xyz_list[3][3]); 173 void UpdateFromDakota(void* inputs);174 173 /*}}}*/ 175 174 -
issm/trunk/src/c/objects/Loads/Pengrid.cpp
r4465 r4492 788 788 } 789 789 /*}}}1*/ 790 /*FUNCTION Pengrid::UpdateFromDakota {{{1*/791 void Pengrid::UpdateFromDakota(void* inputs){792 ISSMERROR("not supported yet!");793 }794 /*}}}1*/795 790 /*FUNCTION Pengrid::UpdateInputs {{{1*/ 796 791 void Pengrid::UpdateInputs(double* solution){ -
issm/trunk/src/c/objects/Loads/Pengrid.h
r4459 r4492 77 77 void PenaltyConstrain(int* punstable); 78 78 void PenaltyConstrainThermal(int* punstable); 79 void UpdateFromDakota(void* inputs);80 79 void UpdateInputs(double* solution); 81 80 /*}}}*/ -
issm/trunk/src/c/objects/Vertex.cpp
r4491 r4492 273 273 int Vertex::Sid(void){ return sid; } 274 274 /*}}}*/ 275 /*FUNCTION UpdateFromDakota {{{1*/276 void Vertex::UpdateFromDakota(void* vinputs){277 278 ISSMERROR("not supported yet!");279 280 }281 /*}}}*/282 275 /*FUNCTION UpdateVertexPosition {{{1*/ 283 276 void Vertex::UpdatePosition(double* thickness,double* bed){ -
issm/trunk/src/c/objects/Vertex.h
r4248 r4492 60 60 /*Vertex management: {{{1*/ 61 61 int Sid(void); 62 void UpdateFromDakota(void* vinputs);63 62 void UpdatePosition(double* thickness,double* bed); 64 63 /*}}}*/
Note:
See TracChangeset
for help on using the changeset viewer.