Changeset 8540


Ignore:
Timestamp:
06/07/11 16:45:32 (14 years ago)
Author:
Mathieu Morlighem
Message:

back to normal

File:
1 edited

Legend:

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

    r8539 r8540  
    885885                if(slope_magnitude>MAXSLOPE) alpha2=pow((double)10,MOUNTAINKEXPONENT);
    886886                else friction->GetAlpha2(&alpha2, gauss,VxEnum,VyEnum,VzEnum);
    887                 _assert_(alpha2>=0);
    888887
    889888                GetL(&L[0][0], &xyz_list[0][0], gauss,NDOF2);
     
    16231622                for(i=0;i<numdof;i++) pe->values[i]+=(thicknessobs-thickness)*weight*Jdet*gauss->weight*l1l2l3[i];
    16241623                /*Regularization of the constraint: 2000000 79 N*/
    1625                 for(i=0;i<numdof;i++) pe->values[i]+= - 1*100000*dH[0]*dbasis[0][i]*Jdet*gauss->weight;
    1626                 for(i=0;i<numdof;i++) pe->values[i]+= - 1*100000*dH[1]*dbasis[1][i]*Jdet*gauss->weight;
     1624                //for(i=0;i<numdof;i++) pe->values[i]+= - 1*100000*dH[0]*dbasis[0][i]*Jdet*gauss->weight;
     1625                //for(i=0;i<numdof;i++) pe->values[i]+= - 1*100000*dH[1]*dbasis[1][i]*Jdet*gauss->weight;
    16271626        }
    16281627
     
    52905289                /*compute ThicknessAbsMisfit*/
    52915290                Jelem+=0.5*pow(thickness-thicknessobs,2.0)*weight*Jdet*gauss->weight;
    5292                 Jelem+=0.5*100000*(pow(dH[0],2.)+pow(dH[1],2.))*Jdet*gauss->weight;
     5291                //Jelem+=0.5*100000*(pow(dH[0],2.)+pow(dH[1],2.))*Jdet*gauss->weight;
    52935292        }
    52945293
Note: See TracChangeset for help on using the changeset viewer.