Undefined function in example

30 views
Skip to first unread message

ranga

unread,
Feb 1, 2013, 4:46:18 AM2/1/13
to symbolic...@googlegroups.com
Hi,
In the documentation on "gen-palindrome-list", there is a detailed example. A function "gen-integer-range" is being used in that example, but looks like it is not defined. When I try to run this example, I am getting an error. What should I do?

Regards,
Rangarajan

pstone imap

unread,
Feb 1, 2013, 5:14:57 AM2/1/13
to symbolic...@googlegroups.com
Hi, it returns a list from low to high of integers. Works the same as more general iteration tool symbol-iter.

(symbol-iter '(1 10))
--> (1 2 3 4 5 6 7 8 9 10)

(def-velocity
  default  (gen-palindrome-list 
            (gen-process '(change-length :add x y :tick)
                         (symbol-iter (list 1 (length vn1-p)))
                         '(34 36 38 40 42) :list))
)

Peter

--
You received this message because you are subscribed to the Google Groups "Symbolic Composer" group.
To unsubscribe from this group and stop receiving emails from it, send an email to symboliccompos...@googlegroups.com.
To post to this group, send email to symbolic...@googlegroups.com.
Visit this group at http://groups.google.com/group/symboliccomposer?hl=en.
For more options, visit https://groups.google.com/groups/opt_out.
 
 

pstone imap

unread,
Feb 1, 2013, 5:21:46 AM2/1/13
to symbolic...@googlegroups.com
And gen-integer-range definition has been this. You can include it in the extensions as a .lisp file.

(defun gen-integer-range (x y)
(let ((out nil))
(dotimes (i (1+ (abs (- y x))))
(push (+ i x) out))
(nreverse out)))

Peter

ranga

unread,
Feb 1, 2013, 10:37:53 PM2/1/13
to symbolic...@googlegroups.com
Thank you.

Regards,
Rangarajan
Reply all
Reply to author
Forward
0 new messages