Function dopgtr

pub unsafe fn dopgtr(
    uplo: u8,
    n: i32,
    ap: &[f64],
    tau: &[f64],
    q: &mut [f64],
    ldq: i32,
    work: &mut [f64],
    info: &mut i32,
)