Changeset 236 for trunk/SRC/ReadWrite/read_oasis.pro
- Timestamp:
- 03/21/07 18:18:44 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ReadWrite/read_oasis.pro
r232 r236 45 45 , error=err 46 46 if err ne 0 then begin 47 print,!err_string47 ras = report(!err_string) 48 48 return, -1 49 49 endif … … 57 57 readu, unit 58 58 if EOF(unit) then begin 59 print, varname+' not found in '+filename59 ras = report(varname+' not found in '+filename) 60 60 return, -1 61 61 endif
Note: See TracChangeset
for help on using the changeset viewer.