summaryrefslogtreecommitdiff
path: root/test/yosrf.f.ppl
blob: 365fcb865de09c14bab3790bb4c177abc38ccc15 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
! Generated from ./yosrf.cloog by CLooG 0.15 64 bits in 0.01s.
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