pub unsafe extern "C" fn zhpr_( uplo: *const c_char, n: *const c_int, alpha: *const c_double, x: *const c_double_complex, incx: *const c_int, ap: *mut c_double_complex, )