Get rid of the warning about ignoring the return value of fgets
[cloog.git] / test / levenshtein-1-2-3f.c
blob9ab1b2826695b9640ffe61968141953d06bac920
1 ! Generated from ./test/levenshtein-1-2-3f.cloog by CLooG v1.0.0 64 bits in 0.03s.
2 ! CLooG asked for 164 KBytes.
3 S1(i = 0,j = 0)
4 S2(i = 1,j = 0)
5 S3(i = 1,j = 1)
6 DO i=2, N
7 S2(j = 0)
8 DO j=1, i-1
9 S6
10 END DO
11 S3(j = i)
12 END DO
13 i = N+1
14 S7(j = 0)
15 DO j=1, N
18 END DO
19 DO i=N+2, 2*M-N-2
20 DO j=CEILING(REAL(i-N-2)/REAL(2)), FLOOR(REAL(i-N-1)/REAL(2))
22 END DO
23 IF (MOD(i-N,2) == 0) THEN
24 j = (i-N)/2
27 END IF
28 IF (MOD(i+N,2) == 0) THEN
29 j = (i+N)/2
32 END IF
33 DO j=CEILING(REAL(i-N+1)/REAL(2)), FLOOR(REAL(i+N-1)/REAL(2))
36 END DO
37 END DO
38 DO i=2*M-N-1, 2*M-2
39 DO j=i-M+1, M-1
41 END DO
42 END DO