; Have we broken a law? Did we obey the spirit of the law?
; ------------------------------
; The Little Lisper 3rd Edition
; Chapter 5
; Exercise 10
; Common Lisp
; http://t...content-available-to-author-only...r.com/thelittlelisper
; http://t...content-available-to-author-only...t.com/2010/06/little-lisper-chapter-5-multichapter.html
; http://t...content-available-to-author-only...t.com/2010/06/little-lisper.html
; ------------------------------
(setf x 'comma)
(setf y 'dot)
(setf a 'kiwis)
(setf b 'plums)
(setf lat1 '(bananas kiwis))
(setf lat2 '(peaches apples bananas))
(setf lat3 '(kiwis pears plums bananas cherries))
(setf lat4 '(kiwis mangoes kiwis guavas kiwis))
(setf l1 '((curry) () (chicken) ()))
(setf l2 '((peaches) (and cream)))
(setf l4 '())
; ------------------------------
 
;Some don't all obey the forth commandment - to ask two questions - but they're numeric
;so they're in the spirit - or the test is combined
;They do all appear to obey the sixth commandment - testing for termination on the value changed during recursion
 

OyBIYXZlIHdlIGJyb2tlbiBhIGxhdz8gRGlkIHdlIG9iZXkgdGhlIHNwaXJpdCBvZiB0aGUgbGF3Pwo7IC0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQo7IFRoZSBMaXR0bGUgTGlzcGVyIDNyZCBFZGl0aW9uCjsgQ2hhcHRlciA1CjsgRXhlcmNpc2UgMTAKOyBDb21tb24gTGlzcAo7IGh0dHA6Ly90Li4uY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkuLi5yLmNvbS90aGVsaXR0bGVsaXNwZXIKOyBodHRwOi8vdC4uLmNvbnRlbnQtYXZhaWxhYmxlLXRvLWF1dGhvci1vbmx5Li4udC5jb20vMjAxMC8wNi9saXR0bGUtbGlzcGVyLWNoYXB0ZXItNS1tdWx0aWNoYXB0ZXIuaHRtbAo7IGh0dHA6Ly90Li4uY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkuLi50LmNvbS8yMDEwLzA2L2xpdHRsZS1saXNwZXIuaHRtbAo7IC0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQooc2V0ZiB4ICdjb21tYSkKKHNldGYgeSAnZG90KQooc2V0ZiBhICdraXdpcykKKHNldGYgYiAncGx1bXMpCihzZXRmIGxhdDEgJyhiYW5hbmFzIGtpd2lzKSkKKHNldGYgbGF0MiAnKHBlYWNoZXMgYXBwbGVzIGJhbmFuYXMpKQooc2V0ZiBsYXQzICcoa2l3aXMgcGVhcnMgcGx1bXMgYmFuYW5hcyBjaGVycmllcykpCihzZXRmIGxhdDQgJyhraXdpcyBtYW5nb2VzIGtpd2lzIGd1YXZhcyBraXdpcykpCihzZXRmIGwxICcoKGN1cnJ5KSAoKSAoY2hpY2tlbikgKCkpKQooc2V0ZiBsMiAnKChwZWFjaGVzKSAoYW5kIGNyZWFtKSkpCihzZXRmIGw0ICcoKSkKOyAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KCjtTb21lIGRvbid0IGFsbCBvYmV5IHRoZSBmb3J0aCBjb21tYW5kbWVudCAtIHRvIGFzayB0d28gcXVlc3Rpb25zIC0gYnV0IHRoZXkncmUgbnVtZXJpYwo7c28gdGhleSdyZSBpbiB0aGUgc3Bpcml0IC0gb3IgdGhlIHRlc3QgaXMgY29tYmluZWQKO1RoZXkgZG8gYWxsIGFwcGVhciB0byBvYmV5IHRoZSBzaXh0aCBjb21tYW5kbWVudCAtIHRlc3RpbmcgZm9yIHRlcm1pbmF0aW9uIG9uIHRoZSB2YWx1ZSBjaGFuZ2VkIGR1cmluZyByZWN1cnNpb24K