| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_gwdrag.F |
394 |
GWDD |
dz(i,L) = agrav*roiave*( pl(i,Lm+2-L)-pl(i,Lm+1-L) ) |
|
./pkg/fizhi/fizhi_gwdrag.F |
432 |
GWDD |
vai1 = (t(i,Lm+1-L)-t(i,Lm+2-L))/dz(i,L)+gocp |
|
./pkg/fizhi/fizhi_gwdrag.F |
513 |
GWDD |
delz = dz(i,L) |
|
./pkg/fizhi/fizhi_gwdrag.F |
570 |
GWDD |
vai1 = (t(i,Lm+1-L)-t(i,Lm+2-L))/dz(i,L)+gocp |
|
./pkg/fizhi/fizhi_gwdrag.F |
602 |
GWDD |
delz = dz(i,L) |
|
./pkg/fizhi/fizhi_rayleigh.F |
47 |
RAYLEIGH |
_RL dz(im,jm,lm) |
|
./pkg/fizhi/fizhi_rayleigh.F |
67 |
RAYLEIGH |
dz(i,j,L) = cpog * (pekap(i,j,L+1)-pekap(i,j,L)) * t(i,j,L) * |
|
./pkg/fizhi/fizhi_rayleigh.F |
75 |
RAYLEIGH |
z(i,j,lm) = zsurf(i,j) + 0.5 * dz(i,j,lm) |
|
./pkg/fizhi/fizhi_rayleigh.F |
82 |
RAYLEIGH |
z(i,j,L) = z(i,j,L+1) + 0.5 * (dz(i,j,L)+dz(i,j,L+1)) |