LISP Programming (Define functions using Deep Recursion)

Input and output shown below:

1. search-substring: find first substring start with the given list

(search-substring '(x z x y) '(x x z z x x z x y y x x)) => '(x z x y y x x)

2. find-substring-occurrence : find the number of sub-strings occurring in the list

(find-substring-occurrence '(w z w) '(w w z w z w w z z w)) => 2

3. return-age : get the age of name from booklist

given: booklist = ((katie 22) (nick 25) (flinter 44) (nicholas 10))

(return-age nick booklist) => 25

(return-age lee booklist) => nil

Please use deep recursion only.