pub unsafe extern "C" fn dtgsja_(
__jobu: *mut c_char,
__jobv: *mut c_char,
__jobq: *mut c_char,
__m: *mut __CLPK_integer,
__p: *mut __CLPK_integer,
__n: *mut __CLPK_integer,
__k: *mut __CLPK_integer,
__l: *mut __CLPK_integer,
__a: *mut __CLPK_doublereal,
__lda: *mut __CLPK_integer,
__b: *mut __CLPK_doublereal,
__ldb: *mut __CLPK_integer,
__tola: *mut __CLPK_doublereal,
__tolb: *mut __CLPK_doublereal,
__alpha: *mut __CLPK_doublereal,
__beta: *mut __CLPK_doublereal,
__u: *mut __CLPK_doublereal,
__ldu: *mut __CLPK_integer,
__v: *mut __CLPK_doublereal,
__ldv: *mut __CLPK_integer,
__q: *mut __CLPK_doublereal,
__ldq: *mut __CLPK_integer,
__work: *mut __CLPK_doublereal,
__ncycle: *mut __CLPK_integer,
__info: *mut __CLPK_integer
) -> c_int