Function lapack::clapmr

pub fn clapmr(forwrd: &[i32], m: usize, n: usize, x: &mut [c32], ldx: usize, k: &mut u32)