RosettaCodeData/Task/Logical-operations/V/logical-operations-2.v

8 lines
102 B
Coq
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
[mylogic
[get2 [a b : a b a b] view].
get2 and puts
get2 or puts
swap not puts
pop
].