This commit is contained in:
Jay McCarthy 2014-03-19 15:07:11 -06:00
parent 0d14e14b21
commit d6dc594662
2 changed files with 9 additions and 0 deletions

View File

@ -8,3 +8,8 @@
> (--> (in-hole E (hd (cons v_1)))
238d237
<
270a270,273
>
> (define small-counter-example
> (term (hd ((cons 1) nil))))
> (test-equal (check small-counter-example) #f)

View File

@ -267,3 +267,7 @@
(begin0
(generate-term stlc M #:i-th index)
(set! index (add1 index))))))
(define small-counter-example
(term (hd ((cons 1) nil))))
(test-equal (check small-counter-example) #f)