#N canvas 678 0 632 610 10;
#X msg 263 58 4 2 # 1 1 1 5 5 5 5 1;
#X text 413 58 should give 3 3;
#X obj 282 188 display;
#X obj 203 219 #outer + (-4 4);
#X obj 203 238 #transpose;
#X obj 37 64 metro 42;
#X obj 37 47 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 37 83 240 320 3 #;
#X obj 37 256 #out window;
#X obj 37 122 #draw_polygon + (255 0 0);
#X obj 37 219 #draw_rect + (255 255 0);
#X obj 378 188 display;
#X obj 377 168 #polygon_moment 2;
#X obj 281 168 #polygon_moment;
#X obj 263 77 # * (10 20);
#X obj 263 96 #rotate;
#X floatatom 316 98 5 0 0 0 - - -;
#X obj 0 0 doc_h;
#X obj 3 375 doc_i 2;
#X obj 3 291 doc_c 1;
#X obj 3 516 doc_o 1;
#X obj 14 546 doc_oo 0;
#X obj 14 405 doc_ii 0;
#X obj 14 427 doc_ii 1;
#X obj 14 321 doc_cc 0;
#X obj 97 321 doc_m c0 float;
#X text 232 321 1: first-order moment (average);
#X text 232 343 2: second-order moment (standard-deviation);
#X obj 97 546 doc_m o0 grid;
#X obj 97 405 doc_m i0 grid;
#X obj 97 427 doc_m i1 grid;
#X text 232 427 centre to subtract from the input;
#X text 232 449 in the case of an average \, you'd leave this unused
;
#X text 232 471 but in the case of a standard-deviation \, you'd put
the average in here \, unless you want a nonstandard deviation.;
#X text 232 546 polygon. size (N 2);
#X text 232 405 polygon. size (N 2);
#X obj 0 578 doc_f;
#X connect 0 0 14 0;
#X connect 3 0 4 0;
#X connect 4 0 10 2;
#X connect 5 0 7 0;
#X connect 6 0 5 0;
#X connect 7 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 12 0 11 0;
#X connect 13 0 2 0;
#X connect 13 0 3 0;
#X connect 14 0 15 0;
#X connect 15 0 9 2;
#X connect 15 0 13 0;
#X connect 15 0 12 0;
#X connect 16 0 15 1;
#X connect 25 1 26 0;
#X connect 25 1 27 0;
#X connect 28 1 34 0;
#X connect 29 1 35 0;
#X connect 30 1 31 0;
#X connect 30 1 32 0;
#X connect 30 1 33 0;