cblas_sys
pub unsafe extern "C" fn cblas_dnrm2( n: c_int, x: *const c_double, incx: c_int) -> c_double