Idris2/tests/idris2/perf002/Big.idr

36 lines
695 B
Idris
Raw Normal View History

import Data.Vect
test : Vect 2 () -> IO ()
test b =
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
let i = index 1 b in
pure ()
main : IO ()
main = do
pure ()