lapacke
pub unsafe fn sgebal_work( layout: Layout, job: u8, n: i32, a: &mut [f32], lda: i32, ilo: &mut i32, ihi: &mut i32, scale: &mut [f32]) -> i32