File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2138 |
SAGPOL |
_RL one,expmin,e1,e2,e3,e4 |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2139 |
SAGPOL |
parameter (one=1.0, expmin=-10.0) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2143 |
SAGPOL |
if (fin .lt. expmin) fin = expmin |
./pkg/fizhi/fizhi_swrad.F |
2137 |
SAGPOL |
_RL one,expmin,e1,e2,e3,e4 |
./pkg/fizhi/fizhi_swrad.F |
2138 |
SAGPOL |
parameter (one=1.0, expmin=-10.0) |
./pkg/fizhi/fizhi_swrad.F |
2142 |
SAGPOL |
if (fin .lt. expmin) fin = expmin |