summaryrefslogtreecommitdiff
path: root/test/regress/regress1
diff options
context:
space:
mode:
authorAndrew Reynolds <andrew.j.reynolds@gmail.com>2019-11-06 10:00:08 -0600
committerGitHub <noreply@github.com>2019-11-06 10:00:08 -0600
commit52e71b709504ed06ced34962692a329f4c8282ce (patch)
treeda64b2bf12fd4f176833a53d36175131799e3c1d /test/regress/regress1
parentdcccaec1155c66f2e52cfe823bc9654c46e3832b (diff)
Support for SyGuS PBE + recursive functions (#3433)
Diffstat (limited to 'test/regress/regress1')
-rw-r--r--test/regress/regress1/sygus/rec-fun-sygus.sy21
1 files changed, 21 insertions, 0 deletions
diff --git a/test/regress/regress1/sygus/rec-fun-sygus.sy b/test/regress/regress1/sygus/rec-fun-sygus.sy
new file mode 100644
index 000000000..13d4782d4
--- /dev/null
+++ b/test/regress/regress1/sygus/rec-fun-sygus.sy
@@ -0,0 +1,21 @@
+; EXPECT: unsat
+; COMMAND-LINE: --sygus-out=status --sygus-rec-fun --lang=sygus2
+
+(set-logic ALL)
+
+(declare-datatype List ((cons (head Int) (tail List)) (nil)))
+
+(define-fun-rec sum ((x List)) Int (ite ((_ is nil) x) 0 (+ (head x) (sum (tail x)))))
+(define-fun-rec size ((x List)) Int (ite ((_ is nil) x) 0 (+ 1 (size (tail x)))))
+
+(synth-fun f ((x List)) Int
+ ((I Int) (L List))
+ ((I Int ((+ I I) (sum L) (size L) 0 1))
+ (L List (x))))
+
+(constraint (= (f (cons 3 (cons 4 (cons 5 nil)))) 15))
+(constraint (= (f (cons 3 (cons (- 4) (cons 5 nil)))) 7))
+(constraint (= (f (cons 5 (cons 5 nil))) 12))
+(constraint (= (f (cons 0 (cons 0 (cons 0 (cons 0 (cons 0 (cons 0 nil))))))) 6))
+(constraint (= (f (cons (- 2) (cons 0 nil))) 0))
+(check-synth)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback