Changeset 114 for trunk/SRC/ToBeReviewed/UTILITAIRE/fitintobox.pro
- Timestamp:
- 06/19/06 16:14:56 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/UTILITAIRE/fitintobox.pro
r11 r114 53 53 ;------------------------------------------------------------ 54 54 FUNCTION err_mess, sz, jpi, nx, jpj, ny, jpk, nz, jpt 55 ; 56 compile_opt idl2, strictarrsubs 57 ; 55 58 IF n_elements(sz EQ 1) THEN $ 56 59 RETURN, report(['Error: ' $ … … 76 79 ;------------------------------------------------------------ 77 80 ; include commons 81 ; 82 compile_opt idl2, strictarrsubs 83 ; 78 84 @cm_4mesh 79 85 @cm_4cal
Note: See TracChangeset
for help on using the changeset viewer.