| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
583 |
OPTHK |
_RL dp, alf, fracls, fraccu |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
601 |
OPTHK |
fraccu = 1.0-fracls |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
639 |
OPTHK |
tau(i,j,L,3) = tau(i,j,L,3) + fraccu*tauras*dp |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
642 |
OPTHK |
tau(i,j,L,1) = tau(i,j,L,1) + fraccu*tauras*dp |
|
./pkg/fizhi/fizhi_swrad.F |
582 |
OPTHK |
_RL dp, alf, fracls, fraccu |
|
./pkg/fizhi/fizhi_swrad.F |
600 |
OPTHK |
fraccu = 1.0-fracls |
|
./pkg/fizhi/fizhi_swrad.F |
638 |
OPTHK |
tau(i,j,L,3) = tau(i,j,L,3) + fraccu*tauras*dp |
|
./pkg/fizhi/fizhi_swrad.F |
641 |
OPTHK |
tau(i,j,L,1) = tau(i,j,L,1) + fraccu*tauras*dp |