- 积分
- 741
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2016-9-7
- 最后登录
- 1970-1-1
|
发表于 2020-2-18 20:21:06
|
显示全部楼层
本帖最后由 Dyfedd 于 2020-2-18 20:22 编辑
WRFV3.9.1/phys/module_mp_wdm6.F
!ccn0: initial CCN concentration (m-3) 初始雲凝結核濃度
IF (itimestep .eq. 1) THEN
DO j=jms,jme
DO k=kms,kme
DO i=ims,ime
nn(i,k,j) = ccn0 !m-3
..................................
DO j=jts,jte
DO k=kts,kte
DO i=its,ite
t(i,k)=th(i,k,j)*pii(i,k,j)
qci(i,k,1) = qc(i,k,j)
qci(i,k,2) = qi(i,k,j)
qrs(i,k,1) = qr(i,k,j)
qrs(i,k,2) = qs(i,k,j)
qrs(i,k,3) = qg(i,k,j)
ncr(i,k,1) = nn(i,k,j) !QNCCN 雲凝結核濃度
ncr(i,k,2) = nc(i,k,j) !QNCLOUD
ncr(i,k,3) = nr(i,k,j) !QNRAIN
..................................
|
|