pub unsafe extern "C" fn vdrint_(
    n: *const c_int,
    a: *const f64,
    r: *mut f64
)