lapack
pub fn spftrs(transr: u8, uplo: u8, n: usize, nrhs: usize, a: &[f32], b: &mut [f32], ldb: usize, info: &mut i32)