sofars 0.6.0

Pure Rust implementation of the IAU SOFA library
Documentation
1
2
3
4
5
6
7
8
9
10
11
12
use super::{rxpv, tr};

/// Multiply a pv-vector by the transpose of an r-matrix.
pub fn trxpv(r: &[[f64; 3]; 3], pv: &[[f64; 3]; 2], trpv: &mut [[f64; 3]; 2]) {
    let tr_ = &mut [[0.0; 3]; 3];

    /* Transpose of matrix r. */
    tr(r, tr_);

    /* Matrix tr * vector pv -> vector trpv. */
    rxpv(tr_, pv, trpv);
}