Changeset 2863 for LMDZ5/trunk/libf


Ignore:
Timestamp:
Apr 24, 2017, 10:14:02 AM (8 years ago)
Author:
Ehouarn Millour
Message:

Added missing declaration and closing bracket introduced in rev 2854.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/physiq_mod.F90

    r2854 r2863  
    972972    ! pre-industrial (pi) aerosols
    973973
    974 
     974    INTEGER :: naero
    975975    ! Aerosol optical properties
    976976    CHARACTER*4, DIMENSION(naero_grp) :: rfname
    … …  
    15841584       !--setting up dryaod_diag to TRUE in XIOS case
    15851585       DO naero = 1, naero_tot-1
    1586          IF (xios_field_is_active("dryod550_"//name_aero_tau(naero)) dryaod_diag=.TRUE.
     1586         IF (xios_field_is_active("dryod550_"//name_aero_tau(naero))) dryaod_diag=.TRUE.
    15871587       ENDDO
    15881588#endif
Note: See TracChangeset for help on using the changeset viewer.