- Timestamp:
- Mar 3, 2015, 2:41:13 PM (10 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 2188-2195,2197-2202,2204-2210,2213-2216
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/phylmd/phys_state_var_mod.F90
r2187 r2220 60 60 REAL, ALLOCATABLE, SAVE :: clwcon(:,:),rnebcon(:,:) 61 61 !$OMP THREADPRIVATE(clwcon,rnebcon) 62 REAL, ALLOCATABLE, SAVE :: qtc_cv(:,:),sigt_cv(:,:) 63 !$OMP THREADPRIVATE(qtc_cv,sigt_cv) 62 64 REAL, ALLOCATABLE, SAVE :: ratqs(:,:) 63 65 !$OMP THREADPRIVATE(ratqs) … … 416 418 !!! Rom P <<< 417 419 ALLOCATE(clwcon(klon,klev),rnebcon(klon,klev)) 420 ALLOCATE(qtc_cv(klon,klev),sigt_cv(klon,klev)) 418 421 ALLOCATE(ratqs(klon,klev)) 419 422 ALLOCATE(pbl_tke(klon,klev+1,nbsrf+1)) … … 566 569 deallocate(zthe, zpic, zval) 567 570 deallocate(rugoro, t_ancien, q_ancien, clwcon, rnebcon) 571 deallocate(qtc_cv,sigt_cv) 568 572 deallocate( u_ancien, v_ancien ) 569 573 deallocate( tr_ancien) !RomP
Note: See TracChangeset
for help on using the changeset viewer.