Symbol Description Uses
n2oexp 40



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 1164 IRRAD
        call N2OEXPS(ib,m,n,np,dn2o,pa,dt,n2oexp)
./pkg/fizhi/fizhi_lwrad.F 1220 IRRAD
     *              ,h2oexp,conexp,co2exp,n2oexp)
./pkg/fizhi/fizhi_lwrad.F 1485 IRRAD
          call N2OKDIS(ib,m,n,np,k2-1,n2oexp,tn2o,trant)
./pkg/fizhi/fizhi_lwrad.F 1522 IRRAD
          call B10KDIS(m,n,np,k2-1,h2oexp,conexp,co2exp,n2oexp
./pkg/fizhi/fizhi_lwrad.F 2048 N2OEXPS
      subroutine N2OEXPS(ib,m,n,np,dn2o,pa,dt,n2oexp)
./pkg/fizhi/fizhi_lwrad.F 2073 N2OEXPS
      _RL n2oexp(m,n,np,4)
./pkg/fizhi/fizhi_lwrad.F 2090 N2OEXPS
           n2oexp(i,j,k,1)=exp(-xc*6.31582e-2)
./pkg/fizhi/fizhi_lwrad.F 2092 N2OEXPS
           xc=n2oexp(i,j,k,1)*n2oexp(i,j,k,1)*n2oexp(i,j,k,1)
./pkg/fizhi/fizhi_lwrad.F 2095 N2OEXPS
           n2oexp(i,j,k,2)=xc*xc1*xc2
./pkg/fizhi/fizhi_lwrad.F 2103 N2OEXPS
           n2oexp(i,j,k,1)=exp(-xc*5.35779e-2)
./pkg/fizhi/fizhi_lwrad.F 2105 N2OEXPS
           xc=n2oexp(i,j,k,1)*n2oexp(i,j,k,1)
./pkg/fizhi/fizhi_lwrad.F 2107 N2OEXPS
           n2oexp(i,j,k,2)=xc*xc
./pkg/fizhi/fizhi_lwrad.F 2108 N2OEXPS
           xc=n2oexp(i,j,k,2)*n2oexp(i,j,k,2)
./pkg/fizhi/fizhi_lwrad.F 2110 N2OEXPS
           n2oexp(i,j,k,3)=xc*xc
./pkg/fizhi/fizhi_lwrad.F 2111 N2OEXPS
           xc=n2oexp(i,j,k,3)*n2oexp(i,j,k,3)
./pkg/fizhi/fizhi_lwrad.F 2113 N2OEXPS
           n2oexp(i,j,k,4)=xc*xc
./pkg/fizhi/fizhi_lwrad.F 2332 B10EXPS
     *          ,h2oexp,conexp,co2exp,n2oexp)
./pkg/fizhi/fizhi_lwrad.F 2362 B10EXPS
     *    ,n2oexp(m,n,np,4)
./pkg/fizhi/fizhi_lwrad.F 2448 B10EXPS
           n2oexp(i,j,k,1)=exp(-xx*0.25238)
./pkg/fizhi/fizhi_lwrad.F 2450 B10EXPS
           xx=n2oexp(i,j,k,1)*n2oexp(i,j,k,1)
./pkg/fizhi/fizhi_lwrad.F 2455 B10EXPS
           n2oexp(i,j,k,2)=xx*xx1*xx2*xx3
./pkg/fizhi/fizhi_lwrad.F 2813 N2OKDIS
      subroutine N2OKDIS(ib,m,n,np,k,n2oexp,tn2o,tran)
./pkg/fizhi/fizhi_lwrad.F 2838 N2OKDIS
      _RL n2oexp(m,n,np,4)
./pkg/fizhi/fizhi_lwrad.F 2858 N2OKDIS
           tn2o(i,j,1)=tn2o(i,j,1)*n2oexp(i,j,k,1)
./pkg/fizhi/fizhi_lwrad.F 2861 N2OKDIS
           tn2o(i,j,2)=tn2o(i,j,2)*n2oexp(i,j,k,2)
./pkg/fizhi/fizhi_lwrad.F 2868 N2OKDIS
           tn2o(i,j,1)=tn2o(i,j,1)*n2oexp(i,j,k,1)
./pkg/fizhi/fizhi_lwrad.F 2871 N2OKDIS
           tn2o(i,j,2)=tn2o(i,j,2)*n2oexp(i,j,k,2)
./pkg/fizhi/fizhi_lwrad.F 2874 N2OKDIS
           tn2o(i,j,3)=tn2o(i,j,3)*n2oexp(i,j,k,3)
./pkg/fizhi/fizhi_lwrad.F 2877 N2OKDIS
           tn2o(i,j,4)=tn2o(i,j,4)*n2oexp(i,j,k,4)
./pkg/fizhi/fizhi_lwrad.F 3077 B10KDIS
      subroutine B10KDIS(m,n,np,k,h2oexp,conexp,co2exp,n2oexp
./pkg/fizhi/fizhi_lwrad.F 3114 B10KDIS
     *    ,n2oexp(m,n,np,4)
./pkg/fizhi/fizhi_lwrad.F 3202 B10KDIS
           tn2o(i,j,1)=tn2o(i,j,1)*n2oexp(i,j,k,1)
./pkg/fizhi/fizhi_lwrad.F 3205 B10KDIS
           tn2o(i,j,2)=tn2o(i,j,2)*n2oexp(i,j,k,2)
./pkg/fizhi/fizhi_lwrad.F 601 IRRAD
      _RL n2oexp(m,n,np,4),ch4exp(m,n,np,4),comexp(m,n,np,2)