pub unsafe extern fn sggqrf_(n: *const lapack_int,
m: *const lapack_int,
p: *const lapack_int,
a: *mut c_float,
lda: *const lapack_int,
taua: *mut c_float,
b: *mut c_float,
ldb: *const lapack_int,
taub: *mut c_float,
work: *mut c_float,
lwork: *const lapack_int,
info: *mut lapack_int)