Symbol Description Uses
CLTOP 9



File Line number Procedure Code
./pkg/aim_v23/aim_diagnostics.F 189 AIM_DIAGNOSTICS
         CALL AIM_WRITE_PHYS( 'aimPhyDiag', suff, 1, CLTOP,
./pkg/aim_v23/aim_diagnostics.F 261 AIM_DIAGNOSTICS
     &        'aim_CLTOP',CLTOP(1,myThid),myThid)
./pkg/aim_v23/aim_diagnostics.F 299 AIM_DIAGNOSTICS
        CLTOP(J,myThid)=CLTOP(J,mythid)*CLOUDC(J,myThid)
./pkg/aim_v23/aim_diagnostics.F 330 AIM_DIAGNOSTICS
     &                          + CLTOP(I2,myThid)*DDTT
./pkg/aim_v23/aim_diagnostics.F 411 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 247 PHY_DRIVER
          CLTOP(J,myThid)=SIGH(ICLTOP(J)-1)*PSG_1(J)