lapack_sys
pub unsafe extern "C" fn slapmr_( forwrd: *const c_int, m: *const c_int, n: *const c_int, X: *mut f32, ldx: *const c_int, K: *mut c_int)