https://mojopuzzler.org/mediawiki/index.php?action=history&feed=atom&title=Append
Append - Revision history
2026-05-06T01:19:01Z
Revision history for this page on the wiki
MediaWiki 1.40.1
https://mojopuzzler.org/mediawiki/index.php?title=Append&diff=2257&oldid=prev
Gneale: Created page with "===== Return to: Chialisp ===== ===== Return to: Recursive Functions ===== <big>Appending lists in a solution:</big> (mod (list1 list2) (defun append (list1 list2) (if (l list1) (c (f list1) (append (r list1) list2)) list2) ) (append list1 list2) ) ==Example Usage:== brun '(a (q 2 2 (c 2 (c 5 (c 11 ())))) (c (q 2 (i (l 5) (q 4 9 (a 2 (c 2 (c 13 (c 11 ()))))) (q . 11)) 1) 1))' '((99 33)(1 2 3))' Outputs: <pre>(99 33 1 2 3)</pre>"
2023-11-17T15:50:30Z
<p>Created page with "===== Return to: <a href="/mediawiki/index.php/Chialisp" title="Chialisp">Chialisp</a> ===== ===== Return to: <a href="/mediawiki/index.php/Recursive_Functions" title="Recursive Functions">Recursive Functions</a> ===== <big>Appending lists in a solution:</big> (mod (list1 list2) (defun append (list1 list2) (if (l list1) (c (f list1) (append (r list1) list2)) list2) ) (append list1 list2) ) ==Example Usage:== brun '(a (q 2 2 (c 2 (c 5 (c 11 ())))) (c (q 2 (i (l 5) (q 4 9 (a 2 (c 2 (c 13 (c 11 ()))))) (q . 11)) 1) 1))' '((99 33)(1 2 3))' Outputs: <pre>(99 33 1 2 3)</pre>"</p>
<p><b>New page</b></p><div>===== Return to: [[Chialisp|Chialisp]] =====<br />
===== Return to: [[Recursive Functions]] =====<br />
<big>Appending lists in a solution:</big><br />
(mod (list1 list2)<br />
(defun append (list1 list2)<br />
(if (l list1)<br />
(c (f list1) (append (r list1) list2))<br />
list2) <br />
)<br />
(append list1 list2)<br />
)<br />
<br />
==Example Usage:==<br />
brun '(a (q 2 2 (c 2 (c 5 (c 11 ())))) (c (q 2 (i (l 5) (q 4 9 (a 2 (c 2 (c 13 (c 11 ()))))) (q . 11)) 1) 1))' '((99 33)(1 2 3))'<br />
<br />
Outputs:<br />
<pre>(99 33 1 2 3)</pre></div>
Gneale