Changeset 17181


Ignore:
Timestamp:
01/28/14 11:12:45 (11 years ago)
Author:
Mathieu Morlighem
Message:

BUG: Fixing free surface models

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

Legend:

Unmodified
Added
Removed

  • issm/trunk-jpl/src/c/analyses/FreeSurfaceBaseAnalysis.cpp

    r17180 r17181  
    169169
    170170                D_scalar=dt*gauss->weight*Jdet;
    171 
    172171                for(int i=0;i<dim*dim;i++) D[i]=0.;
    173172                D[0] = D_scalar*vx;
    174173                if(dim==2) D[1*dim+1] = D_scalar*vy;
     174
    175175                TripleMultiply(B,dim,numnodes,1,
    176176                                        D,dim,dim,0,

  • issm/trunk-jpl/src/c/analyses/FreeSurfaceTopAnalysis.cpp

    r17180 r17181  
    178178
    179179                D_scalar=dt*gauss->weight*Jdet;
    180 
    181180                for(int i=0;i<dim*dim;i++) D[i]=0.;
    182181                D[0] = D_scalar*vx;
    183 
    184182                if(dim==2) D[1*dim+1]=D_scalar*vy;
     183
    185184                TripleMultiply(B,dim,numnodes,1,
    186185                                        D,dim,dim,0,
Note: See TracChangeset for help on using the changeset viewer.