| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
248 |
DO_FIZHI |
& xlmt(1,1,bi,bj),khmt(1,1,bi,bj),tke(1,1,bi,bj), |
|
./pkg/fizhi/do_fizhi.F |
50 |
DO_FIZHI |
_RL tke(nchp,Nrphin,nSxIn,nSyIn) |
|
./pkg/fizhi/do_fizhi.F |
8 |
DO_FIZHI |
& ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke, |
|
./pkg/fizhi/fizhi_coms.h |
10 |
NO PROCEDURE |
& ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke |
|
./pkg/fizhi/fizhi_coms.h |
19 |
NO PROCEDURE |
_RL tke(nchp,Nrphys,nSx,nSy) |
|
./pkg/fizhi/fizhi_driver.F |
11 |
FIZHI_DRIVER |
& ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke, |
|
./pkg/fizhi/fizhi_driver.F |
205 |
FIZHI_DRIVER |
& ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke, |
|
./pkg/fizhi/fizhi_driver.F |
73 |
FIZHI_DRIVER |
_RL xlmt(nchp,lm),khmt(nchp,lm),tke(nchp,lm) |
|
./pkg/fizhi/fizhi_init_vars.F |
236 |
FIZHI_INIT_VARS |
tke(i,L,bi,bj) = 0. |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
187 |
FIZHI_WRITE_VEGTILES |
r8seg(n) = tke(n,k,bi,bj) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
348 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'tke', tke, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
449 |
FIZHI_READ_VEGTILES |
tke(n,k,bi,bj) = r8seg(n) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
85 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'tke', tke, myThid) |
|
./pkg/fizhi/fizhi_turb.F |
1159 |
TURBIO |
call MSC2GRD(igrd,chfr, tke(1,L),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
125 |
TURBIO |
_RL xlmt(nchp,nlay),khmt(nchp,nlay),tke(nchp,nlay) |
|
./pkg/fizhi/fizhi_turb.F |
28 |
TURBIO |
2 ,plz,plze,dpres,pkht,pkz,ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke |
|
./pkg/fizhi/fizhi_turb.F |
458 |
TURBIO |
call STRIPIT (tke,qq,nchptot,nchp,istrip,nlay-1,nn) |
|
./pkg/fizhi/fizhi_turb.F |
603 |
TURBIO |
call PASTIT (qq,tke,istrip,nchp,nchptot,nlay,nn) |
|
./pkg/fizhi/fizhi_wrapper.F |
266 |
FIZHI_WRAPPER |
& ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke, |
|
./pkg/my82/my82_calc.F |
116 |
MY82_CALC |
tke(I,J,K) = sqrt(tkesquare) |
|
./pkg/my82/my82_calc.F |
141 |
MY82_CALC |
GM(I,J) = GM(I,J) + tke(I,J,K)*rF(K) |
|
./pkg/my82/my82_calc.F |
142 |
MY82_CALC |
GH(I,J) = GH(I,J) + tke(I,J,K) |
|
./pkg/my82/my82_calc.F |
162 |
MY82_CALC |
tkel = MYhbl(I,J,bi,bj)*tke(I,J,K) |
|
./pkg/my82/my82_calc.F |
71 |
MY82_CALC |
_RL tke(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/my82/my82_calc.F |
90 |
MY82_CALC |
tke(I,J,K) = 0. _d 0 |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
50 |
DO_FIZHI |
_RL tke(nchp,Nrphin,nSxin,nSyin) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
8 |
DO_FIZHI |
& ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
217 |
FIZHI_INIT_VARS |
tke(i,L,bi,bj) = 0. |