lapack
pub unsafe fn ctpttf( transr: u8, uplo: u8, n: i32, ap: &[c32], arf: &mut [c32], info: &mut i32)