mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-20 18:21:47 +03:00
10 lines
149 B
Idris
10 lines
149 B
Idris
|
import Data.SnocList
|
||
|
|
|
||
|
|
sing : a -> List a
|
||
|
|
sing = pure
|
||
|
|
|
||
|
|
main : IO ()
|
||
|
|
main = do
|
||
|
|
printLn $ foldr (::) Nil [< 1,2,3]
|
||
|
|
printLn $ foldMap sing [< 1,2,3]
|