test/yosrf.f.polylib


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

! Generated by CLooG v0.10.7
IF (n >= 2) THEN
  DO j=2, n
    S1(i = 1)
  END DO
END IF
DO proc=2, n-1
  DO i=1, proc-1
    DO j=i+1, n
      S2(k = proc)
    END DO
  END DO
  DO j=proc+1, n
    S1(i = proc)
  END DO
END DO
IF (n >= 2) THEN
  DO i=1, n-1
    DO j=i+1, n
      S2(k = n)
    END DO
  END DO
END IF