Changeset 4735 for LMDZ6/trunk


Ignore:
Timestamp:
Oct 23, 2023, 11:10:25 PM (13 months ago)
Author:
oboucher
Message:

rain_f should be intent IN only as it is not modified in pbl_surface

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/pbl_surface_mod.F90

    r4724 r4735  
    348348    REAL, DIMENSION(klon),        INTENT(IN)        :: rugoro  ! rugosity length
    349349    REAL, DIMENSION(klon),        INTENT(IN)        :: rmu0    ! cosine of solar zenith angle
    350     REAL, DIMENSION(klon),        INTENT(INOUT)     :: rain_f  ! rain fall
     350    REAL, DIMENSION(klon),        INTENT(IN)        :: rain_f  ! rain fall
    351351    REAL, DIMENSION(klon),        INTENT(IN)        :: snow_f  ! snow fall
    352352    REAL, DIMENSION(klon),        INTENT(IN)        :: bs_f  ! blowing snow fall
Note: See TracChangeset for help on using the changeset viewer.