> module GMap (mapList,mapListBTree,mapListBTreeList) where > import BinTreeDatatype > errorMsg = error "GMap test not yet implemented" > mapList :: (a -> b) -> [a] -> [b] > mapList = errorMsg > mapListBTree :: (a -> b) -> [BinTree a] -> [BinTree b] > mapListBTree = errorMsg > mapListBTreeList :: (a -> b) -> [BinTree [a]] -> [BinTree [b]] > mapListBTreeList = errorMsg