Function Find-Tree

( find-tree < sym > < tree > )
Finds an atom as a car in tree and returns cdr tree at that positions