#N canvas 449 0 542 715 10;
#X obj 27 251 #cast f;
#X obj 27 625 #clip;
#X obj 26 365 #cast i;
#X obj 27 67 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
;
#X msg 197 83 4 2 # 0 0 0 1 1 1 1 0;
#X obj 26 346 #remap_image;
#X obj 26 327 # sqrt (f #);
#X obj 26 461 t a a;
#X obj 27 103 #store (256 256 1 #);
#X obj 27 122 #draw_polygon put (255);
#X obj 53 606 # >> 8;
#X obj 53 587 #inner (1 3 # 255 128 64);
#X obj 27 606 # +;
#X obj 63 537 #greyscale_to_rgb;
#X obj 62 480 #convolve (3 3 # 0 -1 0 -1 4 -1);
#X obj 197 64 loadbang;
#X obj 26 441 # >> 8;
#X obj 112 346 # + 128;
#X obj 26 422 # + 128;
#X floatatom 442 75 5 0 0 0 - - -;
#X floatatom 398 75 5 0 0 0 - - -;
#X floatatom 354 75 5 0 0 0 - - -;
#X msg 365 132 3 3 # \$1 \$2 \$1 \$2 \$3 \$2;
#X obj 365 94 #pack 3;
#X obj 365 113 #to_list;
#X obj 332 382 # C.log (2 f #);
#X obj 332 496 #greyscale_to_rgb;
#X obj 332 458 #cast i;
#X obj 332 401 #inner (2 f # 0 1) \, seed (f #);
#X obj 332 439 # + (f # 128);
#X obj 332 477 #clip;
#X obj 332 420 # * (f # 40);
#X obj 62 499 # > 0;
#X text 28 8 Operator Spectrum patch.;
#X text 28 25 Copyright 2007 by Mathieu Bouchard;
#X text 28 42 as demonstrated at Pd Convention 2007;
#X obj 27 644 #out window;
#X obj 365 162 # +;
#X obj 365 184 display;
#X obj 62 461 # & 224;
#X obj 62 461 # & 224;
#X obj 62 518 # * 255;
#X msg 209 557 1 3 # 64 128 255;
#X obj 299 186 #fold +;
#X obj 299 205 #fold +;
#X obj 299 224 display;
#X obj 27 663 fps;
#X obj 27 682 display;
#X obj 27 84 metro 33.333;
#X obj 27 270 #fft \, real;
#X obj 26 384 # << 3;
#X obj 27 289 # sq- (f #);
#X obj 27 308 #inner (2 f # 1 1) \, seed (f #);
#X obj 102 148 #convolve (3 3 # 1 4 1 4 12 4 1 4 1);
#X obj 197 102 # * 1;
#X obj 165 210 #scan avg \, seed (1 #);
#X obj 138 267 #scan avg \, seed (256 1 #);
#X obj 138 191 t a a;
#X obj 138 286 # +;
#X obj 138 248 #scan avg \, seed (256 1 #);
#X obj 165 229 #scan avg \, seed (1 #);
#X obj 30 148 shunt;
#X obj 66 150 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 138 172 # * 64;
#X floatatom 235 103 5 0 0 0 - - -;
#X obj 26 403 #fade 4;
#X connect 0 0 49 0;
#X connect 1 0 36 0;
#X connect 2 0 50 0;
#X connect 3 0 48 0;
#X connect 4 0 54 0;
#X connect 5 0 2 0;
#X connect 5 1 17 0;
#X connect 6 0 5 0;
#X connect 7 0 39 0;
#X connect 7 1 11 0;
#X connect 8 0 9 0;
#X connect 9 0 61 0;
#X connect 10 0 12 1;
#X connect 11 0 10 0;
#X connect 12 0 1 0;
#X connect 13 0 12 0;
#X connect 14 0 32 0;
#X connect 15 0 4 0;
#X connect 16 0 7 0;
#X connect 17 0 5 1;
#X connect 18 0 16 0;
#X connect 19 0 23 2;
#X connect 20 0 23 1;
#X connect 21 0 23 0;
#X connect 22 0 37 0;
#X connect 22 0 53 1;
#X connect 23 0 24 0;
#X connect 24 0 22 0;
#X connect 25 0 28 0;
#X connect 27 0 30 0;
#X connect 28 0 31 0;
#X connect 29 0 27 0;
#X connect 30 0 26 0;
#X connect 31 0 29 0;
#X connect 32 0 41 0;
#X connect 36 0 46 0;
#X connect 37 0 38 0;
#X connect 37 0 43 0;
#X connect 39 0 14 0;
#X connect 41 0 13 0;
#X connect 42 0 11 1;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 46 0 47 0;
#X connect 48 0 8 0;
#X connect 49 0 51 0;
#X connect 50 0 65 0;
#X connect 51 0 52 0;
#X connect 52 0 6 0;
#X connect 53 0 0 0;
#X connect 54 0 9 2;
#X connect 55 0 60 0;
#X connect 56 0 58 0;
#X connect 57 0 59 0;
#X connect 57 1 55 0;
#X connect 58 0 0 0;
#X connect 59 0 56 0;
#X connect 60 0 58 1;
#X connect 61 0 53 0;
#X connect 61 1 63 0;
#X connect 62 0 61 1;
#X connect 63 0 57 0;
#X connect 64 0 54 1;
#X connect 65 0 18 0;