File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_fillnegs.F |
163 |
TRACER_FILL |
dyp(i,j) = ( dyv(i,j)+dyv(i,j-1) )*0.5 |
./pkg/fizhi/fizhi_fillnegs.F |
167 |
TRACER_FILL |
dyp(i,2) = dyv(i,1) |
./pkg/fizhi/fizhi_fillnegs.F |
168 |
TRACER_FILL |
dyp(i,jm-1) = dyv(i,jm-1) |
./pkg/fizhi/fizhi_fillnegs.F |
175 |
TRACER_FILL |
d2p(i,j) = 0.5*( dxv(i,j)+dxv(i,j-1) )*dyp(i,j) |
./pkg/fizhi/fizhi_fillnegs.F |
179 |
TRACER_FILL |
d2p(i,2) = dxv(i,2) *dyp(i,2) |
./pkg/fizhi/fizhi_fillnegs.F |
180 |
TRACER_FILL |
d2p(i,jm-1) = dxv(i,jm-2)*dyp(i,jm-1) |
./pkg/fizhi/fizhi_fillnegs.F |
99 |
TRACER_FILL |
_RL dyp(im,jm) |