Changeset 3576 for LMDZ5/branches/IPSLCM5A2.1/libf/phylmd/physiq_mod.F90

Timestamp:

Oct 7, 2019, 3:06:12 PM (5 years ago)

Author:

acozic

Message:

for IPSLCM5A2CHT we add the possibilty to read solaire and strat aod in forcing files
warning for this we use the flag ok_suntime_rrtm

File:

• LMDZ5/branches/IPSLCM5A2.1/libf/phylmd/physiq_mod.F90 (modified) (1 diff)

LMDZ5/branches/IPSLCM5A2.1/libf/phylmd/physiq_mod.F90

@@ -3747 +3747 @@
          CALL read_rsun_rrtm(debut)
 #endif
-       ENDIF
+      ELSE IF (ok_suntime_rrtm) THEN 
+         CALL read_rsun_volcanoes(debut) 
+      ENDIF
 
        if (mydebug) then