lapacke_sys
pub unsafe extern "C" fn LAPACKE_dlartgp( f: c_double, g: c_double, cs: *mut c_double, sn: *mut c_double, r: *mut c_double) -> lapack_int