Function dopgtr_work 

pub unsafe fn dopgtr_work(
    layout: Layout,
    uplo: u8,
    n: i32,
    ap: &[f64],
    tau: &[f64],
    q: &mut [f64],
    ldq: i32,
    work: &mut [f64],
) -> i32