Changeset 18195
- Timestamp:
- 06/27/14 16:05:41 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp
r18193 r18195 3715 3715 3716 3716 for(i=0;i<numnodes;i++){ 3717 pe->values[i*dim+0] += - r*pressure*gauss->weight*Jdet*dbasis[0*numnodes+i];3718 pe->values[i*dim+1] += - r*pressure*gauss->weight*Jdet*dbasis[1*numnodes+i];3717 pe->values[i*dim+0] += pressure*gauss->weight*Jdet*dbasis[0*numnodes+i]; 3718 pe->values[i*dim+1] += pressure*gauss->weight*Jdet*dbasis[1*numnodes+i]; 3719 3719 if(dim==3){ 3720 pe->values[i*dim+2]+= - r*pressure*gauss->weight*Jdet*dbasis[2*numnodes+i];3720 pe->values[i*dim+2]+= pressure*gauss->weight*Jdet*dbasis[2*numnodes+i]; 3721 3721 } 3722 3722 }
Note:
See TracChangeset
for help on using the changeset viewer.