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 |
1369 |
SOLIR |
ssacl(i,j,k)=ssaclt(i,j) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1436 |
SOLIR |
ssato=(ssatau+ssacl(i,j,k)*tauclb(i,j,k))/tauto+1.0e-8 |
./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 |
1445 |
SOLIR |
ssato=(ssatau+ssacl(i,j,k)*tauclf(i,j,k))/tauto+1.0e-8 |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
1447 |
SOLIR |
asyto=(asysto+asycl(i,j,k)*ssacl(i,j,k)*tauclf(i,j,k))/ |
./pkg/fizhi/fizhi_swrad.F |
1246 |
SOLIR |
_RL ssacl(m,n,np),asycl(m,n,np) |
./pkg/fizhi/fizhi_swrad.F |
1368 |
SOLIR |
ssacl(i,j,k)=ssaclt(i,j) |
./pkg/fizhi/fizhi_swrad.F |
1435 |
SOLIR |
ssato=(ssatau+ssacl(i,j,k)*tauclb(i,j,k))/tauto+1.0e-8 |
./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 |
1444 |
SOLIR |
ssato=(ssatau+ssacl(i,j,k)*tauclf(i,j,k))/tauto+1.0e-8 |
./pkg/fizhi/fizhi_swrad.F |
1446 |
SOLIR |
asyto=(asysto+asycl(i,j,k)*ssacl(i,j,k)*tauclf(i,j,k))/ |