Symbol Description Uses
transfc 5



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 1631 IRRAD
           transfc(i,j,k1) =trant(i,j)*fclr(i,j)
./pkg/fizhi/fizhi_lwrad.F 1642 IRRAD
         dfdts(i,j,k1) =dfdts(i,j,k1)-dbs(i,j)*transfc(i,j,k1)
./pkg/fizhi/fizhi_lwrad.F 1672 IRRAD
     *           flxd(i,j,np+1)*transfc(i,j,k)*(1.-emiss(i,j,ib))
./pkg/fizhi/fizhi_lwrad.F 607 IRRAD
      _RL trant(m,n),tranal(m,n),transfc(m,n,np+1),trantcr(m,n,np+1)
./pkg/fizhi/fizhi_lwrad.F 970 IRRAD
        transfc(i,j,np+1)=1.0