Changeset 2330 for issm/trunk/src/c/parallel/ControlInitialization.cpp

Timestamp:

09/25/09 17:00:28 (15 years ago)

Author:

Mathieu Morlighem

Message:

renamed debug -> verbose

File:

• issm/trunk/src/c/parallel/ControlInitialization.cpp (modified) (7 diffs)

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

@@ -34 +34 @@
 
         /*flags: */
-        int debug=0;
+        int verbose=0;
         int dim=-1;
         int ishutter=0;
@@ -54 +54 @@
 
         /*first recover parameters common to all solutions:*/
-        model->FindParam(&debug,"debug");
+        model->FindParam(&verbose,"verbose");
         model->FindParam(&dim,"dim");
         model->FindParam(&ishutter,"ishutter");
@@ -83 +83 @@
 
         //compute slopes
-        if(debug)_printf_("%s\n","computing bed slope (x and y derivatives)...");
+        if(verbose)_printf_("%s\n","computing bed slope (x and y derivatives)...");
         diagnostic_core_linear(&slopex,fem_sl,inputs,SlopeComputeAnalysisEnum(),BedXAnalysisEnum());
         diagnostic_core_linear(&slopey,fem_sl,inputs,SlopeComputeAnalysisEnum(),BedYAnalysisEnum());
@@ -97 +97 @@
 
         //horizontal velocity
-        if(debug)_printf_("%s\n"," computing horizontal velocities...");
+        if(verbose)_printf_("%s\n"," computing horizontal velocities...");
         diagnostic_core_nonlinear(&ug,NULL,NULL,NULL,fem_dh,inputs,DiagnosticAnalysisEnum(),HorizAnalysisEnum());
-        if(debug)_printf_("%s\n"," extruding horizontal velocities...");
+        if(verbose)_printf_("%s\n"," extruding horizontal velocities...");
         VecDuplicatePatch(&ug_horiz,ug); FieldExtrudex( ug_horiz,fem_dh->elements,fem_dh->nodes, fem_dh->loads,fem_dh-> materials,"velocity",1);
 
         //vertical velocity
-        if(debug)_printf_("%s\n"," computing vertical velocities...");
+        if(verbose)_printf_("%s\n"," computing vertical velocities...");
         inputs->Add("velocity",ug_horiz,numberofdofspernode_dh,numberofnodes);
         diagnostic_core_linear(&ug_vert,fem_dv,inputs,DiagnosticAnalysisEnum(),VertAnalysisEnum());
 
         //Create 3d u_g
-        if(debug)_printf_("%s\n"," combining horizontal and vertical velocities...");
+        if(verbose)_printf_("%s\n"," combining horizontal and vertical velocities...");
         VecFree(&ug); ug=NewVec(numberofnodes*3);
         xfree((void**)&dofset);dofset=dofsetgen(2,&dof01[0],3,numberofnodes*3); VecMerge(ug,ug_horiz,dofset,numberofnodes*2);
@@ -115 +115 @@
 
         //Create 4d u_g
-        if(debug)_printf_("%s\n"," computing pressure according to Pattyn...");
+        if(verbose)_printf_("%s\n"," computing pressure according to Pattyn...");
         ComputePressurex( &pg,fem_dh->elements, fem_dh->nodes, fem_dh->loads,  fem_dh->materials, numberofnodes);
         VecScale(pg,1.0/stokesreconditioning);
@@ -127 +127 @@
 
         //update spcs
-        if(debug)_printf_("%s\n"," update boundary conditions for stokes using velocities previously computed...");
+        if(verbose)_printf_("%s\n"," update boundary conditions for stokes using velocities previously computed...");
         xfree((void**)&dofset);dofset=dofsetgen(3,dof012,4,numberofnodes*4); VecMerge(fem_ds->yg->vector,ug,dofset,3*numberofnodes);
         
@@ -134 +134 @@
 
         //Compute Stokes velocities to speed up later runs
-        if(debug)_printf_("%s\n"," computing stokes velocities and pressure ...");
+        if(verbose)_printf_("%s\n"," computing stokes velocities and pressure ...");
         VecFree(&ug);
         diagnostic_core_nonlinear(&ug,NULL,NULL,NULL,fem_ds,inputs,DiagnosticAnalysisEnum(),StokesAnalysisEnum());