Changeset 22535


Ignore:
Timestamp:
03/13/18 07:06:32 (7 years ago)
Author:
Mathieu Morlighem
Message:

CHG: removing GetB and GetBprime

Location:
issm/trunk-jpl/src/c/analyses
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/analyses/StressbalanceVerticalAnalysis.cpp

    r22511 r22535  
    479479        return pe;
    480480}/*}}}*/
    481 void           StressbalanceVerticalAnalysis::GetB(IssmDouble* B,Element* element,IssmDouble* xyz_list,Gauss* gauss){/*{{{*/
    482         /*      Compute B  matrix. B=[dh1/dz dh2/dz dh3/dz dh4/dz dh5/dz dh6/dz];
    483                 where hi is the interpolation function for node i.*/
    484 
    485         /*Fetch number of nodes for this finite element*/
    486         int numnodes = element->GetNumberOfNodes();
    487 
    488         /*Get nodal functions derivatives*/
    489         IssmDouble* dbasis=xNew<IssmDouble>(3*numnodes);
    490         element->NodalFunctionsDerivatives(dbasis,xyz_list,gauss);
    491 
    492         /*Build B: */
    493         for(int i=0;i<numnodes;i++){
    494                 B[i] = dbasis[2*numnodes+i]; 
    495         }
    496 
    497         /*Clean-up*/
    498         xDelete<IssmDouble>(dbasis);
    499 }/*}}}*/
    500 void           StressbalanceVerticalAnalysis::GetBprime(IssmDouble* Bprime,Element* element,IssmDouble* xyz_list,Gauss* gauss){/*{{{*/
    501 
    502         element->NodalFunctions(Bprime,gauss);
    503 
    504 }/*}}}*/
    505481void           StressbalanceVerticalAnalysis::GetSolutionFromInputs(Vector<IssmDouble>* solution,Element* element){/*{{{*/
    506482        element->GetSolutionFromInputsOneDof(solution,VzEnum);
  • issm/trunk-jpl/src/c/analyses/StressbalanceVerticalAnalysis.h

    r19267 r22535  
    3232                ElementVector* CreatePVectorSurface(Element* element);
    3333                ElementVector* CreatePVectorVolume(Element* element);
    34                 void           GetB(IssmDouble* B,Element* element,IssmDouble* xyz_list,Gauss* gauss);
    35                 void           GetBprime(IssmDouble* B,Element* element,IssmDouble* xyz_list,Gauss* gauss);
    3634                void           GetSolutionFromInputs(Vector<IssmDouble>* solution,Element* element);
    3735                void           GradientJ(Vector<IssmDouble>* gradient,Element* element,int control_type,int control_index);
Note: See TracChangeset for help on using the changeset viewer.