diff options
Diffstat (limited to 'omega/examples/pufs.out')
| -rw-r--r-- | omega/examples/pufs.out | 50 |
1 files changed, 50 insertions, 0 deletions
diff --git a/omega/examples/pufs.out b/omega/examples/pufs.out new file mode 100644 index 0000000..df65564 --- /dev/null +++ b/omega/examples/pufs.out @@ -0,0 +1,50 @@ +# Omega Calculator [v1.1, Nov 96]: +# # +# # Examples of relations using uninterpreted function symbols +# # from Omega Calculator documentation +# # +# +# symbolic p(2), n, m; +# +# R := { [ir,jr] : 1 <= ir <= n && 1 <= jr <= m }; +# +# W1 := { [iw,jw] : 1 <= iw <= n && 1 <= jw <= m && p(Set) >= 0 }; +# +# W2 := { [iw,jw] : 1 <= iw <= n && 1 <= jw <= m && p(Set) < 0 }; +# +# Exposed := R intersection complement ( W1 union W2 ); +# +# Exposed; + +{[In_1,In_2] : FALSE } + +# +# +# symbolic f(1); +# +# R1 := { [i] -> [j] : 1 <= i = j <= 100 && f(In) <= f(Out)}; +# +# R2 := { [i] -> [j] : 1 <= i <= j <= 100 && f(In) = f(Out)}; +# +# +# R1 intersection R2; + +{[i] -> [i] : 1 <= i <= 100} + +# +# R1 union R2; + +{[i] -> [j] : f(j) = f(i) && 1 <= i < j <= 100} union + {[i] -> [i] : 1 <= i <= 100} + +# +# R1 intersection complement R2; + +{[i] -> [j] : FALSE } + +# +# R1; + +{[i] -> [i] : 1 <= i <= 100} + +# |