1 2 3 4 5 6 7 8 9 10 11 12
/// Initialize an r-matrix to the identity matrix. pub fn ir(r: &mut [[f64; 3]; 3]) { r[0][0] = 1.0; r[0][1] = 0.0; r[0][2] = 0.0; r[1][0] = 0.0; r[1][1] = 1.0; r[1][2] = 0.0; r[2][0] = 0.0; r[2][1] = 0.0; r[2][2] = 1.0; }