blas
pub fn ztpmv(uplo: Uplo, trans: Trans, diag: Diag, n: usize, ap: &[Complex<f64>], x: &mut [Complex<f64>], incx: usize)