Changeset 3778

Timestamp:

05/17/10 11:05:13 (15 years ago)

Author:

seroussi

Message:

minor slope compute

File:

• issm/trunk/src/c/parallel/slope_core.cpp (modified) (3 diffs)

issm/trunk/src/c/parallel/slope_core.cpp

@@ -29 +29 @@
         fem->parameters->FindParam(&ishutter,IsHutterEnum);
 
-        if(verbose)_printf_("%s\n","computing surface slope (x and y derivatives)...");
+        if(verbose)_printf_("%s\n","computing slope (x and y derivatives)...");
 
         /*Specify type of computations: */
@@ -54 +54 @@
                 *pslopex=NULL;
                 *pslopey=NULL;
+                return;
         }
         
@@ -65 +66 @@
                 if(verbose)_printf_("%s\n","extruding slopes in 3d...");
                 FieldExtrudex( slopex, fem->elements,fem->nodes,fem->vertices,fem->loads,fem->materials,fem->parameters,"slopex",0);
-                FieldExtrudex( slopey, fem->elements,fem->nodes,fem->vertices,fem->loads,fem->materials,fem->parameters,"slopex",0);
+                FieldExtrudex( slopey, fem->elements,fem->nodes,fem->vertices,fem->loads,fem->materials,fem->parameters,"slopey",0);
         }