| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_swrad.F |
1252 |
SOLIR |
_RL tauwv,tausto,ssatau,asysto,tauto,ssato,asyto |
|
./pkg/fizhi/fizhi_swrad.F |
1388 |
SOLIR |
tauwv=xk(ik)*wh(i,j,k) |
|
./pkg/fizhi/fizhi_swrad.F |
1393 |
SOLIR |
tausto=tauwv+taual(i,j,k)+1.0e-8 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_swrad.F |
1252 |
SOLIR |
_RL tauwv,tausto,ssatau,asysto,tauto,ssato,asyto |
|
./verification/fizhi-cs-aqualev20/code/fizhi_swrad.F |
1388 |
SOLIR |
tauwv=xk(ik)*wh(i,j,k) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_swrad.F |
1393 |
SOLIR |
tausto=tauwv+taual(i,j,k)+1.0e-8 |