source: issm/oecreview/Archive/18296-19100/ISSM-18399-18400.diff

Last change on this file was 19102, checked in by Mathieu Morlighem, 10 years ago

NEW: added 18296-19100

File size: 2.6 KB
  • ../trunk-jpl/src/c/classes/Elements/Penta.cpp

     
    297297/*}}}*/
    298298void       Penta::ComputeDeviatoricStressTensor(){/*{{{*/
    299299
    300         IssmDouble      xyz_list[NUMVERTICES][3];
    301         IssmDouble      viscosity;
    302         IssmDouble      epsilon[6]; /* epsilon=[exx,eyy,exy];*/
    303         IssmDouble      tau_xx[NUMVERTICES];
    304         IssmDouble              tau_yy[NUMVERTICES];
    305         IssmDouble              tau_zz[NUMVERTICES];
    306         IssmDouble      tau_xy[NUMVERTICES];
    307         IssmDouble              tau_xz[NUMVERTICES];
    308         IssmDouble              tau_yz[NUMVERTICES];
     300        IssmDouble  xyz_list[NUMVERTICES][3];
     301        IssmDouble  viscosity;
     302        IssmDouble  epsilon[6]; /* epsilon=[exx,eyy,exy];*/
     303        IssmDouble  tau_xx[NUMVERTICES];
     304        IssmDouble      tau_yy[NUMVERTICES];
     305        IssmDouble      tau_zz[NUMVERTICES];
     306        IssmDouble  tau_xy[NUMVERTICES];
     307        IssmDouble      tau_xz[NUMVERTICES];
     308        IssmDouble      tau_yz[NUMVERTICES];
    309309        GaussPenta* gauss=NULL;
    310310
    311311        /* Get node coordinates and dof list: */
     
    335335        }
    336336
    337337        /*Add Stress tensor components into inputs*/
    338         this->inputs->AddInput(new PentaInput(StressTensorxxEnum,&tau_xx[0],P1Enum));
    339         this->inputs->AddInput(new PentaInput(StressTensorxyEnum,&tau_xy[0],P1Enum));
    340         this->inputs->AddInput(new PentaInput(StressTensorxzEnum,&tau_xz[0],P1Enum));
    341         this->inputs->AddInput(new PentaInput(StressTensoryyEnum,&tau_yy[0],P1Enum));
    342         this->inputs->AddInput(new PentaInput(StressTensoryzEnum,&tau_yz[0],P1Enum));
    343         this->inputs->AddInput(new PentaInput(StressTensorzzEnum,&tau_zz[0],P1Enum));
     338        this->inputs->AddInput(new PentaInput(DeviatoricStressxxEnum,&tau_xx[0],P1Enum));
     339        this->inputs->AddInput(new PentaInput(DeviatoricStressxyEnum,&tau_xy[0],P1Enum));
     340        this->inputs->AddInput(new PentaInput(DeviatoricStressxzEnum,&tau_xz[0],P1Enum));
     341        this->inputs->AddInput(new PentaInput(DeviatoricStressyyEnum,&tau_yy[0],P1Enum));
     342        this->inputs->AddInput(new PentaInput(DeviatoricStressyzEnum,&tau_yz[0],P1Enum));
     343        this->inputs->AddInput(new PentaInput(DeviatoricStresszzEnum,&tau_zz[0],P1Enum));
    344344
    345345        /*Clean up and return*/
    346346        delete gauss;
  • ../trunk-jpl/src/c/classes/Elements/Element.cpp

     
    12041204        }
    12051205
    12061206        /*Assign output pointer*/
     1207        _assert_(input);
    12071208        *pinterpolation   = input->GetResultInterpolation();
    12081209        *pnodesperelement = input->GetResultNumberOfNodes();
    12091210}/*}}}*/
Note: See TracBrowser for help on using the repository browser.