Symbol Description Uses
CLTOP 9



File Line number Procedure Code
./pkg/aim_v23/aim_diagnostics.F 200 AIM_DIAGNOSTICS
         CALL AIM_WRITE_PHYS( 'aimPhyDiag.', suff, 1, CLTOP,
./pkg/aim_v23/aim_diagnostics.F 272 AIM_DIAGNOSTICS
     &        'aim_CLTOP',CLTOP(1,myThid),myThid)
./pkg/aim_v23/aim_diagnostics.F 310 AIM_DIAGNOSTICS
        CLTOP(J,myThid)=CLTOP(J,myThid)*CLOUDC(J,myThid)
./pkg/aim_v23/aim_diagnostics.F 341 AIM_DIAGNOSTICS
     &                          + CLTOP(I2,myThid)*DDTT
./pkg/aim_v23/aim_diagnostics.F 422 AIM_DIAGNOSTICS
        CALL DIAGNOSTICS_FILL( CLTOP(1,myThid),
./pkg/aim_v23/com_physvar.h 49 NO PROCEDURE
      COMMON /PHYGR3/      TS, TSKIN, T0, Q0, CLOUDC, CLTOP
./pkg/aim_v23/com_physvar.h 56 NO PROCEDURE
      _RL CLTOP (NGP,MAX_NO_THREADS)
./pkg/aim_v23/phy_driver.F 257 PHY_DRIVER
          CLTOP(J,myThid)=SIGH(ICLTOP(J)-1)*PSG_1(J)