14.24 - reflect (Node x left right) = (Node x (reflect...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
--14.24 data NTree = NilT | Node Int NTree NTree reflect :: NTree -> NTree reflect NilT = NilT
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: reflect (Node x left right) = (Node x (reflect right) (reflect left))...
View Full Document

Ask a homework question - tutors are online