Undefined function in example

[ranga]

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]

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]

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]

Thank you.

Regards,

Rangarajan