BINARY TREE OPERATIONS
function search(Tree T, item x) returns Tree
if T = NULL
return NULL
| x < T->elem
return search(T->left, item)
| x > T->elem
return search(T->right, item)
| x = T->elem
return T
fi
end search
procedure insert(item x)
if root = NULL
root := new(Tree)
root->elem := x
root->left := root->right := NULL
| root->
NULL
insert_helper(root, x)
fi
end insert
procedure insert_helper (Tree T, item x)
if
->elem
if T->left = NULL
T->left := new(Tree)
T->left->elem := x
T->left->left := T->left->right := NULL
| T->left
NULL
insert_helper(T->left, item)
fi
| x > T->elem
// code similar to above
fi
end insert
Bernard Waxman
9/30/1997