Recursive implementation of pascal