- Timestamp:
- May 18, 2021, 10:37:32 AM (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/LMDZ-ECRAD/libf/phylmd/ecrad/srtm_kgb16.F90
r3880 r3904 39 39 CLF1 = DIRECTORY // "/RADSRTM" 40 40 WRITE(0,'(A,A)') 'Reading ',TRIM(CLF1) 41 OPEN(NULRAD,FILE=TRIM(CLF1),FORM="UNFORMATTED",ACTION="READ",ERR=1000 )41 OPEN(NULRAD,FILE=TRIM(CLF1),FORM="UNFORMATTED",ACTION="READ",ERR=1000,convert='big_endian') 42 42 !ELSE 43 43 ! OPEN(NULRAD,FILE='RADSRTM',FORM="UNFORMATTED",ACTION="READ",ERR=1000)
Note: See TracChangeset
for help on using the changeset viewer.