Symbol Description Uses
S0 5



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 167 DO_FIZHI
      S0 = getcon('S0')
./pkg/fizhi/do_fizhi.F 184 DO_FIZHI
       radswt(i,j,bi,bj) = S0*(1.0/ra**2)*cosz(i,j)
./pkg/fizhi/getcon.F 134 NO PROCEDURE
       DATA ANAME(31),ACON(31) / 'S0              ', S0     /
./pkg/fizhi/getcon.F 31 NO PROCEDURE
      _RL  VECMAX, UNDEF, OB, ECC, AE, EQNX, SOLS, S0, GRAV, 
./pkg/fizhi/getcon.F 48 NO PROCEDURE
      PARAMETER ( S0     = 1365.0     )