#N canvas 622 51 524 267 10; #X msg 42 161 2 1 2 1 2 1 2 1 2 1 2 1 2; #N canvas 7 114 588 724 euclide 0; #X floatatom 144 132 5 0 0 0 k - -; #X floatatom 144 152 5 0 0 0 n - -; #X obj 108 141 bng 15 250 50 0 empty empty do 0 -7 0 10 -262144 -1 -1; #X obj 376 594 / 2; #X obj 329 611 >; #X text 396 628 [X] oui; #X obj 329 640 == 0; #X obj 212 556 t b b b; #X text 340 654 non; #X floatatom 179 582 5 0 0 0 m - -; #X obj 120 588 -; #N canvas 1 51 634 787 mettre 0; #X obj 216 292 f; #X obj 216 312 + 1; #X obj 189 248 until; #X obj 296 364 select 13; #X obj 269 245 f; #X obj 189 16 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 189 270 t b b; #X obj 179 375 -; #X obj 216 347 t f f f; #X msg 312 544 element \$1 \$2; #X obj 278 492 pack f f; #X msg 278 704 element \$1 \$2 0; #X obj 278 512 t a b a b; #X msg 329 575 1; #X msg 295 575 0; #X obj 158 592 spigot; #X obj 21 695 pack f f f; #X obj 21 673 +; #X text 336 492 ligne \, col; #X msg 21 716 element \$1 \$2 \$3; #X obj 158 560 r \$0-from-matrix; #X obj 188 732 s \$0-to-matrix; #X obj 278 468 f; #X text 39 735 ligne (y) \, col (x); #X text 360 502 y \, x; #X obj 235 408 t b f; #X text 245 380 (x) ligne ini; #X text 108 395 (x) ligne fin; #N canvas 0 0 450 367 nb 0; #X msg 282 40 1; #X msg 232 41 0; #X obj 152 73 spigot; #X obj 152 -72 r \$0-from-matrix; #X obj 259 86 s \$0-to-matrix; #X msg 258 15 col 1; #X obj 152 96 list-drip; #X obj 152 119 sel 2 1; #X obj 212 143 f; #X obj 243 143 + 1; #X obj 227 121 0; #X obj 197 175 f; #X obj 224 -17 t b b a b; #X text 150 -87 nb de colonne; #X obj 287 -58 inlet; #X obj 197 209 outlet; #X connect 0 0 2 1; #X connect 1 0 2 1; #X connect 2 0 6 0; #X connect 3 0 2 0; #X connect 5 0 4 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 1 8 0; #X connect 8 0 9 0; #X connect 9 0 8 1; #X connect 9 0 11 1; #X connect 10 0 8 1; #X connect 11 0 15 0; #X connect 12 0 11 0; #X connect 12 1 1 0; #X connect 12 2 5 0; #X connect 12 3 0 0; #X connect 12 3 10 0; #X connect 14 0 12 0; #X restore 189 39 pd nb de lignes; #X obj 21 651 f; #X obj 21 629 t b f; #X obj 189 218 t b b b; #X obj 189 117 until; #X obj 189 145 f; #X obj 219 145 + 1; #X obj 239 121 1; #X obj 189 92 t f b; #X obj 189 172 t b f; #X floatatom 248 189 5 0 0 0 - - -; #X obj 269 275 t f f; #X obj 189 318 f; #X floatatom 290 79 5 0 0 0 - - -; #X obj 284 219 inlet m; #X obj 347 288 inlet n; #X obj 229 14 inlet bang; #X obj 189 65 t f b f; #X obj 530 232 inlet; #X connect 0 0 1 0; #X connect 1 0 0 1; #X connect 1 0 8 0; #X connect 2 0 6 0; #X connect 3 0 2 1; #X connect 4 0 39 0; #X connect 5 0 28 0; #X connect 6 0 40 0; #X connect 6 1 0 0; #X connect 7 0 16 1; #X connect 8 0 25 0; #X connect 8 0 40 1; #X connect 8 1 7 0; #X connect 8 2 3 0; #X connect 9 0 21 0; #X connect 10 0 12 0; #X connect 11 0 21 0; #X connect 12 0 11 0; #X connect 12 1 14 0; #X connect 12 2 9 0; #X connect 12 3 13 0; #X connect 13 0 15 1; #X connect 14 0 15 1; #X connect 15 0 30 0; #X connect 16 0 19 0; #X connect 17 0 16 0; #X connect 19 0 21 0; #X connect 20 0 15 0; #X connect 22 0 10 0; #X connect 25 0 22 0; #X connect 25 1 10 1; #X connect 28 0 45 0; #X connect 29 0 17 0; #X connect 30 0 29 0; #X connect 30 1 16 2; #X connect 31 0 2 0; #X connect 31 1 4 0; #X connect 32 0 33 0; #X connect 33 0 34 0; #X connect 33 0 37 0; #X connect 34 0 33 1; #X connect 35 0 33 1; #X connect 36 0 32 0; #X connect 36 1 35 0; #X connect 37 0 31 0; #X connect 37 1 22 1; #X connect 37 1 29 1; #X connect 37 1 38 0; #X connect 39 0 0 1; #X connect 39 1 7 1; #X connect 42 0 4 1; #X connect 43 0 3 1; #X connect 44 0 28 0; #X connect 45 0 36 0; #X connect 45 2 17 1; #X connect 45 2 41 0; #X connect 46 0 32 1; #X connect 46 0 2 1; #X restore 212 691 pd mettre a la ligne; #N canvas 1 51 862 524 matrice 0; #X msg 448 307 zeros \$1; #X obj 347 166 f; #X text 331 168 k; #X obj 448 197 until; #X msg 448 283 element 1 \$1 1; #X obj 448 240 f; #X obj 479 240 + 1; #X obj 463 218 1; #X obj 448 173 t f b; #X obj 347 131 t b f f; #X obj 347 197 until; #X obj 347 240 f; #X obj 378 240 + 1; #X obj 362 218 1; #X msg 347 283 element 1 \$1 2; #X obj 234 370 s \$0-from-matrix; #X obj 230 291 r \$0-to-matrix; #X obj 502 81 inlet k; #X obj 348 82 inlet n; #X obj 448 386 route matrix; #X obj 448 406 prepend matrix; #X obj 170 146 t b b; #X obj 448 336 matrix; #X obj 354 435 matrix; #X obj 355 465 mtx_print; #X obj 124 50 inlet; #X connect 0 0 22 0; #X connect 1 0 10 0; #X connect 3 0 5 0; #X connect 4 0 22 0; #X connect 5 0 6 0; #X connect 5 0 4 0; #X connect 6 0 5 1; #X connect 7 0 5 1; #X connect 8 0 3 0; #X connect 8 1 7 0; #X connect 8 1 13 0; #X connect 9 0 1 0; #X connect 9 1 8 0; #X connect 9 2 0 0; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 11 0 14 0; #X connect 12 0 11 1; #X connect 13 0 11 1; #X connect 14 0 22 0; #X connect 16 0 22 0; #X connect 17 0 1 1; #X connect 18 0 9 0; #X connect 19 0 20 0; #X connect 20 0 23 1; #X connect 21 0 23 0; #X connect 21 1 22 0; #X connect 22 0 15 0; #X connect 22 0 19 0; #X connect 23 0 24 0; #X connect 25 0 21 0; #X coords 0 0 1 1 85 20 0; #X restore 87 647 pd matrice; #X obj 227 509 r redo; #X obj 227 529 del 0; #N canvas 0 0 450 507 vector 0; #X obj 138 237 list-drip; #X obj 138 260 route 0; #X obj 177 342 list append; #X obj 177 318 list; #X obj 177 293 t b f; #X text 116 148 1 --> n; #X obj 116 376 s \$0-to-matrix; #X msg 116 164 col \$1; #X obj 251 147 t b f b; #X obj 288 170 1; #X obj 250 175 0; #X obj 138 195 r \$0-from-matrix; #X obj 138 215 spigot; #X obj 250 92 until; #X obj 251 121 f; #X obj 277 121 + 1; #X obj 304 78 0; #X obj 250 36 t b b; #X obj 250 12 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 84 451 prepend set; #X msg 240 301 list; #X obj 164 19 inlet; #X obj 84 471 outlet; #X obj 84 320 list; #X obj 84 287 t b b; #X obj 84 430 list-rot; #X obj 250 63 v \$0-n; #X obj 111 401 v \$0-phase; #X connect 0 0 1 0; #X connect 1 1 4 0; #X connect 2 0 3 1; #X connect 2 0 23 1; #X connect 3 0 2 0; #X connect 4 0 3 0; #X connect 4 1 2 1; #X connect 7 0 6 0; #X connect 8 0 10 0; #X connect 8 1 7 0; #X connect 8 2 9 0; #X connect 9 0 12 1; #X connect 10 0 12 1; #X connect 10 0 24 0; #X connect 11 0 12 0; #X connect 12 0 0 0; #X connect 13 0 14 0; #X connect 14 0 15 0; #X connect 15 0 8 0; #X connect 15 0 14 1; #X connect 16 0 14 1; #X connect 17 0 26 0; #X connect 17 1 16 0; #X connect 17 1 20 0; #X connect 18 0 17 0; #X connect 19 0 22 0; #X connect 20 0 2 1; #X connect 20 0 3 1; #X connect 21 0 17 0; #X connect 23 0 25 0; #X connect 24 0 23 0; #X connect 24 1 27 0; #X connect 25 0 19 0; #X connect 26 0 13 0; #X connect 27 0 25 1; #X restore 60 683 pd vector; #N canvas 1 432 661 406 oui 0; #X obj 89 9 inlet; #X obj 374 12 inlet; #X obj 185 34 spigot; #X text 193 19 oui; #X obj 193 209 -; #X obj 117 207 mod; #X obj 117 234 sel 0; #X obj 184 61 t b b b b b b b b b; #X obj 49 369 s redo; #X obj 112 376 s vector; #X obj 467 346 outlet n; #X obj 377 346 outlet k; #X obj 287 346 outlet bang; #X obj 34 78 t b b b; #X obj 53 212 div; #X msg 81 270 1; #X msg 149 276 1; #X msg 40 266 0; #X msg 115 274 0; #X obj 49 295 |; #X obj 49 318 sel 1; #X obj 49 349 b; #X obj 112 334 ==; #X obj 112 355 sel 1; #X obj 53 241 sel 0; #X obj 53 120 == 1; #X obj 53 143 sel 0 1; #X obj 286 92 v \$0-k; #X obj 336 92 v \$0-n; #X obj 193 175 v \$0-n; #X obj 220 192 v \$0-k; #X obj 294 216 v \$0-k; #X obj 243 216 v \$0-m; #X obj 294 238 v \$0-n; #X obj 243 237 v \$0-k; #X obj 193 230 v \$0-m; #X obj 147 181 v \$0-m; #X obj 117 163 v \$0-k; #X obj 88 186 v \$0-m; #X obj 53 165 v \$0-k; #X obj 34 98 v \$0-m; #X connect 0 0 2 0; #X connect 1 0 2 1; #X connect 2 0 7 0; #X connect 4 0 35 0; #X connect 5 0 6 0; #X connect 6 0 18 0; #X connect 6 1 16 0; #X connect 7 0 13 0; #X connect 7 1 36 0; #X connect 7 2 29 0; #X connect 7 3 30 0; #X connect 7 4 32 0; #X connect 7 5 31 0; #X connect 7 6 12 0; #X connect 7 7 27 0; #X connect 7 8 28 0; #X connect 13 0 40 0; #X connect 13 1 38 0; #X connect 13 2 37 0; #X connect 14 0 24 0; #X connect 15 0 19 0; #X connect 16 0 19 1; #X connect 16 0 22 1; #X connect 17 0 19 0; #X connect 18 0 19 1; #X connect 18 0 22 1; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 20 1 22 0; #X connect 21 0 8 0; #X connect 22 0 23 0; #X connect 23 0 9 0; #X connect 24 0 17 0; #X connect 24 1 15 0; #X connect 25 0 26 0; #X connect 26 0 39 0; #X connect 26 1 17 0; #X connect 27 0 11 0; #X connect 28 0 10 0; #X connect 29 0 4 0; #X connect 30 0 4 1; #X connect 31 0 33 0; #X connect 32 0 34 0; #X connect 36 0 5 1; #X connect 37 0 5 0; #X connect 38 0 14 1; #X connect 39 0 14 0; #X connect 40 0 25 0; #X restore 212 665 pd oui; #N canvas 670 432 661 406 non 0; #X obj 89 9 inlet; #X obj 374 12 inlet; #X obj 467 316 outlet n; #X obj 377 316 outlet k; #X obj 287 316 outlet bang; #X obj 223 50 spigot; #X text 230 35 non; #X obj 252 177 -; #X obj 313 153 mod; #X obj 196 167 mod; #X obj 223 76 t b b b b b b b b b; #X obj 79 115 t b b b; #X obj 63 192 div; #X obj 127 214 sel 0; #X msg 91 250 1; #X msg 159 256 1; #X msg 50 246 0; #X msg 125 254 0; #X obj 59 305 |; #X obj 59 378 s redo; #X obj 122 385 s vector; #X obj 59 327 sel 1; #X obj 59 358 b; #X obj 122 343 ==; #X obj 122 364 sel 1; #X obj 63 221 sel 0 1; #X obj 420 123 v \$0-n; #X obj 373 123 v \$0-m; #X obj 343 136 v \$0-m; #X obj 313 119 v \$0-k; #X obj 267 131 v \$0-k; #X obj 252 111 v \$0-n; #X obj 196 131 v \$0-k; #X obj 226 150 v \$0-m; #X obj 252 198 v \$0-m; #X obj 313 176 v \$0-k; #X obj 343 200 v \$0-n; #X obj 63 155 v \$0-k; #X obj 93 172 v \$0-m; #X connect 0 0 5 0; #X connect 1 0 5 1; #X connect 5 0 10 0; #X connect 7 0 34 0; #X connect 8 0 35 0; #X connect 9 0 13 0; #X connect 10 0 11 0; #X connect 10 1 33 0; #X connect 10 2 31 0; #X connect 10 3 30 0; #X connect 10 4 29 0; #X connect 10 5 28 0; #X connect 10 6 4 0; #X connect 10 7 27 0; #X connect 10 8 26 0; #X connect 11 0 37 0; #X connect 11 1 38 0; #X connect 11 2 32 0; #X connect 12 0 25 0; #X connect 13 0 17 0; #X connect 13 1 15 0; #X connect 14 0 18 0; #X connect 15 0 18 1; #X connect 15 0 23 1; #X connect 16 0 18 0; #X connect 17 0 18 1; #X connect 17 0 23 1; #X connect 18 0 21 0; #X connect 21 0 22 0; #X connect 21 1 23 0; #X connect 22 0 19 0; #X connect 23 0 24 0; #X connect 24 0 20 0; #X connect 25 0 16 0; #X connect 25 1 14 0; #X connect 25 2 16 0; #X connect 26 0 2 0; #X connect 27 0 3 0; #X connect 28 0 8 1; #X connect 28 0 36 0; #X connect 29 0 8 0; #X connect 30 0 7 1; #X connect 31 0 7 0; #X connect 32 0 9 0; #X connect 33 0 9 1; #X connect 37 0 12 0; #X connect 38 0 12 1; #X restore 296 663 pd non; #X floatatom 144 170 5 0 0 0 phase - -; #X obj 60 606 r vector; #X text 487 605 securite; #X obj 483 621 del 2000; #X obj 78 518 spigot; #X obj 191 497 >; #X obj 16 168 v \$0-n; #X obj 17 148 v \$0-k; #X obj 179 603 v \$0-m; #X obj 16 186 v \$0-phase; #X obj 329 574 v \$0-k; #X obj 376 575 v \$0-n; #X obj 147 539 v \$0-k; #X obj 120 559 v \$0-n; #X obj 78 274 t b b b b b; #X obj 60 706 outlet; #X obj 113 198 bng 15 250 50 0 empty empty matrix 17 7 0 10 -262144 -1 -1; #X connect 0 0 23 1; #X connect 0 0 25 0; #X connect 1 0 23 0; #X connect 1 0 24 0; #X connect 2 0 32 0; #X connect 3 0 4 1; #X connect 4 0 6 0; #X connect 4 0 16 1; #X connect 6 0 17 1; #X connect 7 0 16 0; #X connect 7 0 17 0; #X connect 7 1 28 0; #X connect 7 2 29 0; #X connect 9 0 26 0; #X connect 10 0 9 0; #X connect 13 0 14 0; #X connect 14 0 7 0; #X connect 15 0 33 0; #X connect 16 0 11 0; #X connect 16 1 11 1; #X connect 16 2 11 2; #X connect 17 0 11 0; #X connect 17 1 11 1; #X connect 17 2 11 2; #X connect 18 0 27 0; #X connect 19 0 15 0; #X connect 21 0 11 3; #X connect 22 0 7 0; #X connect 23 0 22 1; #X connect 28 0 4 0; #X connect 29 0 3 0; #X connect 30 0 10 1; #X connect 30 0 12 2; #X connect 31 0 10 0; #X connect 31 0 12 1; #X connect 32 0 22 0; #X connect 32 1 31 0; #X connect 32 2 30 0; #X connect 32 3 1 0; #X connect 32 3 21 0; #X connect 32 4 0 0; #X connect 34 0 12 0; #X coords 0 -1 1 1 85 120 1 100 100; #X restore 42 24 pd euclide; #X text 40 225 http://cgm.cs.mcgill.ca/~godfried/publications/banff.pdf ; #X text 40 205 Euclidean rythm generator \, after; #X text 140 85 output vector:; #X text 140 55 k: number of strong steps \, n: number of steps \, phase: for circular rotations.; #X text 140 95 2: strong steps \, 1: weak steps (0's are skipped in the matrix).; #X connect 1 0 0 0; #X coords 0 0 1 1 85 120 0;