Changeset 4424


Ignore:
Timestamp:
07/07/10 09:17:03 (15 years ago)
Author:
Mathieu Morlighem
Message:

fixed Prognostic2

Location:
issm/trunk/src/c
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/c/modules/ModelProcessorx/Prognostic2/CreateNodesPrognostic2.cpp

    r4236 r4424  
    6161
    6262                                /*Add node to nodes dataset: */
    63                                 nodes->AddObject(new Node(node_id,node_id-1,vertex_id,io_index,iomodel,Balancedthickness2AnalysisEnum));
     63                                nodes->AddObject(new Node(node_id,node_id-1,vertex_id,io_index,iomodel,Prognostic2AnalysisEnum));
    6464
    6565                        }
     
    7575        xfree((void**)&iomodel->gridonicesheet);
    7676        xfree((void**)&iomodel->gridoniceshelf);
     77        xfree((void**)&iomodel->elements);
    7778
    7879        /*Assign output pointer: */
  • issm/trunk/src/c/objects/Elements/Tria.cpp

    r4422 r4424  
    57965796/*FUNCTION Tria::InputUpdateFromSolutionPrognostic2 {{{1*/
    57975797void  Tria::InputUpdateFromSolutionPrognostic2(double* solution){
    5798         ISSMERROR(" not supported yet!");
     5798        int i;
     5799
     5800        const int    numvertices=3;
     5801        const int    numdofpervertex=1;
     5802        const int    numdof=numdofpervertex*numvertices;
     5803
     5804        int          doflist[numdof];
     5805        double       values[numdof];
     5806
     5807        int          dummy;
     5808
     5809        /*Get dof list: */
     5810        GetDofList(&doflist[0],&dummy);
     5811
     5812        /*Use the dof list to index into the solution vector: */
     5813        for(i=0;i<numdof;i++){
     5814                values[i]=solution[doflist[i]];
     5815        }
     5816
     5817        /*Add thickness as inputs to the tria element: */
     5818        this->inputs->AddInput(new TriaVertexInput(ThicknessEnum,values));
    57995819}
    58005820/*}}}*/
Note: See TracChangeset for help on using the changeset viewer.