CODE IN LISP please!!!

trim-to (symbol list)

Write a function named trim-to that takes a symbol and list as parameters. Return a new list starting from the first occurrence of the input symbol in the input list. If there is no occurrence of the symbol, return nil.

For example:

(trim-to c (a b c d e))

This should return the following list:

(c d e)