void palRefco	(	double	hm,
		double	tdk,
		double	pmb,
		double	rh,
		double	wl,
		double	phi,
		double	tlr,
		double	eps,
		double *	refa,
		double *	refb
	)

Definition at line 102 of file palRefco.c.

References palRefro().

Referenced by palAoppa(), and t_ref().

                                             {

  double r1, r2;

  /*  Sample zenith distances: arctan(1) and arctan(4) */
  const double ATN1 = 0.7853981633974483;
  const double ATN4 = 1.325817663668033;

  /*  Determine refraction for the two sample zenith distances */
  palRefro(ATN1,hm,tdk,pmb,rh,wl,phi,tlr,eps,&r1);
  palRefro(ATN4,hm,tdk,pmb,rh,wl,phi,tlr,eps,&r2);

  /*  Solve for refraction constants */
  *refa = (64.0*r1-r2)/60.0;
  *refb = (r2-4.0*r1)/60.0;

}

Here is the call graph for this function:

Here is the caller graph for this function: