Changeset 4461

Timestamp:

07/08/10 11:20:58 (15 years ago)

Author:

seroussi

Message:

problem with element_type in friction

File:

• issm/trunk/src/c/objects/Loads/Friction.cpp (modified) (2 diffs)

issm/trunk/src/c/objects/Loads/Friction.cpp

@@ -95 +95 @@
         if (Neff<0)Neff=0;
 
-        if(strcmp(element_type,"2d")){
+        if(strcmp(element_type,"2d")==0){
                 inputs->GetParameterValue(&vx, gauss,vxenum);
                 inputs->GetParameterValue(&vy, gauss,vyenum);
                 vmag=sqrt(pow(vx,2)+pow(vy,2));
         }
-        else{
+        else if (strcmp(element_type,"3d")==0){
                 inputs->GetParameterValue(&vx, gauss,vxenum);
                 inputs->GetParameterValue(&vy, gauss,vyenum);
@@ -106 +106 @@
                 vmag=sqrt(pow(vx,2)+pow(vy,2)+pow(vz,2));
         }
+        else ISSMERROR("element_type %s not supported yet",element_type);
         
         alpha2=pow(drag_coefficient,2)*pow(Neff,r)*pow(vmag,(s-1));