I did, but then my computer ate it! ><;; Sorry, I don't think I have time to try again. Maybe someone else will?
Here's a bit of a Rosetta Stone to help you out, or at least to give you an idea of how it would look:
; Common Lisp
(let* ((a #'list)
(b 1)
(c 2))
(begin nil
(cond
(a (funcall a 3 4 5))
(b (return-from nil nil))
(t 6))))
; Arc
(withs (a list
b 1
c 2)
(point foo
(if a (a 3 4 5)
b (foo nil)
6)))
The rest should be a straightforward process of finding Arc functions that do the same things as the Common Lisp functions do. Here are some useful links for that: http://files.arcfn.com/doc/http://files.arcfn.com/doc/fnindex.html They're a bit out-of-date in a couple of places though. :/