Changeset 2103 for LMDZ5/trunk/libf/phylmd/phys_local_var_mod.F90
- Timestamp:
- Jul 31, 2014, 3:46:23 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/phys_local_var_mod.F90
r2092 r2103 228 228 REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: wake_h, wbeff, zmax_th, zq2m, zt2m 229 229 !$OMP THREADPRIVATE(wake_h, wbeff, zmax_th, zq2m, zt2m) 230 REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: zt2m_min_mon, zt2m_max_mon 231 !$OMP THREADPRIVATE(zt2m_min_mon, zt2m_max_mon) 232 REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: t2m_min_mon, t2m_max_mon 233 !$OMP THREADPRIVATE(t2m_min_mon, t2m_max_mon) 230 234 REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: weak_inversion 231 235 !$OMP THREADPRIVATE(weak_inversion) … … 403 407 ALLOCATE(rain_lsc(klon), wake_h(klon), wbeff(klon), zmax_th(klon)) 404 408 ALLOCATE(zq2m(klon), zt2m(klon), weak_inversion(klon)) 409 ALLOCATE(zt2m_min_mon(klon), zt2m_max_mon(klon)) 410 ALLOCATE(t2m_min_mon(klon), t2m_max_mon(klon)) 405 411 ALLOCATE(sens(klon), flwp(klon), fiwp(klon)) 406 412 ALLOCATE(ale_bl_stat(klon), alp_bl_conv(klon), alp_bl_det(klon)) … … 554 560 DEALLOCATE(rain_lsc, wake_h, wbeff, zmax_th) 555 561 DEALLOCATE(zq2m, zt2m, weak_inversion) 562 DEALLOCATE(zt2m_min_mon, zt2m_max_mon) 563 DEALLOCATE(t2m_min_mon, t2m_max_mon) 556 564 DEALLOCATE(sens, flwp, fiwp) 557 565 DEALLOCATE(ale_bl_stat,alp_bl_conv,alp_bl_det)
Note: See TracChangeset
for help on using the changeset viewer.