Ignore:
Timestamp:
May 18, 2021, 10:37:32 AM (3 years ago)
Author:
idelkadi
Message:

Implementation of the ECRAD code in LMDZ.
Addition of the data directory and the namelist_ecrad file necessary for ECRAD.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/LMDZ-ECRAD/libf/phylmd/ecrad/rrtm_kgb1.F90

    r3880 r3904  
    4141  CLF1 = DIRECTORY // "/RADRRTM"
    4242  WRITE(0,'(A,A)') 'Reading ',TRIM(CLF1)
    43 !  OPEN(NULRAD,FILE=TRIM(CLF1),FORM="UNFORMATTED",ACTION="READ",ERR=1000)
     43  OPEN(NULRAD,FILE=TRIM(CLF1),FORM="UNFORMATTED",ACTION="READ",ERR=1000,convert='big_endian')
    4444  !ELSE
    45   OPEN(NULRAD,FILE='RADRRTM',FORM="UNFORMATTED",ACTION="READ",ERR=1000)
     45 ! OPEN(NULRAD,FILE='RADRRTM',FORM="UNFORMATTED",ACTION="READ",ERR=1000)
    4646  !ENDIF
    4747  READ(NULRAD,ERR=1001) KAO_D,KBO_D
Note: See TracChangeset for help on using the changeset viewer.