module Main (main) where
import GoodList

abc :: GoodList Char
abc = cons 'a' $ cons 'b' $ cons 'c' Empty
def :: GoodList Char
def = cons 'd' $ cons 'e' $ cons 'f' Empty

main :: IO ()
main = print abc >>
       print def >>
       print (abc `append` def)