Function idamax

src/tests/correctness/blas-lapack.c:834–837

}

int idamax( int n, double *x, int incx)
{
    return idamax_(&n, x, &incx);
}

int icamax( int n, complex *x, int incx)
{