added the very first and small part of a binary search tree in erlang