Answer the Flowing 1. Implement a recursive function called FILTER-OUT-THE in Common Lisp FILTER-OUT-THE takes a list of symbols and returns a list from which all instance of the symbols THE have been removed. The prototype of FILTER- OUT-THE is (defun filter-out-the (list) Your code goes here) Sample Run [1] (filter-out-the '(There are the boy and THE girl)) Return: (THERE ARE BOY AND GIRL) Note: a) You cannot use predefined function to do the elimination. You must implement it vourself. b) The symbol "the" is case insensitive, which means you should eliminate every instance of "the" in all forms, regardless the combination of lower-case and upper-case c) The allowed CLISP constructs are: COND, EQUAL (or EQUALP), CONS, CAR and CDR, and some basic primitive building blocks of CLISP 2. Write a procedure called SCHEDULE takes a weekday as argument and retrieves a list of vour commitments on that dav. The procedure's prototvpe is (defun schedule (day) Your code goes here) Answer the Flowing 1. Implement a recursive function called FILTER-OUT-THE in Common Lisp FILTER-OUT-THE takes a list of symbols and returns a list from which all instance of the symbols THE have been removed. The prototype of FILTER- OUT-THE is (defun filter-out-the (list) Your code goes here) Sample Run [1] (filter-out-the '(There are the boy and THE girl)) Return: (THERE ARE BOY AND GIRL) Note: a) You cannot use predefined function to do the elimination. You must implement it vourself. b) The symbol "the" is case insensitive, which means you should eliminate every instance of "the" in all forms, regardless the combination of lower-case and upper-case c) The allowed CLISP constructs are: COND, EQUAL (or EQUALP), CONS, CAR and CDR, and some basic primitive building blocks of CLISP 2. Write a procedure called SCHEDULE takes a weekday as argument and retrieves a list of vour commitments on that dav. The procedure's prototvpe is (defun schedule (day) Your code goes here)