Changeset 15477

Timestamp:

07/10/13 10:05:51 (12 years ago)

Author:

seroussi

Message:

minor

File:

• issm/trunk-jpl/src/c/classes/Elements/Penta.cpp (modified) (1 diff)

issm/trunk-jpl/src/c/classes/Elements/Penta.cpp

@@ -7982 +7982 @@
                         for(p=0;p<6;p++){
                                 for(j=0;j<4;j++){
-                                        pe->values[p*4+j] += gauss->weight*Jdet*tau*forcex*SW[p][j][0];
-                                        pe->values[p*4+j] += gauss->weight*Jdet*tau*forcey*SW[p][j][1];
-                                        pe->values[p*4+j] += gauss->weight*Jdet*tau*(forcez-rho_ice*gravity)*SW[p][j][2];
+                                        pe->values[p*4+j] += gauss->weight*Jdet*tau*rho_ice*forcex*SW[p][j][0];
+                                        pe->values[p*4+j] += gauss->weight*Jdet*tau*rho_ice*forcey*SW[p][j][1];
+                                        pe->values[p*4+j] += gauss->weight*Jdet*tau*rho_ice*(forcez-gravity)*SW[p][j][2];
                                 }
                         }