| File |
Line number |
Procedure |
Code |
|
./pkg/dic/phos_flux.F |
63 |
PHOS_FLUX |
DO k=1,nlev |
|
./pkg/dic/dic_biotic_param.F |
43 |
DIC_BIOTIC_PARAM |
nlev=10 |
|
./pkg/dic/bio_export.F |
75 |
BIO_EXPORT |
DO k=1,nlev |
|
./pkg/dic/DIC_BIOTIC.h |
19 |
NO PROCEDURE |
& nlev |
|
./pkg/dic/DIC_BIOTIC.h |
21 |
NO PROCEDURE |
integer nlev |
|
./pkg/fizhi/fizhi_init_chem.F |
103 |
READ_QZ |
do lev = 1,nlev |
|
./pkg/fizhi/fizhi_init_chem.F |
115 |
READ_OZ |
subroutine READ_OZ (ku,oz,lats,levs,nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
132 |
READ_OZ |
integer ku,nlat,nlev,ntime |
|
./pkg/fizhi/fizhi_init_chem.F |
134 |
READ_OZ |
_RL oz(nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
137 |
READ_OZ |
_RL levs(nlev) |
|
./pkg/fizhi/fizhi_init_chem.F |
158 |
READ_OZ |
do lev = 1,nlev |
|
./pkg/fizhi/fizhi_init_chem.F |
169 |
READ_OZ |
do lev=1,nlev |
|
./pkg/fizhi/fizhi_init_chem.F |
171 |
READ_OZ |
nrec = lev+(time0-1)*nlev*2 |
|
./pkg/fizhi/fizhi_init_chem.F |
177 |
READ_OZ |
oz(lat,nlev-lev+1,time0) = o3(lat) |
|
./pkg/fizhi/fizhi_init_chem.F |
48 |
READ_QZ |
subroutine READ_QZ (ku,qz,lats,levs,nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
65 |
READ_QZ |
integer ku,nlat,nlev,ntime |
|
./pkg/fizhi/fizhi_init_chem.F |
67 |
READ_QZ |
_RL qz(nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
69 |
READ_QZ |
_RL levs(nlev) |
|
./pkg/fizhi/fizhi_init_chem.F |
89 |
READ_QZ |
read(ku,1000) (levs(lev),lev=1,nlev) |
|
./pkg/fizhi/fizhi_init_chem.F |
96 |
READ_QZ |
read(ku,1000) (qz(lat,lev,time0),lev=1,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1377 |
TRBFLX |
4 irun,nlev,nltop,NYMD,NHMS,grav,cp,rgas,faceps,virtcon,undef, |
|
./pkg/fizhi/fizhi_turb.F |
1423 |
TRBFLX |
integer nn,irun,nlev,nltop,ntrace,ntracedim,itrtrb,nhms,nymd |
|
./pkg/fizhi/fizhi_turb.F |
1430 |
TRBFLX |
_RL tracers(irun,nlev+1,ntracedim) |
|
./pkg/fizhi/fizhi_turb.F |
1434 |
TRBFLX |
_RL SRI(irun,nlev), ET(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1435 |
TRBFLX |
_RL EU (irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1436 |
TRBFLX |
_RL WU(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1437 |
TRBFLX |
_RL WV (irun,nlev), pbldpth(irun) |
|
./pkg/fizhi/fizhi_turb.F |
1439 |
TRBFLX |
_RL freqdg(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1446 |
TRBFLX |
_RL dshdthg(irun,nlev),dthdthg(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1447 |
TRBFLX |
_RL dshdshg(irun,nlev),dthdshg(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1448 |
TRBFLX |
_RL transth(irun,nlev),transsh(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1450 |
TRBFLX |
_RL zetasave(irun),xlsave(irun,nlev),khsave(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1451 |
TRBFLX |
_RL qliq(irun,nlev),turbfcc(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1479 |
TRBFLX |
_RL ADZ1(irun,nlev), DZ1TMP(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1480 |
TRBFLX |
_RL DZ3(irun,nlev), TEMP(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1481 |
TRBFLX |
_RL DV(irun,nlev), DTHV(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1482 |
TRBFLX |
_RL DPK(irun,nlev), STRT(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1483 |
TRBFLX |
_RL DW2(irun,nlev), RI(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1484 |
TRBFLX |
_RL RHOZPK(irun,nlev), Q(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1485 |
TRBFLX |
_RL RIINIT(irun,nlev), DU(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1486 |
TRBFLX |
_RL QQINIT(irun,nlev), RHOKDZ(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1487 |
TRBFLX |
_RL RHODZ2(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1488 |
TRBFLX |
_RL KM(irun,nlev), KH(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1490 |
TRBFLX |
_RL DELTH (irun,nlev+1), DELSH (irun,nlev+1) |
|
./pkg/fizhi/fizhi_turb.F |
1491 |
TRBFLX |
_RL FLXFAC (irun,nlev+1) |
|
./pkg/fizhi/fizhi_turb.F |
1492 |
TRBFLX |
_RL FLXFPK (irun,nlev+1) |
|
./pkg/fizhi/fizhi_turb.F |
1494 |
TRBFLX |
_RL ADZ2 (irun,nlev-1), RHODZ1(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1495 |
TRBFLX |
_RL VKZE (irun,nlev-1), VKZM (irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1496 |
TRBFLX |
_RL XL (irun,nlev-1), QXLM (irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1497 |
TRBFLX |
_RL QQE (irun,nlev-1), QE (irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1498 |
TRBFLX |
_RL P3 (irun,nlev-1), XQ (irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1499 |
TRBFLX |
_RL XLDIAG (irun,nlev-1), FLXFCE(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1502 |
TRBFLX |
integer IBITSTB(irun,nlev),INTQ(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1540 |
TRBFLX |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1541 |
TRBFLX |
_RL XL0(irun,nlev),Q1(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1542 |
TRBFLX |
_RL WRKIT1(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1543 |
TRBFLX |
_RL WRKIT2(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1544 |
TRBFLX |
_RL WRKIT3(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1545 |
TRBFLX |
_RL WRKIT4(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1546 |
TRBFLX |
INTEGER INT1(irun,nlev), INT2(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
1599 |
TRBFLX |
wu(i,nlev) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
1602 |
TRBFLX |
wv(i,nlev) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
1804 |
TRBFLX |
call QSAT ( tl(i,nlev),pl(i,nlev),shsat(i,nlev),dum,.false. ) |
|
./pkg/fizhi/fizhi_turb.F |
1810 |
TRBFLX |
BB(I,NLEV) = BB(I,NLEV) * AA(I,NLEV) * plk(I,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
1831 |
TRBFLX |
1 ( TH(I,NLEV) + CLH * SHL(I,NLEV) * (1./plk(i,nlev)) ) |
|
./pkg/fizhi/fizhi_turb.F |
1833 |
TRBFLX |
1 * (1./plk(i,nlev)) * CLH - VRT1CON * TH(I,NLEV) |
|
./pkg/fizhi/fizhi_turb.F |
2033 |
TRBFLX |
2 NLEVML,nlev,irun) |
|
./pkg/fizhi/fizhi_turb.F |
2082 |
TRBFLX |
2 P3(1,LMINQ),NLEVML,nlev,irun) |
|
./pkg/fizhi/fizhi_turb.F |
2124 |
TRBFLX |
do L = 1,nlev-1 |
|
./pkg/fizhi/fizhi_turb.F |
2174 |
TRBFLX |
do L = 1,nlev-1 |
|
./pkg/fizhi/fizhi_turb.F |
2203 |
TRBFLX |
do L = 1,nlev |
|
./pkg/fizhi/fizhi_turb.F |
2208 |
TRBFLX |
do L = 1,nlev |
|
./pkg/fizhi/fizhi_turb.F |
2230 |
TRBFLX |
do L = 1,nlev |
|
./pkg/fizhi/fizhi_turb.F |
2235 |
TRBFLX |
do L = 1,nlev |
|
./pkg/fizhi/fizhi_turb.F |
2245 |
TRBFLX |
rhokdz(i,nlev) = 0.0 |
|
./pkg/fizhi/fizhi_turb.F |
2278 |
TRBFLX |
qqcolmin(i) = qq(i,nlev)*0.1 |
|
./pkg/fizhi/fizhi_turb.F |
2279 |
TRBFLX |
qqcolmax(i) = qq(i,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
2280 |
TRBFLX |
levpbl(i) = nlev |
|
./pkg/fizhi/fizhi_turb.F |
2282 |
TRBFLX |
DO L = nlev-1,1,-1 |
|
./pkg/fizhi/fizhi_turb.F |
2284 |
TRBFLX |
IF ( (qq(i,l).gt.qqcolmax(I)).and.(levpbl(i).eq.nlev))then |
|
./pkg/fizhi/fizhi_turb.F |
2288 |
TRBFLX |
if((qq(i,l).lt.qqcolmin(i)).and.(levpbl(i).eq.nlev)) |
|
./pkg/fizhi/fizhi_turb.F |
2294 |
TRBFLX |
if(lp.lt.nlev)then |
|
./pkg/fizhi/fizhi_turb.F |
2295 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,Lp+2)) + |
|
./pkg/fizhi/fizhi_turb.F |
2299 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,2)) + |
|
./pkg/fizhi/fizhi_turb.F |
2346 |
TRBFLX |
do i = 1,irun*nlev |
|
./pkg/fizhi/fizhi_turb.F |
3420 |
TRBLEN |
integer irun,nlev,init,lmin,lminq,lminq1 |
|
./pkg/fizhi/fizhi_turb.F |
3427 |
TRBLEN |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
3428 |
TRBLEN |
_RL XL0(irun,nlev),Q1(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
3429 |
TRBLEN |
_RL WRKIT1(irun,nlev-1),WRKIT2(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
3430 |
TRBLEN |
_RL WRKIT3(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
3431 |
TRBLEN |
_RL WRKIT4(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
3432 |
TRBLEN |
INTEGER INT1(irun,nlev), INT2(irun,nlev-1) |
|
./pkg/fizhi/fizhi_turb.F |
3660 |
TRBITP |
integer irun,nlev |
|
./pkg/fizhi/fizhi_turb.F |
3747 |
TRBL20 |
integer nlev,nlay,irun |
|
./pkg/fizhi/fizhi_turb.F |
3751 |
TRBL20 |
INTEGER INTSTB(irun,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
3850 |
TRBL25 |
integer nlev,nlay,irun |
|
./pkg/fizhi/fizhi_turb.F |
3949 |
TRBDIF |
integer nlev,itype,irun |
|
./pkg/fizhi/fizhi_turb.F |
3955 |
TRBDIF |
_RL AA(irun,nlev), BB(irun,nlev), CC(irun,nlev+1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1377 |
TRBFLX |
4 irun,nlev,nltop,NYMD,NHMS,grav,cp,rgas,faceps,virtcon,undef, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1423 |
TRBFLX |
integer nn,irun,nlev,nltop,ntrace,ntracedim,itrtrb,nhms,nymd |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1430 |
TRBFLX |
_RL tracers(irun,nlev+1,ntracedim) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1434 |
TRBFLX |
_RL SRI(irun,nlev), ET(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1435 |
TRBFLX |
_RL EU (irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1436 |
TRBFLX |
_RL WU(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1437 |
TRBFLX |
_RL WV (irun,nlev), pbldpth(irun) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1439 |
TRBFLX |
_RL freqdg(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1446 |
TRBFLX |
_RL dshdthg(irun,nlev),dthdthg(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1447 |
TRBFLX |
_RL dshdshg(irun,nlev),dthdshg(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1448 |
TRBFLX |
_RL transth(irun,nlev),transsh(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1450 |
TRBFLX |
_RL zetasave(irun),xlsave(irun,nlev),khsave(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1451 |
TRBFLX |
_RL qliq(irun,nlev),turbfcc(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1479 |
TRBFLX |
_RL ADZ1(irun,nlev), DZ1TMP(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1480 |
TRBFLX |
_RL DZ3(irun,nlev), TEMP(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1481 |
TRBFLX |
_RL DV(irun,nlev), DTHV(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1482 |
TRBFLX |
_RL DPK(irun,nlev), STRT(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1483 |
TRBFLX |
_RL DW2(irun,nlev), RI(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1484 |
TRBFLX |
_RL RHOZPK(irun,nlev), Q(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1485 |
TRBFLX |
_RL RIINIT(irun,nlev), DU(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1486 |
TRBFLX |
_RL QQINIT(irun,nlev), RHOKDZ(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1487 |
TRBFLX |
_RL RHODZ2(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1488 |
TRBFLX |
_RL KM(irun,nlev), KH(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1490 |
TRBFLX |
_RL DELTH (irun,nlev+1), DELSH (irun,nlev+1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1491 |
TRBFLX |
_RL FLXFAC (irun,nlev+1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1492 |
TRBFLX |
_RL FLXFPK (irun,nlev+1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1494 |
TRBFLX |
_RL ADZ2 (irun,nlev-1), RHODZ1(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1495 |
TRBFLX |
_RL VKZE (irun,nlev-1), VKZM (irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1496 |
TRBFLX |
_RL XL (irun,nlev-1), QXLM (irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1497 |
TRBFLX |
_RL QQE (irun,nlev-1), QE (irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1498 |
TRBFLX |
_RL P3 (irun,nlev-1), XQ (irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1499 |
TRBFLX |
_RL XLDIAG (irun,nlev-1), FLXFCE(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1502 |
TRBFLX |
integer IBITSTB(irun,nlev),INTQ(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1540 |
TRBFLX |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1541 |
TRBFLX |
_RL XL0(irun,nlev),Q1(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1542 |
TRBFLX |
_RL WRKIT1(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1543 |
TRBFLX |
_RL WRKIT2(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1544 |
TRBFLX |
_RL WRKIT3(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1545 |
TRBFLX |
_RL WRKIT4(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1546 |
TRBFLX |
INTEGER INT1(irun,nlev), INT2(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1599 |
TRBFLX |
wu(i,nlev) = 0. |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1602 |
TRBFLX |
wv(i,nlev) = 0. |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1804 |
TRBFLX |
call QSAT ( tl(i,nlev),pl(i,nlev),shsat(i,nlev),dum,.false. ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1810 |
TRBFLX |
BB(I,NLEV) = BB(I,NLEV) * AA(I,NLEV) * plk(I,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1831 |
TRBFLX |
1 ( TH(I,NLEV) + CLH * SHL(I,NLEV) * (1./plk(i,nlev)) ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
1833 |
TRBFLX |
1 * (1./plk(i,nlev)) * CLH - VRT1CON * TH(I,NLEV) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2033 |
TRBFLX |
2 NLEVML,nlev,irun) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2082 |
TRBFLX |
2 P3(1,LMINQ),NLEVML,nlev,irun) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2160 |
TRBFLX |
do L = 1,nlev-1 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2185 |
TRBFLX |
do L = 1,nlev |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2190 |
TRBFLX |
do L = 1,nlev |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2212 |
TRBFLX |
do L = 1,nlev |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2217 |
TRBFLX |
do L = 1,nlev |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2227 |
TRBFLX |
rhokdz(i,nlev) = 0.0 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2260 |
TRBFLX |
qqcolmin(i) = qq(i,nlev)*0.1 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2261 |
TRBFLX |
qqcolmax(i) = qq(i,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2262 |
TRBFLX |
levpbl(i) = nlev |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2264 |
TRBFLX |
DO L = nlev-1,1,-1 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2266 |
TRBFLX |
IF ( (qq(i,l).gt.qqcolmax(I)).and.(levpbl(i).eq.nlev))then |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2270 |
TRBFLX |
if((qq(i,l).lt.qqcolmin(i)).and.(levpbl(i).eq.nlev)) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2276 |
TRBFLX |
if(lp.lt.nlev)then |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2277 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,Lp+2)) + |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2281 |
TRBFLX |
pbldpth(I) = pbldpth(I) + ( (PLE(I,nlev+1)-PLE(I,2)) + |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
2328 |
TRBFLX |
do i = 1,irun*nlev |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3402 |
TRBLEN |
integer irun,nlev,init,lmin,lminq,lminq1 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3409 |
TRBLEN |
_RL DZITRP(irun,nlev-1),STBFCN(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3410 |
TRBLEN |
_RL XL0(irun,nlev),Q1(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3411 |
TRBLEN |
_RL WRKIT1(irun,nlev-1),WRKIT2(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3412 |
TRBLEN |
_RL WRKIT3(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3413 |
TRBLEN |
_RL WRKIT4(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3414 |
TRBLEN |
INTEGER INT1(irun,nlev), INT2(irun,nlev-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3642 |
TRBITP |
integer irun,nlev |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3729 |
TRBL20 |
integer nlev,nlay,irun |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3733 |
TRBL20 |
INTEGER INTSTB(irun,nlev) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3832 |
TRBL25 |
integer nlev,nlay,irun |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3931 |
TRBDIF |
integer nlev,itype,irun |
|
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F |
3937 |
TRBDIF |
_RL AA(irun,nlev), BB(irun,nlev), CC(irun,nlev+1) |