| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lwrad.F |
1438 |
IRRAD |
call H2OKDIS(ib,m,n,np,k2-1,fkw,gkw,ne,h2oexp,conexp, |
|
./pkg/fizhi/fizhi_lwrad.F |
2579 |
H2OKDIS |
subroutine H2OKDIS(ib,m,n,np,k,fkw,gkw,ne,h2oexp,conexp, |
|
./pkg/fizhi/fizhi_lwrad.F |
2617 |
H2OKDIS |
_RL fkw(6,9),gkw(6,3) |
|
./pkg/fizhi/fizhi_lwrad.F |
2696 |
H2OKDIS |
trnth2o = ( gkw(1,1)*th2o(i,j,1) |
|
./pkg/fizhi/fizhi_lwrad.F |
2697 |
H2OKDIS |
* + gkw(2,1)*th2o(i,j,2) |
|
./pkg/fizhi/fizhi_lwrad.F |
2698 |
H2OKDIS |
* + gkw(3,1)*th2o(i,j,3) |
|
./pkg/fizhi/fizhi_lwrad.F |
2699 |
H2OKDIS |
* + gkw(4,1)*th2o(i,j,4) |
|
./pkg/fizhi/fizhi_lwrad.F |
2700 |
H2OKDIS |
* + gkw(5,1)*th2o(i,j,5) |
|
./pkg/fizhi/fizhi_lwrad.F |
2701 |
H2OKDIS |
* + gkw(6,1)*th2o(i,j,6) ) * tcon(i,j,1) |
|
./pkg/fizhi/fizhi_lwrad.F |
2702 |
H2OKDIS |
* + ( gkw(1,2)*th2o(i,j,1) |
|
./pkg/fizhi/fizhi_lwrad.F |
2703 |
H2OKDIS |
* + gkw(2,2)*th2o(i,j,2) |
|
./pkg/fizhi/fizhi_lwrad.F |
2704 |
H2OKDIS |
* + gkw(3,2)*th2o(i,j,3) |
|
./pkg/fizhi/fizhi_lwrad.F |
2705 |
H2OKDIS |
* + gkw(4,2)*th2o(i,j,4) |
|
./pkg/fizhi/fizhi_lwrad.F |
2706 |
H2OKDIS |
* + gkw(5,2)*th2o(i,j,5) |
|
./pkg/fizhi/fizhi_lwrad.F |
2707 |
H2OKDIS |
* + gkw(6,2)*th2o(i,j,6) ) * tcon(i,j,2) |
|
./pkg/fizhi/fizhi_lwrad.F |
2708 |
H2OKDIS |
* + ( gkw(1,3)*th2o(i,j,1) |
|
./pkg/fizhi/fizhi_lwrad.F |
2709 |
H2OKDIS |
* + gkw(2,3)*th2o(i,j,2) |
|
./pkg/fizhi/fizhi_lwrad.F |
2710 |
H2OKDIS |
* + gkw(3,3)*th2o(i,j,3) |
|
./pkg/fizhi/fizhi_lwrad.F |
2711 |
H2OKDIS |
* + gkw(4,3)*th2o(i,j,4) |
|
./pkg/fizhi/fizhi_lwrad.F |
2712 |
H2OKDIS |
* + gkw(5,3)*th2o(i,j,5) |
|
./pkg/fizhi/fizhi_lwrad.F |
2713 |
H2OKDIS |
* + gkw(6,3)*th2o(i,j,6) ) * tcon(i,j,3) |
|
./pkg/fizhi/fizhi_lwrad.F |
585 |
IRRAD |
_RL xkw(9),aw(9),bw(9),pm(9),fkw(6,9),gkw(6,3),xke(9) |
|
./pkg/fizhi/fizhi_lwrad.F |
687 |
IRRAD |
data gkw/ 0.1782,0.0593,0.0215,0.0068,0.0022,0.0000, |