cblas_sys
pub unsafe extern "C" fn cblas_zscal( n: c_int, alpha: *const c_double_complex, x: *mut c_double_complex, incx: c_int)