pub unsafe extern "C" fn vmsFloor(
    n: c_int,
    a: *const f32,
    r: *mut f32,
    mode: c_longlong
)