lapacke_sys
pub unsafe extern "C" fn LAPACKE_dlasrt( id: c_char, n: lapack_int, d: *mut c_double) -> lapack_int