lapacke
pub unsafe fn zsyr_work( layout: Layout, uplo: u8, n: i32, alpha: c64, x: &[c64], incx: i32, a: &mut [c64], lda: i32) -> i32