Symbol Description Uses
PHI0 10



File Line number Procedure Code
./pkg/aim_v23/aim_do_physics.F 101 AIM_DO_PHYSICS
         PHI0(I2) = gravity*topoZ(i,j,bi,bj)
./pkg/aim_v23/aim_do_physics.F 110 AIM_DO_PHYSICS
        CALL SFLSET (PHI0, fOrogr(1,myThid), bi,bj,myThid)