blas_sys
pub unsafe extern "C" fn sasum_( n: *const c_int, x: *const c_float, incx: *const c_int) -> c_float