double palAirmas

(

double

zd

)

Definition at line 86 of file palAirmas.c.

References PAL__DD2R.

Referenced by t_airmas().

                               {
  double seczm1;
  double airmass;

  /* Have maximum zenith distance of 87 deg */
  const double MAXZD = 87.0 * PAL__DD2R;

  zd = fabs(zd);
  zd = ( zd > MAXZD ? MAXZD : zd );

  seczm1 = (1.0 / cos(zd)) - 1.0;
  airmass = 1.0 + seczm1*(0.9981833 - seczm1*(0.002875 + 0.0008083*seczm1));
  return airmass;
}

Here is the caller graph for this function: