FACT++  1.0
double eraSeps ( double  al,
double  ap,
double  bl,
double  bp 
)

Definition at line 3 of file seps.c.

References eraS2c(), and eraSepp().

Referenced by eraPmsafe(), palDsep(), and t_seps().

27 {
28  double ac[3], bc[3], s;
29 
30 /* Spherical to Cartesian. */
31  eraS2c(al, ap, ac);
32  eraS2c(bl, bp, bc);
33 
34 /* Angle between the vectors. */
35  s = eraSepp(ac, bc);
36 
37  return s;
38 
39 }
double eraSepp(double a[3], double b[3])
Definition: sepp.c:3
void eraS2c(double theta, double phi, double c[3])
Definition: s2c.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: