cryptol/tests/issues/issue334.icry

4 lines
92 B
Plaintext
Raw Normal View History

let foo (x:[8]) = xs where xs = [x, xs@0]
:prove foo 3 == [3,3]
:prove \x -> foo x == [x,x]