| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lwrad.F |
1310 |
IRRAD |
tn2o(i,j,ik)=1.0 |
|
./pkg/fizhi/fizhi_lwrad.F |
1391 |
IRRAD |
tn2o(i,j,ik)=1.0 |
|
./pkg/fizhi/fizhi_lwrad.F |
1485 |
IRRAD |
call N2OKDIS(ib,m,n,np,k2-1,n2oexp,tn2o,trant) |
|
./pkg/fizhi/fizhi_lwrad.F |
1523 |
IRRAD |
* ,th2o,tcon,tco2,tn2o,trant) |
|
./pkg/fizhi/fizhi_lwrad.F |
2813 |
N2OKDIS |
subroutine N2OKDIS(ib,m,n,np,k,n2oexp,tn2o,tran) |
|
./pkg/fizhi/fizhi_lwrad.F |
2842 |
N2OKDIS |
_RL tn2o(m,n,4),tran(m,n) |
|
./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 |
2859 |
N2OKDIS |
xc= 0.940414*tn2o(i,j,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 |
2862 |
N2OKDIS |
xc=xc+0.059586*tn2o(i,j,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 |
2869 |
N2OKDIS |
xc= 0.561961*tn2o(i,j,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 |
2872 |
N2OKDIS |
xc=xc+0.138707*tn2o(i,j,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 |
2875 |
N2OKDIS |
xc=xc+0.240670*tn2o(i,j,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 |
2878 |
N2OKDIS |
xc=xc+0.058662*tn2o(i,j,4) |
|
./pkg/fizhi/fizhi_lwrad.F |
3078 |
B10KDIS |
* ,th2o,tcon,tco2,tn2o,tran) |
|
./pkg/fizhi/fizhi_lwrad.F |
3118 |
B10KDIS |
_RL th2o(m,n,6),tcon(m,n,3),tco2(m,n,6,2),tn2o(m,n,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 |
3203 |
B10KDIS |
xx= 0.970831*tn2o(i,j,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 |
3206 |
B10KDIS |
xx=xx+0.029169*tn2o(i,j,2) |
|
./pkg/fizhi/fizhi_lwrad.F |
598 |
IRRAD |
_RL tn2o(m,n,4),tch4(m,n,4),tcom(m,n,2) |