File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_driver.F |
104 |
FIZHI_DRIVER |
_RL rfu(im,jm,lm),rfv(im,jm,lm),rft(im,jm,lm) |
./pkg/fizhi/fizhi_driver.F |
227 |
FIZHI_DRIVER |
& bi,bj,rfu,rfv,rft) |
./pkg/fizhi/fizhi_rayleigh.F |
114 |
RAYLEIGH |
tmpdiag(i,j) = rfv(i,j,L)*86400 |
./pkg/fizhi/fizhi_rayleigh.F |
42 |
RAYLEIGH |
_RL rfu(im,jm,lm),rfv(im,jm,lm),rft(im,jm,lm) |
./pkg/fizhi/fizhi_rayleigh.F |
6 |
RAYLEIGH |
. bi,bj,rfu,rfv,rft) |
./pkg/fizhi/fizhi_rayleigh.F |
92 |
RAYLEIGH |
rfv(i,j,L) = - rf(i,j,L) * v(i,j,L) |
./pkg/fizhi/fizhi_rayleigh.F |
93 |
RAYLEIGH |
rft(i,j,L) = -(u(i,j,L)*rfu(i,j,L) + v(i,j,L)*rfv(i,j,L) )*cpinv |