Symbol Description Uses
coef1 8



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 2465 TABLUP
     *                  dwe,dpe,coef1,coef2,coef3,tran)
./pkg/fizhi/fizhi_lwrad.F 2509 TABLUP
      _RL coef1(nx,nh,nt),coef2(nx,nh,nt),coef3(nx,nh,nt)
./pkg/fizhi/fizhi_lwrad.F 2551 TABLUP
        pa = coef1(ip,iw-1,nn)*(1.-fp)+coef1(ip+1,iw-1,nn)*fp
./pkg/fizhi/fizhi_lwrad.F 2552 TABLUP
        pb = coef1(ip,iw,  nn)*(1.-fp)+coef1(ip+1,iw,  nn)*fp
./pkg/fizhi/fizhi_lwrad.F 2553 TABLUP
        pc = coef1(ip,iw+1,nn)*(1.-fp)+coef1(ip+1,iw+1,nn)*fp