| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
143 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,1,tempphy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
149 |
FIZHI_INIT_VARS |
uphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
154 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,1,tempphy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
158 |
FIZHI_INIT_VARS |
vphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
163 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,0,tempphy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
167 |
FIZHI_INIT_VARS |
thphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
173 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,0,tempphy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
177 |
FIZHI_INIT_VARS |
sphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
46 |
FIZHI_INIT_VARS |
_RL tempphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,nSx,nSy) |
|
./pkg/fizhi/step_fizhi_corr.F |
130 |
STEP_FIZHI_CORR |
tempphy(i,j,Nrphys+1-L,bi,bj) = uphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
134 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
139 |
STEP_FIZHI_CORR |
tempphy(i,j,Nrphys+1-L,bi,bj) = vphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
143 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
148 |
STEP_FIZHI_CORR |
tempphy(i,j,Nrphys+1-L,bi,bj) = thphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
152 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
157 |
STEP_FIZHI_CORR |
tempphy(i,j,Nrphys+1-L,bi,bj) = sphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
161 |
STEP_FIZHI_CORR |
call PHYS2DYN(tempphy,pephy,im1,im2,jm1,jm2,Nrphys,Nsx,Nsy, |
|
./pkg/fizhi/step_fizhi_corr.F |
205 |
STEP_FIZHI_CORR |
. 1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,1,tempphy) |
|
./pkg/fizhi/step_fizhi_corr.F |
210 |
STEP_FIZHI_CORR |
uphytemp(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
215 |
STEP_FIZHI_CORR |
. 1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,1,tempphy) |
|
./pkg/fizhi/step_fizhi_corr.F |
219 |
STEP_FIZHI_CORR |
vphytemp(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
224 |
STEP_FIZHI_CORR |
. 1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,0,tempphy) |
|
./pkg/fizhi/step_fizhi_corr.F |
228 |
STEP_FIZHI_CORR |
thphytemp(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
233 |
STEP_FIZHI_CORR |
. 1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,0,tempphy) |
|
./pkg/fizhi/step_fizhi_corr.F |
237 |
STEP_FIZHI_CORR |
sphytemp(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
47 |
STEP_FIZHI_CORR |
_RL tempphy(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
|
./pkg/fizhi/fizhi_init_vars.F |
143 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,1,tempphy) |
|
./pkg/fizhi/fizhi_init_vars.F |
149 |
FIZHI_INIT_VARS |
uphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_init_vars.F |
154 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,1,tempphy) |
|
./pkg/fizhi/fizhi_init_vars.F |
158 |
FIZHI_INIT_VARS |
vphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_init_vars.F |
163 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,0,tempphy) |
|
./pkg/fizhi/fizhi_init_vars.F |
167 |
FIZHI_INIT_VARS |
thphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_init_vars.F |
173 |
FIZHI_INIT_VARS |
. 1,sNx,1,sNy,bi,bj,windphy,pephy,ksurfC,Nrphys,nlperdyn,0,tempphy) |
|
./pkg/fizhi/fizhi_init_vars.F |
177 |
FIZHI_INIT_VARS |
sphy(i,j,Nrphys+1-L,bi,bj) = tempphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_init_vars.F |
46 |
FIZHI_INIT_VARS |
_RL tempphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,nSx,nSy) |
|
./pkg/fizhi/fizhi_wrapper.F |
117 |
FIZHI_WRAPPER |
tempphy(i,j,L,bi,bj) = pephy4fiz(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_wrapper.F |
123 |
FIZHI_WRAPPER |
call DIAGNOSTICS_FILL(tempphy,'FIZPRES ',0, |
|
./pkg/fizhi/fizhi_wrapper.F |
165 |
FIZHI_WRAPPER |
tempphy(i,j,Nrphys+1-L,bi,bj)=duphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_wrapper.F |
169 |
FIZHI_WRAPPER |
call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys, |
|
./pkg/fizhi/fizhi_wrapper.F |
174 |
FIZHI_WRAPPER |
tempphy(i,j,Nrphys+1-L,bi,bj)=dvphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_wrapper.F |
178 |
FIZHI_WRAPPER |
call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys, |
|
./pkg/fizhi/fizhi_wrapper.F |
183 |
FIZHI_WRAPPER |
tempphy(i,j,Nrphys+1-L,bi,bj)=dthphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_wrapper.F |
187 |
FIZHI_WRAPPER |
call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys, |
|
./pkg/fizhi/fizhi_wrapper.F |
192 |
FIZHI_WRAPPER |
tempphy(i,j,Nrphys+1-L,bi,bj)=dsphy(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_wrapper.F |
196 |
FIZHI_WRAPPER |
call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys, |
|
./pkg/fizhi/fizhi_wrapper.F |
43 |
FIZHI_WRAPPER |
_RL tempphy(1-OLx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |