| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1000 |
TURBIO |
call STRIP2TILE(qz(1,1,l,1),igrd,tmpstrip,nchp,ijall, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1003 |
TURBIO |
tends(i) = ( sh(i,l)-tmpstrip(i) ) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1035 |
TURBIO |
tmpstrip(i) = stqflux(i,nlay) * 86400 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1037 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1042 |
TURBIO |
tmpstrip(i) = stqflux(i,nlay) * alhl |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1044 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1049 |
TURBIO |
tmpstrip(i) = sttflux(i,nlay) * cp |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1051 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1143 |
TURBIO |
tmpstrip(i) = stq2m(i) * 1000 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1145 |
TURBIO |
tmpstrip(i) = undef |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1148 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1166 |
TURBIO |
tmpstrip(i) = stq10m(i) * 1000 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1168 |
TURBIO |
tmpstrip(i) = undef |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1171 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
196 |
TURBIO |
_RL strdg9(istrip),tmpstrip(istrip),qicestr(istrip) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
559 |
TURBIO |
tmpstrip(i) = sh(i,nlay+1)*1000 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
561 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
723 |
TURBIO |
tmpstrip(i) = newsnow(i)*86400 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
725 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
730 |
TURBIO |
tmpstrip(i) = raincon(i)*86400 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
732 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
737 |
TURBIO |
tmpstrip(i) = rainls(i)*86400 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
739 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
973 |
TURBIO |
call STRIP2TILE(uz(1,1,l),igrd,tmpstrip,nchp,ijall, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
976 |
TURBIO |
tends(i) = ( u(i,l)-tmpstrip(i) ) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
980 |
TURBIO |
call STRIP2TILE(vz(1,1,l),igrd,tmpstrip,nchp,ijall, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
983 |
TURBIO |
tends(i) = ( v(i,l)-tmpstrip(i) ) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
987 |
TURBIO |
call STRIP2TILE(tz(1,1,l),igrd,tmpstrip,nchp,ijall, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
990 |
TURBIO |
tends(i) = ( th(i,l)-tmpstrip(i) ) |
|
./pkg/fizhi/fizhi_turb.F |
1002 |
TURBIO |
tmpstrip(i) = stqflux(i,nlay) * alhl |
|
./pkg/fizhi/fizhi_turb.F |
1004 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
1009 |
TURBIO |
tmpstrip(i) = sttflux(i,nlay) * cp |
|
./pkg/fizhi/fizhi_turb.F |
1011 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
1103 |
TURBIO |
tmpstrip(i) = stq2m(i) * 1000 |
|
./pkg/fizhi/fizhi_turb.F |
1105 |
TURBIO |
tmpstrip(i) = undef |
|
./pkg/fizhi/fizhi_turb.F |
1108 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
1126 |
TURBIO |
tmpstrip(i) = stq10m(i) * 1000 |
|
./pkg/fizhi/fizhi_turb.F |
1128 |
TURBIO |
tmpstrip(i) = undef |
|
./pkg/fizhi/fizhi_turb.F |
1131 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
196 |
TURBIO |
_RL strdg9(istrip),tmpstrip(istrip),qicestr(istrip) |
|
./pkg/fizhi/fizhi_turb.F |
559 |
TURBIO |
tmpstrip(i) = sh(i,nlay+1)*1000 |
|
./pkg/fizhi/fizhi_turb.F |
561 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
699 |
TURBIO |
tmpstrip(i) = newsnow(i)*86400 |
|
./pkg/fizhi/fizhi_turb.F |
701 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
706 |
TURBIO |
tmpstrip(i) = raincon(i)*86400 |
|
./pkg/fizhi/fizhi_turb.F |
708 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
713 |
TURBIO |
tmpstrip(i) = rainls(i)*86400 |
|
./pkg/fizhi/fizhi_turb.F |
715 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,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 |
946 |
TURBIO |
tends(i) = ( u(i,l)-tmpstrip(i) ) |
|
./pkg/fizhi/fizhi_turb.F |
950 |
TURBIO |
call STRIP2TILE(vz(1,1,l),igrd,tmpstrip,nchp,ijall, |
|
./pkg/fizhi/fizhi_turb.F |
953 |
TURBIO |
tends(i) = ( v(i,l)-tmpstrip(i) ) |
|
./pkg/fizhi/fizhi_turb.F |
957 |
TURBIO |
call STRIP2TILE(tz(1,1,l),igrd,tmpstrip,nchp,ijall, |
|
./pkg/fizhi/fizhi_turb.F |
960 |
TURBIO |
tends(i) = ( th(i,l)-tmpstrip(i) ) |
|
./pkg/fizhi/fizhi_turb.F |
965 |
TURBIO |
call STRIP2TILE(qz(1,1,l,1),igrd,tmpstrip,nchp,ijall, |
|
./pkg/fizhi/fizhi_turb.F |
968 |
TURBIO |
tends(i) = ( sh(i,l)-tmpstrip(i) ) |
|
./pkg/fizhi/fizhi_turb.F |
995 |
TURBIO |
tmpstrip(i) = stqflux(i,nlay) * 86400 |
|
./pkg/fizhi/fizhi_turb.F |
997 |
TURBIO |
call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_lwrad.F |
226 |
LWRIO |
tmpstrip(i,L) = flx(i,L) |
|
./pkg/fizhi/fizhi_lwrad.F |
269 |
LWRIO |
CALL PASTE ( tmpstrip ,tmpimjm ,ISTRIP,im*jm,lm,NN ) |
|
./pkg/fizhi/fizhi_lwrad.F |
69 |
LWRIO |
_RL tmpstrip(istrip,lm) |