File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1247 |
SOLIR |
_RL ssacl(m,n,np),asycl(m,n,np) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1374 |
SOLIR |
asycl(i,j,k)=asyclt(i,j) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1438 |
SOLIR |
asyto=(asysto+asycl(i,j,k)*ssacl(i,j,k)*tauclb(i,j,k))/ |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1447 |
SOLIR |
asyto=(asysto+asycl(i,j,k)*ssacl(i,j,k)*tauclf(i,j,k))/ |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1671 |
SOLUV |
_RL taux,reff1,reff2,g1,g2,asycl(m,n,np) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1754 |
SOLUV |
asycl(i,j,k)=asyclt(i,j) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1815 |
SOLUV |
asyto=(asysto+asycl(i,j,k)*tauclb(i,j,k))/(ssato*tauto) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1823 |
SOLUV |
asyto=(asysto+asycl(i,j,k)*tauclf(i,j,k))/(ssato*tauto) |
./pkg/fizhi/fizhi_swrad.F |
1246 |
SOLIR |
_RL ssacl(m,n,np),asycl(m,n,np) |
./pkg/fizhi/fizhi_swrad.F |
1373 |
SOLIR |
asycl(i,j,k)=asyclt(i,j) |
./pkg/fizhi/fizhi_swrad.F |
1437 |
SOLIR |
asyto=(asysto+asycl(i,j,k)*ssacl(i,j,k)*tauclb(i,j,k))/ |
./pkg/fizhi/fizhi_swrad.F |
1446 |
SOLIR |
asyto=(asysto+asycl(i,j,k)*ssacl(i,j,k)*tauclf(i,j,k))/ |
./pkg/fizhi/fizhi_swrad.F |
1670 |
SOLUV |
_RL taux,reff1,reff2,g1,g2,asycl(m,n,np) |
./pkg/fizhi/fizhi_swrad.F |
1753 |
SOLUV |
asycl(i,j,k)=asyclt(i,j) |
./pkg/fizhi/fizhi_swrad.F |
1814 |
SOLUV |
asyto=(asysto+asycl(i,j,k)*tauclb(i,j,k))/(ssato*tauto) |
./pkg/fizhi/fizhi_swrad.F |
1822 |
SOLUV |
asyto=(asysto+asycl(i,j,k)*tauclf(i,j,k))/(ssato*tauto) |