Changeset 4703 for LMDZ6/trunk/libf/phylmdiso/phys_local_var_mod.F90
- Timestamp:
- Sep 20, 2023, 3:09:14 PM (10 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmdiso/phys_local_var_mod.F90
r4639 r4703 198 198 REAL, SAVE, ALLOCATABLE :: tau3d_aero(:,:,:,:) 199 199 !$OMP THREADPRIVATE(tau3d_aero) 200 REAL, SAVE, ALLOCATABLE :: scdnc(:,:)201 !$OMP THREADPRIVATE(scdnc)202 200 REAL, SAVE, ALLOCATABLE :: dNovrN(:) 203 201 !$OMP THREADPRIVATE(dNovrN) 204 REAL, SAVE, ALLOCATABLE :: cldncl(:)205 !$OMP THREADPRIVATE(cldncl)206 REAL, SAVE, ALLOCATABLE :: reffclwtop(:)207 !$OMP THREADPRIVATE(reffclwtop)208 REAL, SAVE, ALLOCATABLE :: lcc(:)209 !$OMP THREADPRIVATE(lcc)210 REAL, SAVE, ALLOCATABLE :: reffclws(:,:)211 !$OMP THREADPRIVATE(reffclws)212 REAL, SAVE, ALLOCATABLE :: reffclwc(:,:)213 !$OMP THREADPRIVATE(reffclwc)214 REAL, SAVE, ALLOCATABLE :: cldnvi(:)215 !$OMP THREADPRIVATE(cldnvi)216 REAL, SAVE, ALLOCATABLE :: lcc3d(:,:)217 !$OMP THREADPRIVATE(lcc3d)218 REAL, SAVE, ALLOCATABLE :: lcc3dcon(:,:)219 !$OMP THREADPRIVATE(lcc3dcon)220 REAL, SAVE, ALLOCATABLE :: lcc3dstra(:,:)221 !$OMP THREADPRIVATE(lcc3dstra)222 REAL, SAVE, ALLOCATABLE :: icc3dcon(:,:)223 !$OMP THREADPRIVATE(icc3dcon)224 REAL, SAVE, ALLOCATABLE :: icc3dstra(:,:)225 !$OMP THREADPRIVATE(icc3dstra)226 202 REAL, SAVE, ALLOCATABLE :: zfice(:,:) 227 203 !$OMP THREADPRIVATE(zfice) … … 847 823 ALLOCATE(drytausum_aero(klon,naero_tot)) 848 824 ALLOCATE(tau3d_aero(klon,klev,nwave,naero_tot)) 849 ALLOCATE(scdnc(klon, klev))850 825 ALLOCATE(dNovrN(klon)) 851 ALLOCATE(cldncl(klon))852 ALLOCATE(reffclwtop(klon))853 ALLOCATE(lcc(klon))854 ALLOCATE(reffclws(klon, klev))855 ALLOCATE(reffclwc(klon, klev))856 ALLOCATE(cldnvi(klon))857 ALLOCATE(lcc3d(klon, klev))858 ALLOCATE(lcc3dcon(klon, klev))859 ALLOCATE(lcc3dstra(klon, klev))860 ALLOCATE(icc3dcon(klon, klev))861 ALLOCATE(icc3dstra(klon, klev))862 826 ALLOCATE(zfice(klon, klev)) 863 827 ALLOCATE(od443aer(klon)) … … 1241 1205 DEALLOCATE(drytausum_aero) 1242 1206 DEALLOCATE(tau3d_aero) 1243 DEALLOCATE(scdnc)1244 1207 DEALLOCATE(dNovrN) 1245 DEALLOCATE(cldncl)1246 DEALLOCATE(reffclwtop)1247 DEALLOCATE(lcc)1248 DEALLOCATE(reffclws)1249 DEALLOCATE(reffclwc)1250 DEALLOCATE(cldnvi)1251 DEALLOCATE(lcc3d)1252 DEALLOCATE(lcc3dcon)1253 DEALLOCATE(lcc3dstra)1254 DEALLOCATE(icc3dcon)1255 DEALLOCATE(icc3dstra)1256 1208 DEALLOCATE(zfice) 1257 1209 DEALLOCATE(od443aer)
Note: See TracChangeset
for help on using the changeset viewer.