diff options
| author | dhuth <derickhuth@gmail.com> | 2014-10-06 11:56:47 -0600 |
|---|---|---|
| committer | dhuth <derickhuth@gmail.com> | 2014-10-06 11:56:47 -0600 |
| commit | e4b20015a4ee35f1279af4caa983478fa2ff0d4a (patch) | |
| tree | f47cbff8b2bba458b54a739e91a87b303f7665f1 /omega/examples/old_test/pufs6 | |
| parent | 600fa18324c21a162c50c40ae5f00c899a41dd24 (diff) | |
| download | chill-e4b20015a4ee35f1279af4caa983478fa2ff0d4a.tar.gz chill-e4b20015a4ee35f1279af4caa983478fa2ff0d4a.tar.bz2 chill-e4b20015a4ee35f1279af4caa983478fa2ff0d4a.zip | |
Added omega to source
Diffstat (limited to 'omega/examples/old_test/pufs6')
| -rw-r--r-- | omega/examples/old_test/pufs6 | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/omega/examples/old_test/pufs6 b/omega/examples/old_test/pufs6 new file mode 100644 index 0000000..e24aa12 --- /dev/null +++ b/omega/examples/old_test/pufs6 @@ -0,0 +1,19 @@ +symbolic n, f(1), f_last, f_first; + +True := { [] : 1 = 1 }; + +old_R1 := { [x] -> [] : (1 <= x <= n and f(x) > 0)}; +old_R2 := { [x] -> [] : (1 <= x <= n and f(x) <=0)}; +True - range old_R1 - range old_R2; + +R1 := { [x] -> [] : (3 <= x <= n-1 and f(x) > 0) + or (1 <= n and f_last > 0) + or (1 <= n and f_first > 0) }; +R2 := { [x] -> [] : (3 <= x <= n-1 and f(x) <=0) + or (1 <= n and f_last <=0) + or (1 <= n and f_first <=0) }; +True - range R1 - range R2; + +R1a := { [x] -> [] : (1 <= x <= n and (f(x) > 0 or f_first > 0 or f_last > 0)) }; +R2a := { [x] -> [] : (1 <= x <= n and (f(x) <=0 or f_first <=0 or f_last <=0)) }; +True - range R1a - range R2a; |