lean4-htt/tests/compiler/append.lean
2019-03-29 11:25:26 -07:00

4 lines
161 B
Text

def main (xs : List String) : IO Unit :=
let ys1 := List.replicate 1000000 1 in
let ys2 := List.replicate 1000000 2 in
IO.println (toString (ys1 ++ ys2).length)