|
111
|
1 /* { dg-do compile } */
|
|
|
2 /* { dg-options "-c -O2 -ftree-vectorize" { target *-*-* } } */
|
|
|
3
|
|
|
4 typedef struct eqn_d
|
|
|
5 {
|
|
|
6 int *coef;
|
|
|
7 } *eqn;
|
|
|
8 typedef struct omega_pb_d
|
|
|
9 {
|
|
|
10 eqn subs;
|
|
|
11 } *omega_pb;
|
|
|
12
|
|
|
13 omega_pb omega_solve_problem (omega_pb);
|
|
|
14
|
|
|
15 omega_pb
|
|
|
16 omega_solve_geq (omega_pb pb, int n)
|
|
|
17 {
|
|
|
18 int i, e;
|
|
|
19 int j = 0;
|
|
|
20
|
|
|
21 for (e = n - 1; e >= 0; e--)
|
|
|
22 if (pb->subs[e].coef[i] != pb->subs[e].coef[j])
|
|
|
23 {
|
|
|
24 pb->subs[e].coef[i] = j;
|
|
|
25 pb->subs[e].coef[j] = i;
|
|
|
26 }
|
|
|
27
|
|
|
28 return omega_solve_problem (pb);
|
|
|
29 }
|
