Changeset 3107 for LMDZ6/trunk/libf/phylmd/iophy.F90

Timestamp:

Dec 3, 2017, 10:09:31 PM (7 years ago)

Author:

oboucher

Message:

Minor changes related to previous commit

File:

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

LMDZ6/trunk/libf/phylmd/iophy.F90

@@ -666 +666 @@
     ! Set swaerofree_diag=true if at least one of the concerned variables are defined 
     IF (var%name=='SWupTOAcleanclr' .OR. var%name=='SWupSFCcleanclr' .OR. var%name=='SWdnSFCcleanclr' .OR. & 
-        var%name=='LWupTOAcleanclr' .OR. var%name=='LWupSFCcleanclr' .OR. var%name=='LWdnSFCcleanclr' ) THEN
+        var%name=='LWupTOAcleanclr' .OR. var%name=='LWdnSFCcleanclr' ) THEN
        IF  ( var%flag(iff)<=lev_files(iff) ) swaerofree_diag=.TRUE.
     ENDIF