Define a LISP function MONTH->INTEGER which takes as argument a symbol that should be the name of a month, and which returns the number of the month. For example, (MONTH->INTEGER 'MARCH) => 3 and (MONTH->INTEGER 'JUNE) => 6. If the argument is not a symbol that is the name of a month, the function should return the symbol ERROR.

E.g., (MONTH->INTEGER 'C) => ERROR, (MONTH->INTEGER 7) => ERROR, (MONTH->INTEGER 'QUOTE) => ERROR, and (MONTH->INTEGER '(MAY)) => ERROR.