rfa 0.5.9

A port ERFA to Rust.
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

use super::s2c::*;
use super::super::vector_ops::sxp::*;
///  Convert spherical polar coordinates to p-vector.
///
///  Given:
///   * theta   double       longitude angle (radians)
///   * phi     double       latitude angle (radians)
///   * r       double       radial distance
///
///  Returned:
///   * p       double[3]    Cartesian coordinates
///
///  Called:
///   * s2c       spherical coordinates to unit vector
///   * sxp       multiply p-vector by scalar
///
///  This revision:  2021 May 11
pub fn s2p(theta: f64, phi: f64, r:f64, p: &mut [ f64; 3])
{
   let mut u = [0.0;3];


   s2c(theta, phi, &mut u);
   sxp(r, &u, p);

/* Finished. */

}