pub fn zher<T>( order: CblasOrder, uplo: CblasUplo, N: i32, alpha: f64, x: &[T], incx: i32, A: &mut [T], lda: i32)
