| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_swrad.F |
1262 |
SOLIR |
_RL ssaclt(m,n),asyclt(m,n) |
|
./pkg/fizhi/fizhi_swrad.F |
1351 |
SOLIR |
asyclt(i,j)=1.0 |
|
./pkg/fizhi/fizhi_swrad.F |
1367 |
SOLIR |
asyclt(i,j)=(g1+g2)/(w1+w2) |
|
./pkg/fizhi/fizhi_swrad.F |
1381 |
SOLIR |
asycl(i,j,k)=asyclt(i,j) |
|
./pkg/fizhi/fizhi_swrad.F |
1682 |
SOLUV |
_RL asyclt(m,n) |
|
./pkg/fizhi/fizhi_swrad.F |
1742 |
SOLUV |
asyclt(i,j)=1.0 |
|
./pkg/fizhi/fizhi_swrad.F |
1752 |
SOLUV |
asyclt(i,j)=(g1+g2)/taux |
|
./pkg/fizhi/fizhi_swrad.F |
1761 |
SOLUV |
asycl(i,j,k)=asyclt(i,j) |