5c

Please code in language Ocaml

.In each of the three parts in this problem, you will get full credit if you use foldT and define at most one helper function.

(c) TODO: Define a function height : a binTree -> int which returns an integer representing the height of the tree. Trees consisting of only a leaf have height 0

starter code:

type 'a binTree = | Leaf | Node of 'a * ('a binTree) * ('a binTree)

let height (t : 'a binTree) : int = (* your work here *) 0