| File |
Line number |
Procedure |
Code |
|
./pkg/gridalt/dyn2phys.F |
56 |
DYN2PHYS |
_RL dpkedyn, dpkephy, windsum, qd |
|
./pkg/gridalt/dyn2phys.F |
85 |
DYN2PHYS |
dpkephy = pephy(i,j,Lphy,bi,bj)-pephy(i,j,Lphy+1,bi,bj) |
|
./pkg/gridalt/dyn2phys.F |
86 |
DYN2PHYS |
windsum = windsum+(windphy(i,j,Lphy,bi,bj)*dpkephy)/dpkedyn |
|
./pkg/gridalt/phys2dyn.F |
51 |
PHYS2DYN |
_RL getcon, kappa, dpkephy, dpkedyn, sum |
|
./pkg/gridalt/phys2dyn.F |
78 |
PHYS2DYN |
dpkephy = pephy(i,j,Lphy,bi,bj)-pephy(i,j,Lphy+1,bi,bj) |
|
./pkg/gridalt/phys2dyn.F |
79 |
PHYS2DYN |
sum=sum+qphy(i,j,Lphy,bi,bj)*(dpkephy/dpkedyn) |