blas
pub unsafe fn dsyr2( uplo: u8, n: i32, alpha: f64, x: &[f64], incx: i32, y: &[f64], incy: i32, a: &mut [f64], lda: i32)