#N struct curve float x float y;
#N canvas 0 0 450 300 10;
#N canvas 423 345 453 423 curve 0;
#X obj 102 67 struct curve float x float y;
#X obj 171 303 pointer;
#X msg 170 277 traverse \$1 \, bang;
#X obj 106 251 list split 2;
#X obj 110 227 inlet;
#X obj 109 330 append curve x y;
#X obj 108 156 drawcurve 700 1 0 0 100 100 0 200;
#X obj 103 135 drawpolygon 7 1 0 0 100 100 0 200;
#X connect 1 0 5 2;
#X connect 2 0 1 0;
#X connect 3 0 5 0;
#X connect 3 1 2 0;
#X connect 4 0 3 0;
#X restore 198 148 pd curve;
#N canvas 0 0 450 300 showcurve 1;
#X scalar curve 100 100 \;;
#X restore 183 203 pd showcurve;
#X msg 196 119 100 100 pd-showcurve;
#X connect 2 0 0 0;
