Changeset 335


Ignore:
Timestamp:
05/11/09 11:20:15 (16 years ago)
Author:
seroussi
Message:

problem of sign with melting

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/c/objects/Tria.cpp

    r301 r335  
    23462346                /*Get bed slope: */
    23472347                GetParameterDerivativeValue(&slope[0], &b[0],&xyz_list[0][0], gauss_l1l2l3);
    2348                 dbdx=-slope[0];
    2349                 dbdy=-slope[1];
     2348                dbdx=slope[0];
     2349                dbdy=slope[1];
    23502350
    23512351                /* Get Jacobian determinant: */
     
    23582358                /*Build gaussian vector: */
    23592359                for(i=0;i<numgrids;i++){
    2360                         pe_g_gaussian[i]=Jdet*gauss_weight*(vx*dbdx+vy*dbdy-meltingvalue)*L[i];
     2360                        pe_g_gaussian[i]=-Jdet*gauss_weight*(vx*dbdx+vy*dbdy-meltingvalue)*L[i];
    23612361                }
    23622362       
Note: See TracChangeset for help on using the changeset viewer.