Symbol Description Uses
clrhi 5



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 1255 IRRAD
          clrhi(i,j) = 1.0
./pkg/fizhi/fizhi_lwrad.F 1548 IRRAD
            clrhi(i,j)=min(clr(i,j,k2-1),clrhi(i,j))
./pkg/fizhi/fizhi_lwrad.F 1554 IRRAD
            fclr(i,j)=clrlw(i,j)*clrmd(i,j)*clrhi(i,j)
./pkg/fizhi/fizhi_lwrad.F 605 IRRAD
      _RL clrlw(m,n),clrmd(m,n),clrhi(m,n)