read006.hs 113 Bytes
Newer Older
1
2
3
4
5
module MyList (MyList(Empty, (:::))) where

data MyList a =   Empty
                | (MyList a) ::: (MyList a)