void pal1Atmt	(	double	r0,
		double	t0,
		double	alpha,
		double	gamm2,
		double	delm2,
		double	c1,
		double	c2,
		double	c3,
		double	c4,
		double	c5,
		double	c6,
		double	r,
		double *	t,
		double *	dn,
		double *	rdndr
	)

Definition at line 103 of file pal1Atmt.c.

References DMAX, DMIN, and t.

Referenced by palRefro().

                                                       {

  double tt0;
  double tt0gm2;
  double tt0dm2;

  *t = DMAX( DMIN( t0 - alpha*(r-r0), 320.0), 100.0 );
  tt0 = *t / t0;
  tt0gm2 = pow( tt0, gamm2 );
  tt0dm2 = pow( tt0, delm2 );
  *dn = 1.0 + ( c1 * tt0gm2 - ( c2 - c5 / *t ) * tt0dm2 ) * tt0;
  *rdndr = r * ( -c3 * tt0gm2 + ( c4 - c6 / tt0 ) * tt0dm2 );

}

Here is the caller graph for this function: