now operates on density as an int for poly~ voice count

diff --git a/vt.density.maxpat b/vt.density.maxpat
index 277f081a3de9e81a723da6dce2bc4e496e7999dd..076d06f1296d7cc291fbc7168b9a80a54061f8c0 100644 (file)
--- a/vt.density.maxpat
+++ b/vt.density.maxpat
@@ -10,9 +10,23 @@
                }
 ,
                "classnamespace" : "box",
-               "rect" : [ 787.0, 161.0, 918.0, 664.0 ],
+               "rect" : [ 488.0, 161.0, 918.0, 664.0 ],
                "gridsize" : [ 15.0, 15.0 ],
                "boxes" : [                     {
+                               "box" :                                 {
+                                       "fontface" : 0,
+                                       "id" : "obj-9",
+                                       "linecount" : 7,
+                                       "maxclass" : "o.expr.codebox",
+                                       "numinlets" : 1,
+                                       "numoutlets" : 2,
+                                       "outlettype" : [ "FullPacket", "FullPacket" ],
+                                       "patching_rect" : [ 505.0, 219.0, 361.0, 108.0 ],
+                                       "text" : "/idx = aseq(0, int32(/density * (/num/voices - 1))), \nmap(\n  lambda([i], \n    assign(\"/voices/\" + i, /bndl)\n  ), /idx + 1\n), \ndelete(/bndl, /idx, /density)"
+                               }
+
+                       }
+,                      {
                                "box" :                                 {
                                        "id" : "obj-6",
                                        "maxclass" : "newobj",
@@ -97,7 +111,7 @@
                                        "numoutlets" : 2,
                                        "outlettype" : [ "FullPacket", "FullPacket" ],
                                        "patching_rect" : [ 179.0, 355.0, 361.0, 108.0 ],
-                                       "text" : "/idx = aseq(0, int32(/density * (/num/voices - 1))), \nmap(\n  lambda([i], \n    assign(\"/voices/\" + i, /bndl)\n  ), /idx + 1\n), \ndelete(/bndl, /idx, /density)"
+                                       "text" : "/idx = aseq(0, /density - 1), \nmap(\n  lambda([i], \n    assign(\"/voices/\" + i, /bndl)\n  ), /idx + 1\n), \ndelete(/bndl, /idx, /density)"
                                }
 
                        }