pub unsafe extern "C" fn cblas_zdscal(
    n: u32,
    alpha: c_double,
    x: *mut c_void,
    inc_x: u32
)