Get rid of the warning about ignoring the return value of fgets
[cloog.git] / test / yosrf.cloog
blob1661ef71931df295267aa754882eb4e1fa9eee02
1 # language: FORTRAN
4 # One parameter : n
5 1 3
6 #  n  1
7 1  0  1
8 # We want to set the parameter names...
10 # and 'n' is the name of the unique parameter
13 2 # Number of statements: 2.
16 # {i, j | 1<=i<=n-1; i+1<=j<=n}
17 4 5
18 #  i  j  n  1
19 1  1  0  0 -1
20 1 -1  0  1 -1
21 1 -1  1  0 -1
22 1  0 -1  1  0
23 0 0 0
26 # {i, j, k | 1<=i<=n-1; i+1<=j<=n i+1<=k<=n}
27 6 6
28 #  i  j  k  n  1
29 1  1  0  0  0 -1
30 1 -1  0  0  1 -1
31 1 -1  1  0  0 -1
32 1  0 -1  0  1  0
33 1 -1  0  1  0 -1
34 1  0  0 -1  1  0
35 0 0 0
36 # We want to let CLooG set the iterator names.
40 # Scattering functions
41 1 6
42 # c1  i  j  n  1
43 0  1 -1  0  0  0
45 1 7
46 # c1  i  j  k  n  1
47 0  1  0  0 -1  0  0
49 proc
52 # Scattering functions
53 3 8
54 # c1 c2 c3  i  j  n  1
55 0  1  0  0 -1  0  0  0
56 0  0  1  0  0  0  0  0
57 0  0  0  1  0  0  0  0
59 3 9
60 # c1 c2 c3  i  j  k  n  1
61 0  1  0  0  0  0 -1  0  0
62 0  0  1  0  0  0  0  0 -1
63 0  0  0  1  0  0 -1  0  0