Function zlapmr

pub unsafe fn zlapmr(
    forwrd: &[i32],
    m: i32,
    n: i32,
    x: &mut [c64],
    ldx: i32,
    k: &mut i32,
)