lapacke
pub unsafe fn sstev_work( layout: Layout, jobz: u8, n: i32, d: &mut [f32], e: &mut [f32], z: &mut [f32], ldz: i32, work: &mut [f32]) -> i32