new theory seq.Reverse

parent 45e79180
......@@ -192,6 +192,16 @@ theory Distinct
end
theory Reverse
use import int.Int
use import Seq
function reverse (s: seq 'a) : seq 'a =
create (length s) (\ i. s[length s - 1 - i])
end
theory ToFset
use import int.Int
use import Seq as S
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment