lapack
pub unsafe fn dgeqpf( m: &mut i32, n: &mut i32, a: &mut [f64], lda: &mut i32, jpvt: &mut [i32], tau: &mut [f64], work: &mut [f64], info: &mut i32)