| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
584 |
OPTHK |
_RL tauice, tauh2o, tauras |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
619 |
OPTHK |
tauh2o = max( 0.0020 _d 0, 0.200*min(200*lz(i,j,L)*1000, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
621 |
OPTHK |
tau(i,j,L,3) = fracls*alf*tauh2o*dp |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
625 |
OPTHK |
tauh2o = .12 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
626 |
OPTHK |
tau(i,j,L,2) = fracls*alf*tauh2o*dp |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
629 |
OPTHK |
tauh2o = max( 0.0020 _d 0, 0.120*min( 20*lz(i,j,L)*1000, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
631 |
OPTHK |
tau(i,j,L,3) = fracls*alf*tauh2o*dp |
|
./pkg/fizhi/fizhi_swrad.F |
583 |
OPTHK |
_RL tauice, tauh2o, tauras |
|
./pkg/fizhi/fizhi_swrad.F |
618 |
OPTHK |
tauh2o = max( 0.0020 _d 0, 0.200*min(200*lz(i,j,L)*1000, |
|
./pkg/fizhi/fizhi_swrad.F |
620 |
OPTHK |
tau(i,j,L,3) = fracls*alf*tauh2o*dp |
|
./pkg/fizhi/fizhi_swrad.F |
624 |
OPTHK |
tauh2o = .12 |
|
./pkg/fizhi/fizhi_swrad.F |
625 |
OPTHK |
tau(i,j,L,2) = fracls*alf*tauh2o*dp |
|
./pkg/fizhi/fizhi_swrad.F |
628 |
OPTHK |
tauh2o = max( 0.0020 _d 0, 0.120*min( 20*lz(i,j,L)*1000, |
|
./pkg/fizhi/fizhi_swrad.F |
630 |
OPTHK |
tau(i,j,L,3) = fracls*alf*tauh2o*dp |