> module GEq where
> import BinTreeDatatype
> equalBTreeInt :: BinTree Int -> BinTree Int -> Bool
> equalBTreeInt = eqBTree