Changeset 41 for trunk/procs/meshes/mesh_pcmdi.pro

Timestamp:

01/26/08 10:18:52 (16 years ago)

Author:

ericg

Message:

Misc modifs, incl. read_from_grid in yfx, debug_w prints, removal of mesh_lmdz and small bug corrections

File:

• trunk/procs/meshes/mesh_pcmdi.pro (modified) (2 diffs)

trunk/procs/meshes/mesh_pcmdi.pro

@@ -5 +5 @@
 ; init grid, sf, masks for grids with regular grid IPCC netCDF standard
 ;
-   print,' Model inits for ', model
+   IF debug_w THEN print, ' '
+   IF debug_w THEN print, '   ENTER mesh_pcmdi / model =', model
+  
+   print,'   Model inits for ', model
+   IF debug_w THEN print,  '     varexp at start of mesh_pcmdi:', varexp
 
    varexpp =  varexp
@@ -70 +74 @@
    varexp =  varexpp
    
-   print,' End of initialisation for pcmdi grid:', model
+   print,'    End of initialisation for pcmdi grid:', model
+   IF debug_w THEN print,  '     varexp at end of mesh_pcmdi:', varexp
+   IF debug_w THEN print, '   ...EXIT mesh_pcmdi'
+   IF debug_w THEN print,  '  '
    
    return