File |
Line number |
Procedure |
Code |
./pkg/fizhi/do_fizhi.F |
17 |
DO_FIZHI |
& duphy,dvphy,dthphy,dsphy) |
./pkg/fizhi/do_fizhi.F |
306 |
DO_FIZHI |
dsphy(i,j,L,bi,bj) = (moistq(i,j,L,1,bi,bj)+turbq(i,j,L,1,bi,bj)) |
./pkg/fizhi/do_fizhi.F |
95 |
DO_FIZHI |
_RL dsphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn) |
./pkg/fizhi/fizhi_coms.h |
23 |
NO PROCEDURE |
COMMON /physics_tendency/ duphy,dvphy,dthphy,dsphy |
./pkg/fizhi/fizhi_coms.h |
28 |
NO PROCEDURE |
_RL dsphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,nSx,nSy) |
./pkg/fizhi/fizhi_init_vars.F |
208 |
FIZHI_INIT_VARS |
dsphy(i,j,L,bi,bj) = 0. |
./pkg/fizhi/fizhi_wrapper.F |
275 |
FIZHI_WRAPPER |
& duphy,dvphy,dthphy,dsphy) |
./pkg/fizhi/fizhi_wrapper.F |
317 |
FIZHI_WRAPPER |
tempphy(i,j,Nrphys+1-L,bi,bj)=dsphy(i,j,L,bi,bj) |
./pkg/fizhi/step_fizhi_corr.F |
500 |
STEP_FIZHI_CORR |
. - dsphy(i,j,L,bi,bj) - sphytemp(i,j,L,bi,bj) ) * 86400. _d 0 |
./pkg/fizhi/step_fizhi_fg.F |
49 |
STEP_FIZHI_FG |
. Nrphys,Nsx,Nsy,1,sNx,1,sNy,bi,bj,duphy,dvphy,dthphy,dsphy) |
./pkg/fizhi/step_physics.F |
22 |
STEP_PHYSICS |
_RL dsphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy) |
./pkg/fizhi/step_physics.F |
33 |
STEP_PHYSICS |
sphy(i,j,L,bi,bj) = sphy(i,j,L,bi,bj) + dsphy(i,j,L,bi,bj) * dt |
./pkg/fizhi/step_physics.F |
7 |
STEP_PHYSICS |
. duphy,dvphy,dthphy,dsphy) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
17 |
DO_FIZHI |
& duphy,dvphy,dthphy,dsphy) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
202 |
DO_FIZHI |
dsphy(i,j,L,bi,bj)=0. |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
95 |
DO_FIZHI |
_RL dsphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
189 |
FIZHI_INIT_VARS |
dsphy(i,j,L,bi,bj) = 0. |