| Symbol | Description | Uses |
| PHIG1 | 5 |
| File | Line number | Procedure | Code |
| ./pkg/aim/com_physvar.h | 14 | NO PROCEDURE |
COMMON /PHYGR1/ UG1, VG1, TG1, QG1, PHIG1, PSLG1, Vsurfsq |
| ./pkg/aim/com_physvar.h | 19 | NO PROCEDURE |
_RL PHIG1(NGP,NLEV,MAX_NO_THREADS) |
| ./pkg/aim/aim_do_atmos_physics.F | 158 | AIM_DO_PHYSICS |
PHIG1(I2,Katm,myThid) = gravity*Hinitial(Katm) |
| ./pkg/aim/phy_driver.F | 100 | PDRIVER |
SE(J,K,myThid)=CP*TG1(J,K,myThid)+PHIG1(J,K,myThid) |
| ./pkg/aim/phy_driver.F | 196 | PDRIVER |
& VsurfSq(1,myThid),PHIG1(1,1,myThid), |