My Haskell Practices

ghci.txt

> Constructor "Milad"
> Constructor [Just True, Nothing, Just False]

mylist.hs

data MyList a = Constructor a (MyList a)
	| Nil
	deriving (Show)

fromList (x:xs) = Constructor x (fromList xs)
fromList [] 	= Nil


binaryTree Tree a = Node a (Tree a) (Tree a)
                   | Empty
                     deriving (Show)
                     

bTree = Node "parent" (Node "left" Empty Empty) (Node "rigth" Empty Empty)