#include <string.h>
#include <math.h>
void ab08nx(*n, *m, *p, *ro, *sigma, *svlmax, abcd[], *ldabcd, *ninfz, infz[], kronl[], *mu, *nu, *nkrol, *tol, iwork[], dwork[], *ldwork, *info);
void ab08nx(*n, *m, *p, *ro, *sigma, *svlmax, abcd[], *ldabcd, *ninfz, infz[], kronl[], *mu, *nu, *nkrol, *tol, iwork[], dwork[], *ldwork, *info)
{
double zero;
const Integer info, ldabcd, ldwork, m, mu, n, ninfz, nkrol, nu, p, ro, sigma;
double svlmax, tol;
Integer infz, iwork, kronl;
double abcd[ldabcd], dwork;