File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1242 |
SOLIR |
_RL aia(nband,3),awa(nband,3),aig(nband,3),awg(nband,3) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1283 |
SOLIR |
data aia/ |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1352 |
SOLIR |
w1=(1.-(aia(ib,1)+(aia(ib,2)+ |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1353 |
SOLIR |
* aia(ib,3)*reff1)*reff1))*taucld(i,j,k,1) |
./pkg/fizhi/fizhi_swrad.F |
1241 |
SOLIR |
_RL aia(nband,3),awa(nband,3),aig(nband,3),awg(nband,3) |
./pkg/fizhi/fizhi_swrad.F |
1282 |
SOLIR |
data aia/ |
./pkg/fizhi/fizhi_swrad.F |
1351 |
SOLIR |
w1=(1.-(aia(ib,1)+(aia(ib,2)+ |
./pkg/fizhi/fizhi_swrad.F |
1352 |
SOLIR |
* aia(ib,3)*reff1)*reff1))*taucld(i,j,k,1) |