Solution exercises from P01 to P07

2025-09-05 11:59:55 +02:00
commit 54214ae0aa
7 changed files with 64 additions and 0 deletions
--- a/p06.el
+++ b/p06.el
@@ -0,0 +1,7 @@
+;; P06 (*) Find out whether a list is a palindrome.
+(defun palindrome (lst)
+  (equal lst (reverse lst)))
+
+(palindrome '(x a m a x)) ; t
+(palindrome '(a n n a))   ; t
+(palindrome '(f a b i o)) ; nil