Converting a BinaryTree to a Tree?

Question

I have 2 classes: One which is a Tree which can have N subtrees, and BinaryTree can have at most 2 subtrees.

The classes are defined like so:

data Tree a = EmptyTree | Tree a [Tree a] deriving (Show, Ord, Eq)
data BinTree a = EmptyBin | Node a (BinTree a) (BinTree a) deriving (Show, Ord, Eq)

Is there a way I could convert a BinaryTree into a Tree?

Thanks

These are datatypes, not classes.

Cactus
– Cactus

2015-02-14 06:44:05 +00:00
Commented Feb 14, 2015 at 6:44 — Cactus
– Cactus, Commented Feb 14, 2015 at 6:44

AndrewC · Accepted Answer · 2015-02-14 01:17:32Z

5

Sure. The structure of the Tree allows us to put the two subtrees into the list:

convert EmptyBin = EmptyTree
convert (Node a l r) = Tree a [convert l,convert r]

If you wanted to convert the other way, that might be more complex, depending on how you wanted to branch a long list of subtrees, but you could use an Ord a context to help you there.

answered Feb 14, 2015 at 1:17

AndrewC

32.5k7 gold badges81 silver badges115 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Converting a BinaryTree to a Tree?

1 Answer 1

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related