lapacke
pub unsafe fn sgttrs_work( layout: Layout, trans: u8, n: i32, nrhs: i32, dl: &[f32], d: &[f32], du: &[f32], du2: &[f32], ipiv: &[i32], b: &mut [f32], ldb: i32) -> i32