Changeset 41 for trunk/procs/def_file_name.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/def_file_name.pro (modified) (3 diffs)

trunk/procs/def_file_name.pro

@@ -7 +7 @@
 @com_eg
    IF debug_w THEN print, ' '
-   IF debug_w THEN print, '  ENTER def_file_name...'
+   IF debug_w THEN print, '    ENTER def_file_name...'
 
 ; define date1 and date2
@@ -20 +20 @@
    f_suffix = suffix
 
-   IF debug_w THEN print, '   suffix before search_time_file = ', suffix
+   IF debug_w THEN print, '     suffix before search_time_file = ', suffix
 
    CASE strmid(cmd.plt, 0, 2) OF
@@ -39 +39 @@
       END  
    ENDCASE 
-   IF debug_w THEN print, ' suffix after search_time_file = ', suffix
+   IF debug_w THEN print, '     suffix after search_time_file = ', suffix
    
    file_name = cmd.exp+'_'+timavef+'_'+date1+'_'+date2+suffix+'.nc'
    base_file_name = cmd.exp+'_'+timavef+'_'+date1+'_'+date2
    
-   IF debug_w THEN print,  ' vargrid = ',  vargrid
-   IF debug_w THEN print,  ' file_name in def_file_name = ',file_name 
-   IF debug_w THEN print, '  ... EXIT def_file_name'
+   IF debug_w THEN print,  '     vargrid = ',  vargrid
+   IF debug_w THEN print,  '     file_name in def_file_name = ',file_name 
+   IF debug_w THEN print, '     ... EXIT def_file_name'
 END