Changeset 1787 for LMDZ5/trunk


Ignore:
Timestamp:
Jul 16, 2013, 11:47:10 AM (11 years ago)
Author:
idelkadi
Message:

Correction pour prendre en compte le cas AMMA

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r1785 r1787  
    4242  REAL, ALLOCATABLE, DIMENSION(:,:), PRIVATE, SAVE   :: agesno ! age of snow at surface
    4343  !$OMP THREADPRIVATE(agesno)
    44   REAL, ALLOCATABLE, DIMENSION(:,:,:), PRIVATE, SAVE :: ftsoil ! soil temperature
     44! Correction pour le cas AMMA (PRIVATE)
     45  REAL, ALLOCATABLE, DIMENSION(:,:,:), SAVE :: ftsoil ! soil temperature
    4546  !$OMP THREADPRIVATE(ftsoil)
    4647
Note: See TracChangeset for help on using the changeset viewer.