lapack_sys
pub unsafe extern "C" fn sorgqr_( m: *const c_int, n: *const c_int, k: *const c_int, A: *mut f32, lda: *const c_int, tau: *const f32, work: *mut f32, lwork: *const c_int, info: *mut c_int)