Changeset 3084 for LMDZ6/trunk/libf/phylmd/rrtm/recmwf_aero.F90

Timestamp:

Nov 21, 2017, 5:43:41 PM (7 years ago)

Author:

oboucher

Message:

correcting mistake on mistake

File:

• LMDZ6/trunk/libf/phylmd/rrtm/recmwf_aero.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/rrtm/recmwf_aero.F90

@@ -778 +778 @@
 ENDIF
 
-IF (aerosolfree_diag) THEN
+IF (swaerofree_diag) THEN
 ! copy clear-sky clean (no aerosol) case
   PFSCCUP(:,:) =   ZFSUP0_AERO(:,:,5)