Changeset 341f4b7 in flexpart.git for src/verttransform_nests.f90

Timestamp:

Apr 20, 2016, 1:39:51 PM (8 years ago)

Author:

Espen Sollum ATMOS <eso@…>

Branches:

master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie

Children:

61df8d9

Parents:

32b49c3

Message:

SPECIES files converted to namelist format. Fixed-format SPCIES files renamed with .oldformat extension. Added 2 wet depo parameters to old-format SPECIES. Renamed internal variables and parameters used for wet deposition. incloud_ratio increased to 2.2

File:

• src/verttransform_nests.f90 (modified) (2 diffs)

src/verttransform_nests.f90

@@ -466 +466 @@
       clwn(0:nxm1,0:nym1,:,n,l)=0.0
 !    icloud_stats(0:nxm1,0:nym1,:,n)=0.0
-      clw4n(0:nxm1,0:nym1,n,l)=0.0
+      ctwcn(0:nxm1,0:nym1,n,l)=0.0
       cloudsn(0:nxm1,0:nym1,:,n,l)=0
 ! If water/ice are read separately into clwc and ciwc, store sum in clwcn
@@ -484 +484 @@
               clwn(ix,jy,kz,n,l)=(clwcn(ix,jy,kz,n,l)*rhon(ix,jy,kz,n,l))*(height(kz+1)-height(kz))
               tot_cloud_h=tot_cloud_h+(height(kz+1)-height(kz)) 
-              clw4n(ix,jy,n,l) = clw4n(ix,jy,n,l)+clwn(ix,jy,kz,n,l)
+              ctwcn(ix,jy,n,l) = ctwcn(ix,jy,n,l)+clwn(ix,jy,kz,n,l)
 !            icloud_stats(ix,jy,4,n)= icloud_stats(ix,jy,4,n)+clw(ix,jy,kz,n)          ! Column cloud water [m3/m3]
 !           icloud_stats(ix,jy,3,n)= min(height(kz+1),height(kz))                     ! Cloud BOT height stats      [m]