Changeset 803 for issm/trunk/src/c/objects/Penta.cpp

Timestamp:

06/04/09 18:07:50 (17 years ago)

Author:

Eric.Larour

Message:

Added DeepEcho function

File:

• issm/trunk/src/c/objects/Penta.cpp (modified) (1 diff)

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

@@ -103 +103 @@
         return;
 }
-
+void Penta::DeepEcho(void){
+
+        printf("Penta:\n");
+        printf("   id: %i\n",id);
+        printf("   mid: %i\n",mid);
+        printf("   mparid: %i\n",mparid);
+
+        printf("   node_ids=[%i,%i,%i,%i,%i,%i]\n",node_ids[0],node_ids[1],node_ids[2],node_ids[3],node_ids[4],node_ids[5]);
+        printf("   node_offsets=[%i,%i,%i,%i,%i,%i]\n",node_offsets[0],node_offsets[1],node_offsets[2],node_offsets[3],node_offsets[4],node_offsets[5]);
+        printf("   matice_offset=%i\n",matice_offset);
+        printf("   matpar_offset=%i\n",matpar_offset);
+
+        printf("   h=[%i,%i,%i,%i,%i,%i]\n",h[0],h[1],h[2],h[3],h[4],h[5]);
+        printf("   s=[%i,%i,%i,%i,%i,%i]\n",s[0],s[1],s[2],s[3],s[4],s[5]);
+        printf("   b=[%i,%i,%i,%i,%i,%i]\n",b[0],b[1],b[2],b[3],b[4],b[5]);
+        printf("   k=[%i,%i,%i,%i,%i,%i]\n",k[0],k[1],k[2],k[3],k[4],k[5]);
+        
+        printf("   friction_type: %i\n",friction_type);
+        printf("   p: %g\n",p);
+        printf("   q: %g\n",q);
+        printf("   shelf: %i\n",shelf);
+        printf("   onbed: %i\n",onbed);
+        printf("   onsurface: %i\n",onsurface);
+        printf("   meanvel: %g\n",meanvel);
+        printf("   epsvel: %g\n",epsvel);
+        printf("   collapse: %i\n",collapse);
+        
+        printf("   melting=[%i,%i,%i,%i,%i,%i]\n",melting[0],melting[1],melting[2],melting[3],melting[4],melting[5]);
+        printf("   accumulation=[%i,%i,%i,%i,%i,%i]\n",accumulation[0],accumulation[1],accumulation[2],accumulation[3],accumulation[4],accumulation[5]);
+        printf("   geothermalflux=[%i,%i,%i,%i,%i,%i]\n",geothermalflux[0],geothermalflux[1],geothermalflux[2],geothermalflux[3],geothermalflux[4],geothermalflux[5]);
+        printf("   artdiff: %i\n",artdiff);
+        printf("   thermal_steadystate: %i\n",thermal_steadystate);
+        printf("   viscosity_overshoot: %i\n",viscosity_overshoot);
+        printf("   stokesreconditioning: %i\n",stokesreconditioning);
+        return;
+}
 void  Penta::Marshall(char** pmarshalled_dataset){