Changeset 16
- Timestamp:
- 11/27/07 18:43:16 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/procs/def_file_name.pro
r2 r16 6 6 @common 7 7 @com_eg 8 IF debug_w THEN print, ' ' 9 IF debug_w THEN print, ' ENTER def_file_name...' 8 10 9 11 ; define date1 and date2 … … 18 20 f_suffix = suffix 19 21 20 IF debug_w THEN print, ' suffix before serch_time_file', suffix22 IF debug_w THEN print, ' suffix before search_time_file = ', suffix 21 23 22 24 CASE strmid(cmd.plt, 0, 2) OF … … 37 39 END 38 40 ENDCASE 39 IF debug_w THEN print, ' suffix after search_time_file ', suffix41 IF debug_w THEN print, ' suffix after search_time_file = ', suffix 40 42 41 43 file_name = cmd.exp+'_'+timavef+'_'+date1+'_'+date2+suffix+'.nc' 42 44 base_file_name = cmd.exp+'_'+timavef+'_'+date1+'_'+date2 43 45 44 IF debug_w THEN print, ' vargrid : ', vargrid 45 IF debug_w THEN print, ' file_name in def_file_name ',file_name 46 IF debug_w THEN print, ' vargrid = ', vargrid 47 IF debug_w THEN print, ' file_name in def_file_name = ',file_name 48 IF debug_w THEN print, ' ... EXIT def_file_name' 46 49 END
Note: See TracChangeset
for help on using the changeset viewer.