Symbol Description Uses
RHCL1 15



File Line number Procedure Code
./pkg/aim/aim_read_physparms.F 123 AIM_READ_PHYSPARMS
     &    ALBCL, RHCL1, RHCL2, QACL
./pkg/aim/aim_read_physparms.F 235 AIM_READ_PHYSPARMS
       CALL WRITE_0D_R8( RHCL1, INDEX_NONE,'AIM_RAD:  RHCL1 =',
./pkg/aim/com_radcon.h 21 NO PROCEDURE
     &                ALBCL, RHCL1, RHCL2, QACL
./pkg/aim/com_radcon.h 24 NO PROCEDURE
      _RL ALBCL, RHCL1, RHCL2, QACL
./pkg/aim/phy_radiat.F 163 RADSW
      DRHCL=RHCL2-RHCL1
./pkg/aim/phy_radiat.F 178 RADSW
        CLOUDC(J)=MAX(CLOUDC(J),(RH(J,K)-RHCL1))
./pkg/aim/phy_inphys.F 150 INPHYS
      RHCL1 = 0.45 _d 0
./pkg/aim_v23/aim_readparms.F 182 AIM_READPARMS
     &    RHCL1,  RHCL2,  QACL1,  QACL2,  ALBCL,
./pkg/aim_v23/aim_readparms.F 404 AIM_READPARMS
       CALL WRITE_0D_R8( RHCL1, INDEX_NONE,'AIM_RAD:  RHCL1 =',
./pkg/aim_v23/com_radcon.h 30 NO PROCEDURE
      COMMON /RADCON/ RHCL1,  RHCL2,  QACL1,  QACL2,  ALBCL,
./pkg/aim_v23/com_radcon.h 34 NO PROCEDURE
      _RL  RHCL1,  RHCL2,  QACL1,  QACL2,  ALBCL
./pkg/aim_v23/phy_const.h 38 NO PROCEDURE
      RHCL1 = 0.45 _d 0
./pkg/aim_v23/phy_radiat.F 201 RADSW
      RRCL=1./(RHCL2-RHCL1)
./pkg/aim_v23/phy_radiat.F 225 RADSW
         IF (RH(J,K).GT.RHCL1.AND.QA(J,K).GT.QACL1) THEN
./pkg/aim_v23/phy_radiat.F 226 RADSW
            CLOUDC(J)=MAX(CLOUDC(J),RH(J,K)-RHCL1)