the problem is write a binary tree and then write a function to get its depth.

Question

kmxz · Accepted Answer

Write a binary tree:

type 'a binary_tree =
    | Empty
    | Node of 'a * 'a binary_tree * 'a binary_tree;;


Get its depth:

let rec depth btr = match btr with
    | Empty -> 0
    | Node (s0, tl, tr) -> max begin depth tl end begin depth tr end + 1;;

Jane Street

Domanda di colloquio di Jane Street

Risposta di colloquio

Aziende seguite

Ricerche di lavoro