pub unsafe extern "C" fn vdPackV(
    n: c_int,
    a: *const f64,
    ia: *const c_int,
    y: *mut f64
)