Symbol Description Uses
ai0 3



File Line number Procedure Code
./pkg/fizhi/fizhi_utils.F 219 QSAT
      _RL ai0, ai1, ai2, ai3, ai4, ai5, ai6
./pkg/fizhi/fizhi_utils.F 254 QSAT
      parameter ( ai0 = +6.109177956e+00 * esfac )
./pkg/fizhi/fizhi_utils.F 337 QSAT
     .    + (1.-w)*(ai0+T*(ai1+T*(ai2+T*(ai3+T*(ai4+T*(ai5+T*ai6))))))