blas_sys
pub unsafe extern "C" fn dzasum_( n: *const c_int, x: *const c_double_complex, incx: *const c_int) -> c_double