Changeset 3864

Timestamp:

05/20/10 09:06:03 (15 years ago)

Author:

Mathieu Morlighem

Message:

minor

Location:

issm/trunk/src/c/objects/Elements

Files:

• Penta.cpp (modified) (1 diff)
• Tria.cpp (modified) (5 diffs)

issm/trunk/src/c/objects/Elements/Penta.cpp

@@ -1719 +1719 @@
 
         /*parameters: */
-        double dt,artdiff,epsvel;
+        double dt,epsvel;
+        bool   artdiff;
 
         /*Collapsed formulation: */

issm/trunk/src/c/objects/Elements/Tria.cpp

@@ -807 +807 @@
 
         /*parameters: */
-        double artdiff;
+        bool artdiff;
 
         /* Get node coordinates and dof list: */
@@ -1056 +1056 @@
 
         /*parameters: */
-        double artdiff;
+        bool artdiff;
 
         /*retrieve some parameters: */
@@ -1679 +1679 @@
         /*parameters: */
         double dt;
-        double artdiff;
+        bool artdiff;
 
         /*retrieve some parameters: */
@@ -1690 +1690 @@
 
         //Create Artificial diffusivity once for all if requested
-        if(artdiff==1){
+        if(artdiff){
                 //Get the Jacobian determinant
                 gauss_l1l2l3[0]=ONETHIRD; gauss_l1l2l3[1]=ONETHIRD; gauss_l1l2l3[2]=ONETHIRD;
@@ -1770 +1770 @@
                 for( i=0; i<numdof; i++) for(j=0;j<numdof;j++) Ke_gg[i][j]+=Ke_gg_thickness2[i][j];
 
-                if(artdiff==1){
+                if(artdiff){
 
                         /* Compute artificial diffusivity */