Function LAPACKE_dlapmr_work

pub unsafe extern "C" fn LAPACKE_dlapmr_work(
    matrix_layout: c_int,
    forwrd: lapack_logical,
    m: lapack_int,
    n: lapack_int,
    x: *mut c_double,
    ldx: lapack_int,
    k: *mut lapack_int,
) -> lapack_int