Ignore:
Timestamp:
Oct 25, 2017, 2:01:57 PM (7 years ago)
Author:
Ehouarn Millour
Message:

Some fixes to enable compiling with the pgf compiler and updated arch files for pgf on Ciclad.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/rrtm/susw15.F90

    r2010 r3043  
    5858
    5959IMPLICIT NONE
    60 REAL(KIND=JPRB)   :: ZPDH2O=0.8_JPRB
    61 REAL(KIND=JPRB)   :: ZPDUMG=0.75_JPRB
    62 REAL(KIND=JPRB)   :: ZPRH2O=30000._JPRB
    63 REAL(KIND=JPRB)   :: ZPRUMG=30000._JPRB
     60REAL(KIND=JPRB),SAVE   :: ZPDH2O=0.8_JPRB
     61REAL(KIND=JPRB),SAVE   :: ZPDUMG=0.75_JPRB
     62REAL(KIND=JPRB),SAVE   :: ZPRH2O=30000._JPRB
     63REAL(KIND=JPRB),SAVE   :: ZPRUMG=30000._JPRB
    6464
    6565!$OMP THREADPRIVATE(zpdh2o,zpdumg,zprh2o,zprumg)
Note: See TracChangeset for help on using the changeset viewer.