| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_dyn2aim.F |
257 |
AIM_DYN2AIM |
WVSurf(I2,myThid) = (LOG(PSA(I2))-SIGL(k))*WVI(k-1,1) |
|
./pkg/aim_v23/com_physcon.h |
32 |
NO PROCEDURE |
& SIG, SIGL, SIGH, DSIG, GRDSIG, GRDSCP, WVI |
|
./pkg/aim_v23/com_physcon.h |
35 |
NO PROCEDURE |
_RL SIGL(NLEV) |
|
./pkg/aim_v23/phy_inphys.F |
102 |
INPHYS |
WVI(NLEV,2)=-SIGL(NLEV)*WVI(NLEV-1,2) |
|
./pkg/aim_v23/phy_inphys.F |
109 |
INPHYS |
& k,SIG(k),SIGH(k),SIGL(k),WVI(K,1),WVI(K,2) |
|
./pkg/aim_v23/phy_inphys.F |
83 |
INPHYS |
SIGL(K) = LOG(SIG(K)) |
|
./pkg/aim_v23/phy_inphys.F |
97 |
INPHYS |
WVI(K,1)=1./(SIGL(K+1)-SIGL(K)) |
|
./pkg/aim_v23/phy_inphys.F |
98 |
INPHYS |
WVI(K,2)=(LOG(SIGH(K))-SIGL(K))*WVI(K,1) |