mirror of
https://github.com/ilyakooo0/Idris-dev.git
synced 2024-09-21 05:57:38 +03:00
16 lines
230 B
Idris
16 lines
230 B
Idris
module badbangop
|
|
|
|
-- Check that using "!" by itself as an operator does not work
|
|
|
|
infixl 2 !
|
|
|
|
(!) : List a -> Nat -> Maybe a
|
|
xs ! n = index' n xs
|
|
|
|
aList : List Integer
|
|
aList = [1,2,3,4,5]
|
|
|
|
opUse : Maybe Integer
|
|
opUse = aList ! 2
|
|
|