Write a lisp program to compute series for functions ln (1+ x ) and e^x depending on a switch variable s . Write a function that takes in three arguments e.g. function compute-trig ( x , s , n ), where

s is the switch variable that decides which function to evaluate, n is the precision variable and x is the parameter variable. Parameters s and x should be defined as keyword parameters and n should be an optional parameter with default value of n =5. You are not allowed to use any inbuilt functions except predicate functions to check value type. Your program should print an apt error for string and decimal values for s and n . Additionally, there is a limit for x with s =2.

ex = 1+1+-+-+-+-- Pl compute-trig (x, s, n)- ln(1 +x)-1-2+3--+ 1