File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_fillnegs.F |
121 |
TRACER_FILL |
phi(j) = phi(j-1) + dphi(j-1) |
./pkg/fizhi/fizhi_fillnegs.F |
135 |
TRACER_FILL |
dyv(i,j) = a*dphi(j) |
./pkg/fizhi/fizhi_fillnegs.F |
139 |
TRACER_FILL |
dyv(i,1) = a*(dphi(1) +0.5*dphi(2) ) |
./pkg/fizhi/fizhi_fillnegs.F |
140 |
TRACER_FILL |
dyv(i,jm-1) = a*(dphi(jm-1)+0.5*dphi(jm-2)) |
./pkg/fizhi/fizhi_fillnegs.F |
58 |
TRACER_FILL |
subroutine TRACER_FILL ( pq,im,jm,lm,dlam,dphi,dp) |
./pkg/fizhi/fizhi_fillnegs.F |
85 |
TRACER_FILL |
_RL pq(im,jm,lm),dlam(im),dphi(jm),dp(im,jm,lm) |