pub unsafe extern "C" fn LAPACKE_dlarfg_work(
n: lapack_int,
alpha: *mut c_double,
x: *mut c_double,
incx: lapack_int,
tau: *mut c_double,
) -> lapack_int
pub unsafe extern "C" fn LAPACKE_dlarfg_work(
n: lapack_int,
alpha: *mut c_double,
x: *mut c_double,
incx: lapack_int,
tau: *mut c_double,
) -> lapack_int