| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
166 |
DO_FIZHI |
S0 = getcon('S0') |
|
./pkg/fizhi/do_fizhi.F |
179 |
DO_FIZHI |
radswt(i,j,bi,bj) = S0*(1.0/ra**2)*cosz(i,j) |
|
./verification/fizhi-cs-aqualev20/code/do_fizhi.F |
167 |
DO_FIZHI |
S0 = getcon('S0') |
|
./verification/fizhi-cs-aqualev20/code/do_fizhi.F |
180 |
DO_FIZHI |
radswt(i,j,bi,bj) = S0*(1.0/ra**2)*cosz(i,j) |
|
./model/src/getcon.F |
130 |
NO PROCEDURE |
DATA ANAME(31),ACON(31) / 'S0 ', S0 / |
|
./model/src/getcon.F |
31 |
NO PROCEDURE |
_RL VECMAX, UNDEF, OB, PER, ECC, AE, EQNX, SOLS, S0, GRAV, |
|
./model/src/getcon.F |
50 |
NO PROCEDURE |
PARAMETER ( S0 = 1365.0 ) |