Symbol Description Uses
irun 701


File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 879 ASTRO 
      integer nymd, nhms, irun
./pkg/fizhi/fizhi_clockstuff.F 880 ASTRO 
      _RL getcon, cosz(irun), alat(irun), alon(irun), ra
./pkg/fizhi/fizhi_gwdrag.F 297 GWDD 
     .                  grav,rgas,cp,irun,Lm,nthin,nbase,lstar )
./pkg/fizhi/fizhi_gwdrag.F 340 GWDD 
      integer irun,Lm
./pkg/fizhi/fizhi_gwdrag.F 341 GWDD 
      _RL ps(irun)
./pkg/fizhi/fizhi_gwdrag.F 342 GWDD 
      _RL u(irun,Lm), v(irun,Lm), t(irun,Lm)
./pkg/fizhi/fizhi_gwdrag.F 343 GWDD 
      _RL dudt(irun,Lm), dvdt(irun,Lm)
./pkg/fizhi/fizhi_gwdrag.F 344 GWDD 
      _RL xdrag(irun), ydrag(irun)
./pkg/fizhi/fizhi_gwdrag.F 345 GWDD 
      _RL std(irun)
./pkg/fizhi/fizhi_gwdrag.F 346 GWDD 
      _RL ple(irun,Lm+1), pl(irun,Lm), dpres(irun,Lm)
./pkg/fizhi/fizhi_gwdrag.F 348 GWDD 
      integer nthin(irun),nbase(irun)
./pkg/fizhi/fizhi_gwdrag.F 353 GWDD 
      _RL ubar(irun), vbar(irun), robar(irun)
./pkg/fizhi/fizhi_gwdrag.F 354 GWDD 
      _RL speed(irun), ang(irun)
./pkg/fizhi/fizhi_gwdrag.F 355 GWDD 
      _RL bv(irun,Lm)
./pkg/fizhi/fizhi_gwdrag.F 356 GWDD 
      _RL nbar(irun)
./pkg/fizhi/fizhi_gwdrag.F 358 GWDD 
      _RL XTENS(irun,Lm+1), YTENS(irun,Lm+1)
./pkg/fizhi/fizhi_gwdrag.F 359 GWDD 
      _RL TENSIO(irun,Lm+1)
./pkg/fizhi/fizhi_gwdrag.F 360 GWDD 
      _RL DRAGSF(irun)
./pkg/fizhi/fizhi_gwdrag.F 361 GWDD 
      _RL RO(irun,Lm), DZ(irun,Lm)
./pkg/fizhi/fizhi_gwdrag.F 363 GWDD 
      integer icrilv(irun)
./pkg/fizhi/fizhi_gwdrag.F 384 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 392 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 405 GWDD 
      do  i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 411 GWDD 
      do  i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 419 GWDD 
      do  i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 430 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 444 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 447 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 453 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 474 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 488 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 549 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 553 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 636 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 646 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 654 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_gwdrag.F 666 GWDD 
      do i = 1,irun
./pkg/fizhi/fizhi_moist.F 2371 RNEVP 
      integer nn,irun,nlay
./pkg/fizhi/fizhi_moist.F 2380 RNEVP 
      _RL cldlz(irun,nlay)
./pkg/fizhi/fizhi_moist.F 2381 RNEVP 
      _RL rhcrit(irun,nlay)
./pkg/fizhi/fizhi_moist.F 2400 RNEVP 
      _RL water(irun),crystal(irun)
./pkg/fizhi/fizhi_moist.F 2401 RNEVP 
      _RL watevap(irun),iceevap(irun)
./pkg/fizhi/fizhi_moist.F 2403 RNEVP 
      _RL rainmax(irun)
./pkg/fizhi/fizhi_moist.F 2439 RNEVP 
       do i = 1,irun
./pkg/fizhi/fizhi_moist.F 2534 RNEVP 
      do i = 1,irun
./pkg/fizhi/fizhi_moist.F 2585 SRCLOUDS 
      subroutine SRCLOUDS (th,q,plk,pl,plke,cloud,cldwat,irun,irise,
./pkg/fizhi/fizhi_moist.F 2612 SRCLOUDS 
      integer  irun,irise
./pkg/fizhi/fizhi_moist.F 2614 SRCLOUDS 
      _RL   th(irun,irise)
./pkg/fizhi/fizhi_moist.F 2615 SRCLOUDS 
      _RL    q(irun,irise)
./pkg/fizhi/fizhi_moist.F 2616 SRCLOUDS 
      _RL  plk(irun,irise)
./pkg/fizhi/fizhi_moist.F 2617 SRCLOUDS 
      _RL   pl(irun,irise)
./pkg/fizhi/fizhi_moist.F 2618 SRCLOUDS 
      _RL plke(irun,irise+1)
./pkg/fizhi/fizhi_moist.F 2620 SRCLOUDS 
      _RL  cloud(irun,irise)
./pkg/fizhi/fizhi_moist.F 2621 SRCLOUDS 
      _RL cldwat(irun,irise)
./pkg/fizhi/fizhi_moist.F 2622 SRCLOUDS 
      _RL     qs(irun,irise)
./pkg/fizhi/fizhi_moist.F 2629 SRCLOUDS 
      _RL rhc(irun,irise)
./pkg/fizhi/fizhi_moist.F 2646 SRCLOUDS 
      do i = 1,irun
./pkg/fizhi/fizhi_moist.F 2653 SRCLOUDS 
      do i  = 1,irun
./pkg/fizhi/fizhi_moist.F 2668 SRCLOUDS 
      call CTEI ( th,q,cloud,cldwat,pl,plk,plke,irun,irise )
./pkg/fizhi/fizhi_moist.F 2717 BACK2GRD 
      subroutine BACK2GRD(gathered,indeces,scattered,irun)
./pkg/fizhi/fizhi_moist.F 2719 BACK2GRD 
      integer i,irun,indeces(irun)
./pkg/fizhi/fizhi_moist.F 2720 BACK2GRD 
      _RL gathered(irun),scattered(irun)
./pkg/fizhi/fizhi_moist.F 2721 BACK2GRD 
      _RL temp(irun)
./pkg/fizhi/fizhi_moist.F 2722 BACK2GRD 
      do i = 1,irun
./pkg/fizhi/fizhi_moist.F 2725 BACK2GRD 
      do i = 1,irun
./pkg/fizhi/fizhi_turb.F 1438 TRBFLX 
     4 irun,nlev,nltop,NYMD,NHMS,grav,cp,rgas,faceps,virtcon,undef,
./pkg/fizhi/fizhi_turb.F 1484 TRBFLX 
      integer nn,irun,nlev,nltop,ntrace,ntracedim,itrtrb,nhms,nymd
./pkg/fizhi/fizhi_turb.F 1485 TRBFLX 
      _RL TH(irun,NLEV+1),THV(irun,NLEV+1),SH(irun,NLEV+1)
./pkg/fizhi/fizhi_turb.F 1486 TRBFLX 
      _RL U(irun,NLEV+1),V(irun,NLEV+1),QQ(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1487 TRBFLX 
      _RL PL(irun,NLEV),PLE(irun,NLEV+1),PLK(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1488 TRBFLX 
      _RL PLKE(irun,NLEV+1),DPSTR(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1489 TRBFLX 
      integer IWATER(irun)
./pkg/fizhi/fizhi_turb.F 1490 TRBFLX 
      _RL Z0(irun)
./pkg/fizhi/fizhi_turb.F 1491 TRBFLX 
      _RL tracers(irun,nlev+1,ntracedim)
./pkg/fizhi/fizhi_turb.F 1494 TRBFLX 
      _RL SWINDS(irun)
./pkg/fizhi/fizhi_turb.F 1495 TRBFLX 
      _RL SRI(irun,nlev), ET(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1496 TRBFLX 
      _RL EU (irun,nlev)
./pkg/fizhi/fizhi_turb.F 1497 TRBFLX 
      _RL WU(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1498 TRBFLX 
      _RL WV (irun,nlev), pbldpth(irun)
./pkg/fizhi/fizhi_turb.F 1499 TRBFLX 
      _RL sustar(irun), sz0(irun)
./pkg/fizhi/fizhi_turb.F 1500 TRBFLX 
      _RL freqdg(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1501 TRBFLX 
      _RL sct(irun), scu(irun)
./pkg/fizhi/fizhi_turb.F 1502 TRBFLX 
      _RL stu2m(irun),stv2m(irun),stt2m(irun),stq2m(irun)
./pkg/fizhi/fizhi_turb.F 1503 TRBFLX 
      _RL stu10m(irun),stv10m(irun),stt10m(irun),stq10m(irun)
./pkg/fizhi/fizhi_turb.F 1505 TRBFLX 
      _RL eturb(irun),dedqa(irun),dedtc(irun)
./pkg/fizhi/fizhi_turb.F 1506 TRBFLX 
      _RL hsturb(irun),dhsdqa(irun),dhsdtc(irun)
./pkg/fizhi/fizhi_turb.F 1507 TRBFLX 
      _RL dshdthg(irun,nlev),dthdthg(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1508 TRBFLX 
      _RL dshdshg(irun,nlev),dthdshg(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1509 TRBFLX 
      _RL transth(irun,nlev),transsh(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1510 TRBFLX 
      _RL ctsave(irun),xxsave(irun),yysave(irun)
./pkg/fizhi/fizhi_turb.F 1511 TRBFLX 
      _RL zetasave(irun),xlsave(irun,nlev),khsave(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1512 TRBFLX 
      _RL qliq(irun,nlev),turbfcc(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1529 TRBFLX 
      _RL AHS (irun), HS(irun)
./pkg/fizhi/fizhi_turb.F 1530 TRBFLX 
      _RL XX  (irun), YY(irun), CU(irun)
./pkg/fizhi/fizhi_turb.F 1531 TRBFLX 
      _RL CT(irun),  USTAR(irun)
./pkg/fizhi/fizhi_turb.F 1532 TRBFLX 
      _RL RIB(irun),   ZETA(irun), WS(irun)
./pkg/fizhi/fizhi_turb.F 1533 TRBFLX 
      _RL DTHS(irun), DELTHS(irun)
./pkg/fizhi/fizhi_turb.F 1534 TRBFLX 
      _RL DTHL(irun), DELTHL(irun)
./pkg/fizhi/fizhi_turb.F 1535 TRBFLX 
      _RL RIBIN(irun),CUIN(irun)
./pkg/fizhi/fizhi_turb.F 1536 TRBFLX 
      _RL CTIN(irun),ZETAIN(irun)
./pkg/fizhi/fizhi_turb.F 1537 TRBFLX 
      _RL USTARIN(irun),RHOSIN(irun),Z0IN(irun)
./pkg/fizhi/fizhi_turb.F 1538 TRBFLX 
      _RL qqcolmin(irun),qqcolmax(irun),levpbl(irun)
./pkg/fizhi/fizhi_turb.F 1540 TRBFLX 
      _RL ADZ1(irun,nlev), DZ1TMP(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1541 TRBFLX 
      _RL DZ3(irun,nlev), TEMP(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1542 TRBFLX 
      _RL DV(irun,nlev), DTHV(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1543 TRBFLX 
      _RL DPK(irun,nlev), STRT(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1544 TRBFLX 
      _RL DW2(irun,nlev), RI(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1545 TRBFLX 
      _RL RHOZPK(irun,nlev), Q(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1546 TRBFLX 
      _RL RIINIT(irun,nlev), DU(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1547 TRBFLX 
      _RL QQINIT(irun,nlev), RHOKDZ(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1548 TRBFLX 
      _RL RHODZ2(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1549 TRBFLX 
      _RL KM(irun,nlev), KH(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1551 TRBFLX 
      _RL DELTH  (irun,nlev+1), DELSH (irun,nlev+1)
./pkg/fizhi/fizhi_turb.F 1552 TRBFLX 
      _RL FLXFAC (irun,nlev+1)
./pkg/fizhi/fizhi_turb.F 1553 TRBFLX 
      _RL FLXFPK (irun,nlev+1)
./pkg/fizhi/fizhi_turb.F 1555 TRBFLX 
      _RL ADZ2   (irun,nlev-1), RHODZ1(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1556 TRBFLX 
      _RL VKZE   (irun,nlev-1), VKZM  (irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1557 TRBFLX 
      _RL XL     (irun,nlev-1), QXLM  (irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1558 TRBFLX 
      _RL QQE    (irun,nlev-1), QE    (irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1559 TRBFLX 
      _RL P3     (irun,nlev-1), XQ    (irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1560 TRBFLX 
      _RL XLDIAG (irun,nlev-1), FLXFCE(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1563 TRBFLX 
      integer IBITSTB(irun,nlev),INTQ(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1567 TRBFLX 
      _RL TL(irun,NLEV),DTH(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1568 TRBFLX 
      _RL DSH(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1569 TRBFLX 
      _RL SHL(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1570 TRBFLX 
      _RL AA(irun,NLEV),BB(irun,NLEV),SSDEV(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1571 TRBFLX 
      _RL ARG(irun,NLEV),XXZETA(irun),QBYU(irun)
./pkg/fizhi/fizhi_turb.F 1572 TRBFLX 
      _RL SVAR(irun,NLEV),Q1M(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1573 TRBFLX 
      _RL FCC(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1574 TRBFLX 
      _RL BETAT(irun,NLEV),BETAW(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1575 TRBFLX 
      _RL BETAL(irun,NLEV),BETAT1(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1576 TRBFLX 
      _RL BETAW1(irun,NLEV),SBAR(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1577 TRBFLX 
      _RL SHSAT(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1581 TRBFLX 
      integer IVBITRIB(irun)
./pkg/fizhi/fizhi_turb.F 1582 TRBFLX 
      _RL VHZ(irun)
./pkg/fizhi/fizhi_turb.F 1583 TRBFLX 
      _RL VH0(irun)
./pkg/fizhi/fizhi_turb.F 1584 TRBFLX 
      _RL VPSIM(irun),VAPSIM(irun)
./pkg/fizhi/fizhi_turb.F 1585 TRBFLX 
      _RL VPSIG(irun),VPSIHG(irun)
./pkg/fizhi/fizhi_turb.F 1586 TRBFLX 
      _RL VTEMP(irun),VDZETA(irun)
./pkg/fizhi/fizhi_turb.F 1587 TRBFLX 
      _RL VDZ0(irun),VDPSIM(irun)
./pkg/fizhi/fizhi_turb.F 1588 TRBFLX 
      _RL VDPSIH(irun),VZH(irun)
./pkg/fizhi/fizhi_turb.F 1589 TRBFLX 
      _RL VXX0(irun),VYY0(irun)
./pkg/fizhi/fizhi_turb.F 1590 TRBFLX 
      _RL VAPSIHG(irun),VRIB1(irun),VWS1(irun)
./pkg/fizhi/fizhi_turb.F 1591 TRBFLX 
      _RL VPSIH(irun),VZETAL(irun)
./pkg/fizhi/fizhi_turb.F 1592 TRBFLX 
      _RL VZ0L(irun),VPSIH2(irun)
./pkg/fizhi/fizhi_turb.F 1593 TRBFLX 
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 1594 TRBFLX 
      _RL VZ2(irun),VDZSEA(irun),VAZ0(irun),VXNUM1(irun)
./pkg/fizhi/fizhi_turb.F 1595 TRBFLX 
      _RL VPSIGB2(irun),VDX(irun),VDXPSIM(irun),VDY(irun)
./pkg/fizhi/fizhi_turb.F 1596 TRBFLX 
      _RL VXNUM2(irun),VDEN(irun),VAWS1(irun),VXNUM3(irun)
./pkg/fizhi/fizhi_turb.F 1597 TRBFLX 
      _RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun)
./pkg/fizhi/fizhi_turb.F 1598 TRBFLX 
      _RL VZCOEF2(irun),VZCOEF1(irun),VTEMPLIN(irun)
./pkg/fizhi/fizhi_turb.F 1599 TRBFLX 
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 1601 TRBFLX 
      _RL DZITRP(irun,nlev-1),STBFCN(irun,nlev)
./pkg/fizhi/fizhi_turb.F 1602 TRBFLX 
      _RL XL0(irun,nlev),Q1(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1603 TRBFLX 
      _RL WRKIT1(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1604 TRBFLX 
      _RL WRKIT2(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1605 TRBFLX 
      _RL WRKIT3(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1606 TRBFLX 
      _RL WRKIT4(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1607 TRBFLX 
      INTEGER INT1(irun,nlev), INT2(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 1618 TRBFLX 
      ISTNLV = irun * NLEV
./pkg/fizhi/fizhi_turb.F 1622 TRBFLX 
      ISTNM1 = irun * NLEVM1
./pkg/fizhi/fizhi_turb.F 1623 TRBFLX 
      ISTNM2 = irun * NLEVM2
./pkg/fizhi/fizhi_turb.F 1624 TRBFLX 
      ISTNP1 = irun * NLEVP1
./pkg/fizhi/fizhi_turb.F 1666 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1675 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1681 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1685 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1688 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1691 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1694 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1697 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1703 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1706 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1709 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1712 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1715 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1718 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1721 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1724 TRBFLX 
      do I =1,irun
./pkg/fizhi/fizhi_turb.F 1734 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1739 TRBFLX 
       DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 1755 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1765 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1771 TRBFLX 
      DO 9042 I =1,irun
./pkg/fizhi/fizhi_turb.F 1776 TRBFLX 
      DO 9044 I =1,irun
./pkg/fizhi/fizhi_turb.F 1783 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1787 TRBFLX 
      DO 9048 I =1,irun
./pkg/fizhi/fizhi_turb.F 1797 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1801 TRBFLX 
      DO 9052 I =1,irun
./pkg/fizhi/fizhi_turb.F 1807 TRBFLX 
      DO 9054 I =1,irun
./pkg/fizhi/fizhi_turb.F 1815 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1823 TRBFLX 
      DO 9058 I =1,irun
./pkg/fizhi/fizhi_turb.F 1842 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1863 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1869 TRBFLX 
      DO 9064 I =1,irun
./pkg/fizhi/fizhi_turb.F 1872 TRBFLX 
      DO 9066 I =1,irun
./pkg/fizhi/fizhi_turb.F 1879 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1883 TRBFLX 
      DO 9070 I =1,irun
./pkg/fizhi/fizhi_turb.F 1886 TRBFLX 
      DO 9074 I =1,irun
./pkg/fizhi/fizhi_turb.F 1896 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1907 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1915 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1919 TRBFLX 
      DO 9088 I =1,irun
./pkg/fizhi/fizhi_turb.F 1928 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1932 TRBFLX 
      DO 9092 I =1,irun
./pkg/fizhi/fizhi_turb.F 1942 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 1960 TRBFLX 
       DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 1968 TRBFLX 
      DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 1973 TRBFLX 
      DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 2017 TRBFLX 
     6   FIRST,LAST,N,irun,aitr,RHODZ2(1,NLEV),RHOZPK(1,NLEV),
./pkg/fizhi/fizhi_turb.F 2037 TRBFLX 
      DO 9098 I =1,irun
./pkg/fizhi/fizhi_turb.F 2050 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2064 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2076 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2083 TRBFLX 
      DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 2095 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2103 TRBFLX 
      DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 2126 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2159 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2182 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2190 TRBFLX 
      DO 9102 I =1,irun
./pkg/fizhi/fizhi_turb.F 2207 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2221 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2225 TRBFLX 
      DO 9108 I =1,irun
./pkg/fizhi/fizhi_turb.F 2228 TRBFLX 
      DO 9110 I =1,irun
./pkg/fizhi/fizhi_turb.F 2257 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2278 TRBFLX 
        DO 9116 I = 1,irun
./pkg/fizhi/fizhi_turb.F 2292 TRBFLX 
     2  DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun)
./pkg/fizhi/fizhi_turb.F 2299 TRBFLX 
     2   NLEVML,nlev,irun)
./pkg/fizhi/fizhi_turb.F 2309 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2317 TRBFLX 
     2  DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun)
./pkg/fizhi/fizhi_turb.F 2324 TRBFLX 
       ISTNML = irun * NLEVML
./pkg/fizhi/fizhi_turb.F 2334 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2359 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2381 TRBFLX 
     2    P3(1,LMINQ),NLEVML,nlev,irun)
./pkg/fizhi/fizhi_turb.F 2386 TRBFLX 
       ISTNML = irun * ( NLEV - LMIN )
./pkg/fizhi/fizhi_turb.F 2395 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2410 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2424 TRBFLX 
      DO 9118 I =1,irun
./pkg/fizhi/fizhi_turb.F 2438 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2447 TRBFLX 
        do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2460 TRBFLX 
      ISTNMQ = irun * NLEVMQ
./pkg/fizhi/fizhi_turb.F 2466 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2471 TRBFLX 
     1       FLXFCE(1,LMINQ1),DTHS,DELTHS,NLEVMQ,1,1.0 _d -20,irun)
./pkg/fizhi/fizhi_turb.F 2479 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2487 TRBFLX 
       ISTLMQ = irun * (LMINQ1-1)
./pkg/fizhi/fizhi_turb.F 2494 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2511 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2522 TRBFLX 
        do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2543 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2548 TRBFLX 
      DO 9132 I =1,irun
./pkg/fizhi/fizhi_turb.F 2551 TRBFLX 
       CALL TRBDIF(TH,DELTH,TEMP,FLXFPK,DTHS,DELTHS,NLEV,2,0. _d 0,irun)
./pkg/fizhi/fizhi_turb.F 2552 TRBFLX 
      do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2557 TRBFLX 
       do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2562 TRBFLX 
       do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2574 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2579 TRBFLX 
      DO 9140 I =1,irun
./pkg/fizhi/fizhi_turb.F 2584 TRBFLX 
     .                                     2,0. _d 0,irun)
./pkg/fizhi/fizhi_turb.F 2585 TRBFLX 
      do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2590 TRBFLX 
       do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2595 TRBFLX 
       do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2603 TRBFLX 
      do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2621 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2625 TRBFLX 
       CALL TRBDIF(U,V,RHOKDZ,FLXFAC,DTHS,DELTHS,NLEV,3,0. _d 0,irun)
./pkg/fizhi/fizhi_turb.F 2634 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2648 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2657 TRBFLX 
       do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2663 TRBFLX 
        DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 2672 TRBFLX 
       do i = 1,irun
./pkg/fizhi/fizhi_turb.F 2684 TRBFLX 
      do i=1,irun
./pkg/fizhi/fizhi_turb.F 2687 TRBFLX 
      do i=1,irun
./pkg/fizhi/fizhi_turb.F 2697 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2702 TRBFLX 
      DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2705 TRBFLX 
      DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2713 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2727 TRBFLX 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2731 TRBFLX 
       DO I = 1,irun
./pkg/fizhi/fizhi_turb.F 2746 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2760 TRBFLX 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 2823 SFCFLX 
      integer nn,n,irun
./pkg/fizhi/fizhi_turb.F 2835 SFCFLX 
      _RL stu2m(irun),stv2m(irun),stt2m(irun),stq2m(irun)
./pkg/fizhi/fizhi_turb.F 2836 SFCFLX 
      _RL stu10m(irun),stv10m(irun),stt10m(irun),stq10m(irun)
./pkg/fizhi/fizhi_turb.F 2838 SFCFLX 
      integer IVBITRIB(irun)
./pkg/fizhi/fizhi_turb.F 2839 SFCFLX 
      _RL VHZ(irun),VPSIM(irun),VAPSIM(irun),VPSIG(irun),VPSIHG(irun)
./pkg/fizhi/fizhi_turb.F 2840 SFCFLX 
      _RL VTEMP(irun),VDZETA(irun),VDZ0(irun),VDPSIM(irun)
./pkg/fizhi/fizhi_turb.F 2841 SFCFLX 
      _RL VDPSIH(irun),VZH(irun),VXX0(irun),VYY0(irun)
./pkg/fizhi/fizhi_turb.F 2842 SFCFLX 
      _RL VAPSIHG(irun),VRIB1(irun),VWS1(irun)
./pkg/fizhi/fizhi_turb.F 2843 SFCFLX 
      _RL VPSIH(irun),VZETAL(irun),VZ0L(irun),VPSIH2(irun),VH0(irun)
./pkg/fizhi/fizhi_turb.F 2844 SFCFLX 
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 2845 SFCFLX 
      _RL VZ2(irun),VDZSEA(irun),VAZ0(irun),VXNUM1(irun)
./pkg/fizhi/fizhi_turb.F 2846 SFCFLX 
      _RL VPSIGB2(irun),VDX(irun),VDXPSIM(irun),VDY(irun)
./pkg/fizhi/fizhi_turb.F 2847 SFCFLX 
      _RL VXNUM2(irun),VDEN(irun),VAWS1(irun),VXNUM3(irun)
./pkg/fizhi/fizhi_turb.F 2848 SFCFLX 
      _RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun)
./pkg/fizhi/fizhi_turb.F 2849 SFCFLX 
      _RL VZCOEF2(irun),VZCOEF1(irun),VTEMPLIN(irun)
./pkg/fizhi/fizhi_turb.F 2850 SFCFLX 
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 2866 SFCFLX 
      _RL psihdiag(irun),psimdiag(irun)
./pkg/fizhi/fizhi_turb.F 2903 SFCFLX 
      do i = 1,irun
./pkg/fizhi/fizhi_turb.F 3146 SFCFLX 
        do i = 1,irun
./pkg/fizhi/fizhi_turb.F 3151 SFCFLX 
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./pkg/fizhi/fizhi_turb.F 3152 SFCFLX 
        do i = 1,irun
./pkg/fizhi/fizhi_turb.F 3166 SFCFLX 
        do i = 1,irun
./pkg/fizhi/fizhi_turb.F 3170 SFCFLX 
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./pkg/fizhi/fizhi_turb.F 3171 SFCFLX 
        do i = 1,irun
./pkg/fizhi/fizhi_turb.F 3509 PSI 
      integer irun,iflag
./pkg/fizhi/fizhi_turb.F 3527 PSI 
      integer INTSTB(irun),INTZ0(irun)
./pkg/fizhi/fizhi_turb.F 3528 PSI 
      _RL ZZ0(irun),Z(irun),Z2(irun),Z1(irun),Z0(irun)
./pkg/fizhi/fizhi_turb.F 3529 PSI 
      _RL X0(irun),X1(irun),Y0(irun),Y1(irun)
./pkg/fizhi/fizhi_turb.F 3530 PSI 
      _RL PSI2(irun),TEMP(irun)
./pkg/fizhi/fizhi_turb.F 3531 PSI 
      _RL HZ(irun),ARG0(irun),ARG1(irun),DX(irun)
./pkg/fizhi/fizhi_turb.F 3532 PSI 
      _RL X0NUM(irun),X1NUM(irun),X0DEN(irun)
./pkg/fizhi/fizhi_turb.F 3533 PSI 
      _RL X1DEN(irun),Y1DEN(irun),Z2ZWM(irun)
./pkg/fizhi/fizhi_turb.F 3789 TRBLEN 
     2  DZITRP,STBFCN,XL0,Q1,WRKIT1,WRKIT2,WRKIT3,WRKIT4,irun)
./pkg/fizhi/fizhi_turb.F 3828 TRBLEN 
      integer irun,nlev,init,lmin,lminq,lminq1
./pkg/fizhi/fizhi_turb.F 3830 TRBLEN 
      _RL STRT(irun,NLEV),DW2(irun,NLEV),DZ3(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 3831 TRBLEN 
      _RL Q(irun,NLEV),VKZM(irun,NLEV-1),VKZE(irun,NLEV-1)
./pkg/fizhi/fizhi_turb.F 3832 TRBLEN 
      _RL DTHV(irun,NLEV),DPK(irun,NLEV),DU(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 3833 TRBLEN 
      _RL DV(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 3834 TRBLEN 
      _RL QXLM(irun,NLEV-1),XL(irun,NLEV-1)
./pkg/fizhi/fizhi_turb.F 3835 TRBLEN 
      _RL DZITRP(irun,nlev-1),STBFCN(irun,nlev)
./pkg/fizhi/fizhi_turb.F 3836 TRBLEN 
      _RL XL0(irun,nlev),Q1(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 3837 TRBLEN 
      _RL WRKIT1(irun,nlev-1),WRKIT2(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 3838 TRBLEN 
      _RL WRKIT3(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 3839 TRBLEN 
      _RL WRKIT4(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 3840 TRBLEN 
      INTEGER INT1(irun,nlev), INT2(irun,nlev-1)
./pkg/fizhi/fizhi_turb.F 3865 TRBLEN 
      ISTNLV = irun * NLEV
./pkg/fizhi/fizhi_turb.F 3866 TRBLEN 
      ISTNM1 = irun * NLEVM1
./pkg/fizhi/fizhi_turb.F 3878 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 3890 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 3898 TRBLEN 
      DO 30 I=1,irun
./pkg/fizhi/fizhi_turb.F 3911 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 3915 TRBLEN 
      DO 70 I=1,irun
./pkg/fizhi/fizhi_turb.F 3923 TRBLEN 
         ISTNML = irun*NLEVML
./pkg/fizhi/fizhi_turb.F 3927 TRBLEN 
     .              WRKIT1,WRKIT2,WRKIT3,WRKIT4,CP,irun )
./pkg/fizhi/fizhi_turb.F 3937 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 3944 TRBLEN 
      DO 90 I=1,irun
./pkg/fizhi/fizhi_turb.F 3954 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 3961 TRBLEN 
      DO 110 I=1,irun
./pkg/fizhi/fizhi_turb.F 3970 TRBLEN 
      DO 120 I = 1,irun
./pkg/fizhi/fizhi_turb.F 3976 TRBLEN 
      DO 130 I = 1,irun
./pkg/fizhi/fizhi_turb.F 3986 TRBLEN 
      DO 140 I = 1,irun
./pkg/fizhi/fizhi_turb.F 4002 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4014 TRBLEN 
                    ISTLMQ = irun * LMINQ1
./pkg/fizhi/fizhi_turb.F 4019 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4025 TRBLEN 
        ISTNMQ = irun * (NLEV-LMINQ)
./pkg/fizhi/fizhi_turb.F 4038 TRBLEN 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4059 TRBLEN 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4069 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4084 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4094 TRBLEN 
                   ISTNMQ = irun * (NLEV-LMINQ1)
./pkg/fizhi/fizhi_turb.F 4105 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4122 TRBLEN 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4134 TRBITP 
     .                    AAA,BBB,CCC,DDD,CP,irun )
./pkg/fizhi/fizhi_turb.F 4159 TRBITP 
      integer irun,nlev
./pkg/fizhi/fizhi_turb.F 4161 TRBITP 
      _RL STBFCN(irun,NLEV+1)
./pkg/fizhi/fizhi_turb.F 4162 TRBITP 
      integer INTCHG(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 4163 TRBITP 
      _RL DTHV(irun,NLEV+1),DPK(irun,NLEV+1)
./pkg/fizhi/fizhi_turb.F 4164 TRBITP 
      _RL DU(irun,NLEV+1),DV(irun,NLEV+1)
./pkg/fizhi/fizhi_turb.F 4165 TRBITP 
      _RL DZITRP(irun,NLEV+1)
./pkg/fizhi/fizhi_turb.F 4166 TRBITP 
      _RL AAA(irun,NLEV),BBB(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 4167 TRBITP 
      _RL CCC(irun,NLEV),DDD(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 4187 TRBITP 
      ISTNLV = irun*NLEV
./pkg/fizhi/fizhi_turb.F 4192 TRBITP 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4220 TRBITP 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4248 TRBL20 
     1                        nlay,irun)
./pkg/fizhi/fizhi_turb.F 4276 TRBL20 
      integer nlev,nlay,irun
./pkg/fizhi/fizhi_turb.F 4282 TRBL20 
      _RL RI(irun*NLEV,1),STRT(irun*NLEV,1),DW2(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 4283 TRBL20 
      _RL XL(irun*NLEV,1),ZKM(irun*NLEV,1), ZKH(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 4284 TRBL20 
      _RL QE(irun*NLEV,1),QQE(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 4285 TRBL20 
      INTEGER INTSTB(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 4286 TRBL20 
      _RL EE(irun*(nlay-1),1),RF(irun*(nlay-1),1)
./pkg/fizhi/fizhi_turb.F 4311 TRBL20 
      ISTNLV = irun * NLEV
./pkg/fizhi/fizhi_turb.F 4356 TRBL25 
     1                      nlay,irun)
./pkg/fizhi/fizhi_turb.F 4384 TRBL25 
      integer nlev,nlay,irun
./pkg/fizhi/fizhi_turb.F 4389 TRBL25 
      _RL Q(irun*NLEV,1),XL(irun*NLEV,1),STRT(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 4390 TRBL25 
      _RL DW2(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 4391 TRBL25 
      INTEGER INTSTB(irun*nlay,1), INTQ(irun*nlay,1)
./pkg/fizhi/fizhi_turb.F 4392 TRBL25 
      _RL ZKM(irun*NLEV,1),ZKH(irun*NLEV,1),P3(irun*NLEV,1)
./pkg/fizhi/fizhi_turb.F 4409 TRBL25 
      _RL F2(irun*(nlay-1),1),F3(irun*(nlay-1),1)
./pkg/fizhi/fizhi_turb.F 4410 TRBL25 
      _RL F4(irun*(nlay-1),1),XQ(irun*(nlay-1),1)
./pkg/fizhi/fizhi_turb.F 4415 TRBL25 
      ISTNLV = irun * NLEV
./pkg/fizhi/fizhi_turb.F 4448 TRBDIF 
     .                    ITYPE,EPSL,irun )
./pkg/fizhi/fizhi_turb.F 4487 TRBDIF 
      integer nlev,itype,irun
./pkg/fizhi/fizhi_turb.F 4488 TRBDIF 
      _RL XX1(irun,NLEV+1),XX2(irun,NLEV+1)
./pkg/fizhi/fizhi_turb.F 4489 TRBDIF 
      _RL RHOKDZ(irun,NLEV),FLXFAC(irun,NLEV+1)
./pkg/fizhi/fizhi_turb.F 4490 TRBDIF 
      _RL DXX1G(irun),DXX2G(irun)
./pkg/fizhi/fizhi_turb.F 4493 TRBDIF 
      _RL AA(irun,nlev), BB(irun,nlev), CC(irun,nlev+1)
./pkg/fizhi/fizhi_turb.F 4508 TRBDIF 
      DO 10 I=1,irun
./pkg/fizhi/fizhi_turb.F 4515 TRBDIF 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4524 TRBDIF 
       DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4536 TRBDIF 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4543 TRBDIF 
      CALL VTRI0(AA,BB,CC,XX1,XX1,NLEV,irun)
./pkg/fizhi/fizhi_turb.F 4548 TRBDIF 
      DO 50 I=1,irun
./pkg/fizhi/fizhi_turb.F 4553 TRBDIF 
      CALL VTRI1(AA,BB,XX2,NLEV,irun)
./pkg/fizhi/fizhi_turb.F 4554 TRBDIF 
      DO 60 I=1,irun
./pkg/fizhi/fizhi_turb.F 4561 TRBDIF 
      IF(ITYPE.EQ.3) CALL VTRI2 (AA,BB,CC,XX2,XX2,NLEV,irun)
./pkg/fizhi/fizhi_turb.F 4569 TRBDIF 
        DO I =1,irun
./pkg/fizhi/fizhi_turb.F 4577 VTRI0 
      SUBROUTINE VTRI0 ( A,B,C,F,Y,K,irun)
./pkg/fizhi/fizhi_turb.F 4580 VTRI0 
      integer k,irun
./pkg/fizhi/fizhi_turb.F 4581 VTRI0 
      _RL A(irun,K),B(irun,K),C(irun,K),Y(irun,K+1)
./pkg/fizhi/fizhi_turb.F 4582 VTRI0 
      _RL F(irun,K)
./pkg/fizhi/fizhi_turb.F 4586 VTRI0 
      DO 9000 I = 1,irun
./pkg/fizhi/fizhi_turb.F 4592 VTRI0 
       DO 9002 I = 1,irun
./pkg/fizhi/fizhi_turb.F 4600 VTRI0 
       DO 9004 I = 1,irun
./pkg/fizhi/fizhi_turb.F 4608 VTRI1 
      SUBROUTINE VTRI1 ( A,B,Y,K,irun)
./pkg/fizhi/fizhi_turb.F 4611 VTRI1 
      integer k,irun
./pkg/fizhi/fizhi_turb.F 4612 VTRI1 
      _RL A(irun,K),B(irun,K),Y(irun,K+1)
./pkg/fizhi/fizhi_turb.F 4617 VTRI1 
       DO 9000 I = 1,irun
./pkg/fizhi/fizhi_turb.F 4625 VTRI2 
      SUBROUTINE VTRI2 ( A,B,C,F,Y,K,irun)
./pkg/fizhi/fizhi_turb.F 4628 VTRI2 
      integer k,irun
./pkg/fizhi/fizhi_turb.F 4629 VTRI2 
      _RL A(irun,K),B(irun,K),C(irun,K),F(irun,K)
./pkg/fizhi/fizhi_turb.F 4630 VTRI2 
      _RL Y(irun,K+1)
./pkg/fizhi/fizhi_turb.F 4635 VTRI2 
       DO 9000 I = 1,irun
./pkg/fizhi/fizhi_turb.F 4641 VTRI2 
       DO 9002 I = 1,irun
./pkg/fizhi/fizhi_turb.F 4696 LINADJ 
      integer nn,irun,itype
./pkg/fizhi/fizhi_turb.F 4707 LINADJ 
      _RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun)
./pkg/fizhi/fizhi_turb.F 4708 LINADJ 
      _RL VZ2(irun),VDZSEA(irun),VAZ0(irun),VXNUM1(irun)
./pkg/fizhi/fizhi_turb.F 4709 LINADJ 
      _RL VPSIGB2(irun),VDX(irun),VDXPSIM(irun),VDY(irun)
./pkg/fizhi/fizhi_turb.F 4710 LINADJ 
      _RL VXNUM2(irun),VDEN(irun),VAWS1(irun),VXNUM3(irun)
./pkg/fizhi/fizhi_turb.F 4711 LINADJ 
      _RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun)
./pkg/fizhi/fizhi_turb.F 4712 LINADJ 
      _RL VZCOEF2(irun),VZCOEF1(irun),VTEMPLIN(irun)
./pkg/fizhi/fizhi_turb.F 4713 LINADJ 
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 4725 LINADJ 
      integer VINT1(irun),VINT2(irun)
./pkg/fizhi/fizhi_turb.F 4988 ZCSUB 
      integer irun
./pkg/fizhi/fizhi_utils.F 391 STRIPIT 
      subroutine STRIPIT(a,b,irun,ia,ib,l,k)
./pkg/fizhi/fizhi_utils.F 393 STRIPIT 
      integer ia,ib,irun,l,k
./pkg/fizhi/fizhi_utils.F 398 STRIPIT 
      Lena    = min(ib,irun-offset)
./pkg/fizhi/fizhi_utils.F 419 STRIPITINT 
      subroutine STRIPITINT(a,b,irun,ia,ib,l,k)
./pkg/fizhi/fizhi_utils.F 421 STRIPITINT 
      integer ia,ib,irun,l,k,a(ia,l),b(ib,l)
./pkg/fizhi/fizhi_utils.F 425 STRIPITINT 
      Lena = min(ib,irun-offset)
./pkg/fizhi/fizhi_utils.F 446 PASTIT 
      subroutine PASTIT(b,a,ib,ia,irun,L,k)
./pkg/fizhi/fizhi_utils.F 448 PASTIT 
      integer ib,ia,L,k,irun,Lena,offset
./pkg/fizhi/fizhi_utils.F 453 PASTIT 
      Lena    = min(ib,irun-offset)
./pkg/fizhi/fizhi_utils.F 463 PSTBITINT 
      subroutine PSTBITINT(b,a,ib,ia,irun,l,k)
./pkg/fizhi/fizhi_utils.F 465 PSTBITINT 
      integer ib,ia,L,k,irun,Lena,offset
./pkg/fizhi/fizhi_utils.F 471 PSTBITINT 
      Lena    = min(ib,irun-offset)
./pkg/fizhi/fizhi_utils.F 482 PSTBMPIT 
      subroutine PSTBMPIT(b,a,ib,ia,irun,l,k)
./pkg/fizhi/fizhi_utils.F 484 PSTBMPIT 
      integer ib,ia,L,k,irun,Lena,offset
./pkg/fizhi/fizhi_utils.F 489 PSTBMPIT 
      Lena    = min(ib,irun-offset)
./pkg/fizhi/fizhi_utils.F 499 STRIP2TILE 
      subroutine STRIP2TILE(a,indx,b,irun,ia,ib,levs,npeice)
./pkg/fizhi/fizhi_utils.F 519 STRIP2TILE 
      integer ia,ib,irun,levs,npeice
./pkg/fizhi/fizhi_utils.F 521 STRIP2TILE 
      integer indx(irun)
./pkg/fizhi/fizhi_utils.F 525 STRIP2TILE 
      Lena    = min(ib,irun-offset)
./pkg/fizhi/update_chemistry_exports.F 140 INTERP_QZ 
     .                         irun,bi,bj,xlat,nlevs,pres,qz_in,qz_out )
./pkg/fizhi/update_chemistry_exports.F 164 INTERP_QZ 
      integer irun,nlevs
./pkg/fizhi/update_chemistry_exports.F 165 INTERP_QZ 
      _RL xlat  (irun)
./pkg/fizhi/update_chemistry_exports.F 166 INTERP_QZ 
      _RL pres  (irun,nlevs)
./pkg/fizhi/update_chemistry_exports.F 167 INTERP_QZ 
      _RL qz_in (irun,nlevs)
./pkg/fizhi/update_chemistry_exports.F 168 INTERP_QZ 
      _RL qz_out(irun,nlevs)
./pkg/fizhi/update_chemistry_exports.F 178 INTERP_QZ 
      _RL h2o_time_lat (irun,nwatlevs)
./pkg/fizhi/update_chemistry_exports.F 179 INTERP_QZ 
      _RL       qz_clim(irun,nlevs)
./pkg/fizhi/update_chemistry_exports.F 181 INTERP_QZ 
      _RL  qpr1(irun), qpr2(irun), slope(irun)
./pkg/fizhi/update_chemistry_exports.F 182 INTERP_QZ 
      _RL   pr1(irun),  pr2(irun)
./pkg/fizhi/update_chemistry_exports.F 191 INTERP_QZ 
        DO 34   i = 1,irun
./pkg/fizhi/update_chemistry_exports.F 216 INTERP_QZ 
        do  i = 1,irun
./pkg/fizhi/update_chemistry_exports.F 228 INTERP_QZ 
        DO 44 i= 1, irun
./pkg/fizhi/update_chemistry_exports.F 250 INTERP_QZ 
      do i= 1, irun
./pkg/fizhi/update_chemistry_exports.F 263 INTERP_QZ 
      do i= 1, irun
./pkg/fizhi/update_chemistry_exports.F 279 INTERP_OZ 
     .                            irun,bi,bj,xlat,nlevs,plevs,ozrad)
./pkg/fizhi/update_chemistry_exports.F 295 INTERP_OZ 
      integer nozlevs,nozlats,irun,nlevs
./pkg/fizhi/update_chemistry_exports.F 298 INTERP_OZ 
      _RL xlat(irun)
./pkg/fizhi/update_chemistry_exports.F 299 INTERP_OZ 
      _RL plevs(irun,nlevs)
./pkg/fizhi/update_chemistry_exports.F 300 INTERP_OZ 
      _RL ozrad(irun,nlevs)
./pkg/chronos/chronos.F 730 ASTRO 
      integer nymd, nhms, irun
./pkg/chronos/chronos.F 731 ASTRO 
      _RL    cosz(irun), alat(irun), alon(irun), ra