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