Trivially reduce f;f to f[*2], f[*1..3];f to f[*2..4], etc.
* src/ltlast/multop.cc (instance): Implement the reduction. * src/ltlast/multop.hh, doc/tl/tl.tex: Document it. * src/ltltest/equals.test: Add a test.
This commit is contained in:
parent
4a775a17a3
commit
e7cf7b422d
4 changed files with 88 additions and 8 deletions
|
|
@ -164,6 +164,7 @@ run 1 ../equals '{(a;!a)*:(a;!a)*:b}!' '{(a;!a)*:b}!'
|
|||
run 1 ../equals '{(1:a*);b}!' '{a*;b}!'
|
||||
run 0 ../equals '{z;a*;b*;*;c;d;*;b*;e;a*;*;b*}' '{z;[*];c;d;[*];e;[*]}'
|
||||
run 0 ../equals '{((a;b)|[*0]);[*];c}!' '{[*];c}!'
|
||||
run 0 ../equals '{a;a;a*;a;b;b[*];c[*2:3];c[*4:5]}' '{a[*3..];b[+];c[*6..8]}'
|
||||
|
||||
run 0 ../equals '{a[*0]}' '{[*0]}'
|
||||
run 0 ../equals '{a[*..]}' '{a[*]}'
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue