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