lapacke
pub unsafe fn dtpcon_work( layout: Layout, norm: u8, uplo: u8, diag: u8, n: i32, ap: &[f64], rcond: &mut f64, work: &mut [f64], iwork: &mut [i32]) -> i32