lapacke
pub unsafe fn cggglm( layout: Layout, n: i32, m: i32, p: i32, a: &mut [c32], lda: i32, b: &mut [c32], ldb: i32, d: &mut [c32], x: &mut [c32], y: &mut [c32]) -> i32