pub unsafe extern "C" fn zdscal_( n: *mut c_int, da: *mut c_double, zx: *mut Rcomplex, incx: *mut c_int, )