AV
data LinkedList a = Node a (LinkedList a) | End
deriving Show
main =
let linkedList = Node 5 End in
putStrLn $ show linkedList
Size: a a a
AV
data LinkedList a = Node a (LinkedList a) | End
deriving Show
main =
let linkedList = Node 5 End in
putStrLn $ show linkedList
PM
AV
PM
AV
data LinkedList a = Node a (LinkedList a) | End
deriving Show
main =
let linkedList = Node 5 (Node 4 (Node 3 (Node 2 (Node 1 End)))) in
putStrLn $ show linkedList
AV
PM
AV
AG
AV
JS
> let a = 1 : b; b = 2 : a in take 10 a
[1,2,1,2,1,2,1,2,1,2]JS
AV
> let a = 1 : b; b = 2 : a in take 10 a
[1,2,1,2,1,2,1,2,1,2]JS
AV