summaryrefslogtreecommitdiff
path: root/omega/examples/old_test/wrap0.oc-rt
blob: d9c7d345c3ef1155573ea37376896d11fba638ce (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
# Omega Calculator v1.2 (based on Omega Library 1.2, August, 2000):
# symbolic n;
# 
# I := {[i,j,k] : 1 <= i,j,k <= n};
# 
# R1 := {[i,j,n] -> [i,j+1,1] : 1 <= i,j,j+1 <= n}
# 	 union {[i,j,k] -> [i,j,k'] : 1 <= i,j,k,k' <= n && k' = k+1};
# 
# R1;

{[i,j,n] -> [i,j+1,1] : 1 <= i <= n && 1 <= j < n} union
 {[i,j,k] -> [i,j,k+1] : 1 <= i <= n && 1 <= j <= n && 1 <= k < n}

# 
# R1+ within I;

{[i,j,k] -> [i,j',k'] : 1 <= j < j' <= n && 1 <= i <= n && 1 <= k <= n && 1 <= k' <= n} union
 {[i,j,k] -> [i,j,k'] : 1 <= k < k' <= n && 1 <= i <= n && 1 <= j <= n}

# 
# R1+;

{[i,j,k] -> [i,j',k'] : 1 <= j < j' <= n && 1 <= i <= n && 1 <= k <= n && 1 <= k' <= n} union
 {[i,j,k] -> [i,j,k'] : 1 <= k < k' <= n && 1 <= i <= n && 1 <= j <= n}

#