35 #ifndef TEMPLATE_BLAS_IDAMAX_HEADER
36 #define TEMPLATE_BLAS_IDAMAX_HEADER
56 if (*n < 1 || *incx <= 0) {
71 for (i__ = 2; i__ <= i__1; ++i__) {
72 if ((d__1 = dx[ix],
absMACRO(d__1)) <= dmax__) {
76 dmax__ = (d__1 = dx[ix],
absMACRO(d__1));
86 for (i__ = 2; i__ <= i__1; ++i__) {
87 if ((d__1 = dx[i__],
absMACRO(d__1)) <= dmax__) {
91 dmax__ = (d__1 = dx[i__],
absMACRO(d__1));