pub unsafe extern fn zporfs_(uplo: *const c_char,
n: *const lapack_int,
nrhs: *const lapack_int,
a: *const lapack_complex_double,
lda: *const lapack_int,
af: *const lapack_complex_double,
ldaf: *const lapack_int,
b: *const lapack_complex_double,
ldb: *const lapack_int,
x: *mut lapack_complex_double,
ldx: *const lapack_int,
ferr: *mut c_double,
berr: *mut c_double,
work: *mut lapack_complex_double,
rwork: *mut c_double,
info: *mut lapack_int)