Jump to content

Featured Replies

Posted

I wonder if anyone has a suggestion on producing this list (with sublists) in Opusmodus, in which the first number decreases in value, the second number stays the same, and the third number increases in value? Thank you!

 

(

(7) (3)

(6) (3) (1)

(5) (3) (2)

(4) (3) (3)

(3) (3) (4)

(2) (3) (5)

(1) (3) (6)

    (3) (7)

)

 

like this..?

(setf one (gen-integer 7 1))
(setf two (gen-repeat (length one) '(3)))
(setf three (reverse one))

(mapcar  #'(lambda (x y z)
           (list x y z)) one two three)

hth

  • Author

Thank you! Yes, that's what I was looking for.  I appreciated the opportunity to learn how to set up a more automated process to produce lists.

or...

 

(loop 
  for x from 7 downto 1 
  for y from 1 to 7
  collect (list x 3 y))

 

Create an account or sign in to comment


Copyright © 2014-2025 Opusmodus™ Ltd. All rights reserved.
Product features, specifications, system requirements and availability are subject to change without notice.
Opusmodus, the Opusmodus logo, and other Opusmodus trademarks are either registered trademarks or trademarks of Opusmodus Ltd.
All other trademarks contained herein are the property of their respective owners.

Powered by Invision Community

Important Information

Terms of Use Privacy Policy