File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1004 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1011 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1015 |
TURBIO |
call DIAG_VEGTILE_FILL (stuflux,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1019 |
TURBIO |
call DIAG_VEGTILE_FILL (stvflux,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1028 |
TURBIO |
call DIAG_VEGTILE_FILL (sttflux,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1037 |
TURBIO |
call DIAG_VEGTILE_FILL (stqflux,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1041 |
TURBIO |
call DIAG_VEGTILE_FILL (sri,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1045 |
TURBIO |
call DIAG_VEGTILE_FILL (skh,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1049 |
TURBIO |
call DIAG_VEGTILE_FILL (skm,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1053 |
TURBIO |
call DIAG_VEGTILE_FILL (sct,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1057 |
TURBIO |
call DIAG_VEGTILE_FILL (scu,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1061 |
TURBIO |
call DIAG_VEGTILE_FILL (swinds,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1065 |
TURBIO |
call DIAG_VEGTILE_FILL (stuflux(1,nlay),igrd,chfrstr,istrip,nchp, |
./pkg/fizhi/fizhi_turb.F |
1069 |
TURBIO |
call DIAG_VEGTILE_FILL (stvflux(1,nlay),igrd,chfrstr,istrip,nchp, |
./pkg/fizhi/fizhi_turb.F |
1073 |
TURBIO |
call DIAG_VEGTILE_FILL (sustar,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1077 |
TURBIO |
call DIAG_VEGTILE_FILL (sz0,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1081 |
TURBIO |
call DIAG_VEGTILE_FILL (frqtrb,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1085 |
TURBIO |
call DIAG_VEGTILE_FILL (pbldpth,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1089 |
TURBIO |
call DIAG_VEGTILE_FILL (stu2m,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1093 |
TURBIO |
call DIAG_VEGTILE_FILL (stv2m,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1097 |
TURBIO |
call DIAG_VEGTILE_FILL (stt2m,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
10 |
TURBIO |
5 ,nchp,nchptot,nchplnd,chfr,chlt,chlon,igrd,ityp,alai,agrn,thkz |
./pkg/fizhi/fizhi_turb.F |
1108 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1112 |
TURBIO |
call DIAG_VEGTILE_FILL (stu10m,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1116 |
TURBIO |
call DIAG_VEGTILE_FILL (stv10m,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1120 |
TURBIO |
call DIAG_VEGTILE_FILL (stt10m,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1131 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1140 |
TURBIO |
call DIAG_VEGTILE_FILL (td,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1144 |
TURBIO |
call DIAG_VEGTILE_FILL (qa,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1148 |
TURBIO |
call DIAG_VEGTILE_FILL (swet1,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1152 |
TURBIO |
call DIAG_VEGTILE_FILL (swet2,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1156 |
TURBIO |
call DIAG_VEGTILE_FILL (swet3,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
115 |
TURBIO |
integer igrd(nchp),ityp(nchp) |
./pkg/fizhi/fizhi_turb.F |
1160 |
TURBIO |
call DIAG_VEGTILE_FILL (capacity,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1164 |
TURBIO |
call DIAG_VEGTILE_FILL (snowdepth,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
1214 |
TURBIO |
call MSC2GRD(igrd,chfr,dumsc(1,L),nchp,nchptot,fracland, |
./pkg/fizhi/fizhi_turb.F |
1216 |
TURBIO |
call MSC2GRD(igrd,chfr,dvmsc(1,L),nchp,nchptot,fracland, |
./pkg/fizhi/fizhi_turb.F |
1218 |
TURBIO |
call MSC2GRD(igrd,chfr,dtmsc(1,L),nchp,nchptot,fracland, |
./pkg/fizhi/fizhi_turb.F |
1221 |
TURBIO |
call MSC2GRD(igrd,chfr,dqmsc(1,L,nt),nchp,nchptot,fracland, |
./pkg/fizhi/fizhi_turb.F |
1224 |
TURBIO |
call MSC2GRD(igrd,chfr, tke(1,L),nchp,nchptot,fracland, |
./pkg/fizhi/fizhi_turb.F |
1227 |
TURBIO |
call MSC2GRD(igrd,chfr, fccmsc(1,L),nchp,nchptot,fracland, |
./pkg/fizhi/fizhi_turb.F |
1229 |
TURBIO |
call MSC2GRD(igrd,chfr,qliqmsc(1,L),nchp,nchptot,fracland, |
./pkg/fizhi/fizhi_turb.F |
1269 |
TURBIO |
call MSC2GRD(igrd,chfr,tground ,nchp,nchptot,fracland,tgz ,im,jm) |
./pkg/fizhi/fizhi_turb.F |
352 |
TURBIO |
call GRD2MSC(pz(1,1),im,jm,igrd,pmsc,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
354 |
TURBIO |
call GRD2MSC(tgz,im,jm,igrd,tground,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
359 |
TURBIO |
call GRD2MSC(tmpdiag,im,jm,igrd,alwcoeff,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
363 |
TURBIO |
call GRD2MSC(tmpdiag,im,jm,igrd,blwcoeff,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
367 |
TURBIO |
call GRD2MSC(tmpdiag,im,jm,igrd,pardiff,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
371 |
TURBIO |
call GRD2MSC(tmpdiag,im,jm,igrd,pardirct,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
375 |
TURBIO |
call GRD2MSC(tmpdiag,im,jm,igrd,netsw,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
379 |
TURBIO |
call GRD2MSC(tmpdiag,im,jm,igrd,netlw,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
380 |
TURBIO |
call GRD2MSC(thkz,im,jm,igrd,icethk,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
381 |
TURBIO |
call GRD2MSC(rainlsp,im,jm,igrd,lsprec,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
382 |
TURBIO |
call GRD2MSC(rainconv,im,jm,igrd,cnvprec,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
383 |
TURBIO |
call GRD2MSC(snowfall,im,jm,igrd,snowprec,nchp,nchptot) |
./pkg/fizhi/fizhi_turb.F |
458 |
TURBIO |
call MSC2GRD (igrd,chfr,qice,nchp,nchptot,fracland,tmpdiag,im,jm) |
./pkg/fizhi/fizhi_turb.F |
468 |
TURBIO |
call STRIP2TILE(uz,igrd,u,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
469 |
TURBIO |
call STRIP2TILE(vz,igrd,v,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
470 |
TURBIO |
call STRIP2TILE(tz,igrd,th,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
471 |
TURBIO |
call STRIP2TILE(qz(1,1,1,1),igrd,sh,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
472 |
TURBIO |
call STRIP2TILE(dpres,igrd,dpstr,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
473 |
TURBIO |
call STRIP2TILE(plz,igrd,p,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
474 |
TURBIO |
call STRIP2TILE(plze,igrd,pe,nchp,ijall,istrip,nlay+1,nn) |
./pkg/fizhi/fizhi_turb.F |
475 |
TURBIO |
call STRIP2TILE(pkz,igrd,pk,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
476 |
TURBIO |
call STRIP2TILE(pkht,igrd,pke,nchp,ijall,istrip,nlay+1,nn) |
./pkg/fizhi/fizhi_turb.F |
494 |
TURBIO |
call STRIPITINT (igrd,igrdstr,nchptot,nchp,istrip,1,nn) |
./pkg/fizhi/fizhi_turb.F |
561 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
611 |
TURBIO |
call DIAG_VEGTILE_FILL (stdiag,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
701 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
708 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
715 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
719 |
TURBIO |
call DIAG_VEGTILE_FILL (grnstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
723 |
TURBIO |
call DIAG_VEGTILE_FILL (laistrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
727 |
TURBIO |
call DIAG_VEGTILE_FILL (pardr,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
731 |
TURBIO |
call DIAG_VEGTILE_FILL (pardf,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
735 |
TURBIO |
call DIAG_VEGTILE_FILL (blwrad,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
739 |
TURBIO |
call DIAG_VEGTILE_FILL (dhsdtc,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
743 |
TURBIO |
call DIAG_VEGTILE_FILL (dedtc,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
747 |
TURBIO |
call DIAG_VEGTILE_FILL (dhsdqa,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
751 |
TURBIO |
call DIAG_VEGTILE_FILL (dedqa,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
755 |
TURBIO |
call DIAG_VEGTILE_FILL (hlwdwn,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
792 |
TURBIO |
call DIAG_VEGTILE_FILL (runoff,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
796 |
TURBIO |
call DIAG_VEGTILE_FILL (fwsoil,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
800 |
TURBIO |
call DIAG_VEGTILE_FILL (gdrain,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
804 |
TURBIO |
call DIAG_VEGTILE_FILL (smelt,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
808 |
TURBIO |
call DIAG_VEGTILE_FILL (eveg,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
812 |
TURBIO |
call DIAG_VEGTILE_FILL (esno,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
816 |
TURBIO |
call DIAG_VEGTILE_FILL (esoi,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
820 |
TURBIO |
call DIAG_VEGTILE_FILL (eint,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
824 |
TURBIO |
call DIAG_VEGTILE_FILL (evpot,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
828 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg1,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
832 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg2,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
836 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg3,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
840 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg4,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
844 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg5,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
848 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg6,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
852 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg7,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
856 |
TURBIO |
call DIAG_VEGTILE_FILL (strdg8,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_turb.F |
943 |
TURBIO |
call STRIP2TILE(uz(1,1,l),igrd,tmpstrip,nchp,ijall, |
./pkg/fizhi/fizhi_turb.F |
950 |
TURBIO |
call STRIP2TILE(vz(1,1,l),igrd,tmpstrip,nchp,ijall, |
./pkg/fizhi/fizhi_turb.F |
957 |
TURBIO |
call STRIP2TILE(tz(1,1,l),igrd,tmpstrip,nchp,ijall, |
./pkg/fizhi/fizhi_turb.F |
965 |
TURBIO |
call STRIP2TILE(qz(1,1,l,1),igrd,tmpstrip,nchp,ijall, |
./pkg/fizhi/fizhi_turb.F |
997 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
./pkg/fizhi/fizhi_land_coms.h |
19 |
NO PROCEDURE |
common /land_mapping/ chlt, chlon, igrd |
./pkg/fizhi/fizhi_land_coms.h |
22 |
NO PROCEDURE |
integer igrd(nchp,Nsx,Nsy) |
./pkg/fizhi/fizhi_wrapper.F |
143 |
FIZHI_WRAPPER |
. albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlt,chlon, |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
103 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
115 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
127 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
139 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
151 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
163 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
175 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
91 |
FIZHI_INIT_VEGSURFTILES |
call GRD2MSC(tempgrid,sNx,sNy,igrd,temptile,nchp,nchptot(bi,bj)) |
./pkg/fizhi/do_fizhi.F |
10 |
DO_FIZHI |
. albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlat,chlon, |
./pkg/fizhi/do_fizhi.F |
237 |
DO_FIZHI |
. chlon(1,bi,bj),igrd(1,bi,bj),nchptot(bi,bj),nchpland(bi,bj), |
./pkg/fizhi/do_fizhi.F |
60 |
DO_FIZHI |
integer ityp(nchp,Nsxin,Nsyin),igrd(nchp,Nsxin,Nsyin) |