lapacke
pub unsafe fn clapmt_work( layout: Layout, forwrd: i32, m: i32, n: i32, x: &mut [c32], ldx: i32, k: &mut i32) -> i32