| Symbol | Description | Uses |
| WVSurf | weights for near surf interpolation (2-dim) | 6 |
| File | Line number | Procedure | Code |
| ./pkg/aim_v23/AIM_GRID.h | 16 | NO PROCEDURE |
COMMON /AIM_GRID_R/ fOrogr, WVSurf, snLat, csLat |
| ./pkg/aim_v23/AIM_GRID.h | 18 | NO PROCEDURE |
_RL WVSurf(NGP,MAX_NO_THREADS) |
| ./pkg/aim_v23/aim_dyn2aim.F | 251 | AIM_DYN2AIM |
WVSurf(I2,myThid) = 0. |
| ./pkg/aim_v23/aim_dyn2aim.F | 257 | AIM_DYN2AIM |
WVSurf(I2,myThid) = (LOG(PSA(I2))-SIGL(k))*WVI(k-1,1) |
| ./pkg/aim_v23/aim_dyn2aim.F | 264 | AIM_DYN2AIM |
& CALL AIM_WRITE_PHYS( 'aim_WeightSurf', '', 1, WVSurf, |
| ./pkg/aim_v23/phy_driver.F | 293 | PHY_DRIVER |
I WVSurf(1,myThid),csLat(1,myThid),fOrogr(1,myThid), |