#N canvas 0 0 450 300 10;
#X obj 132 115 line;
#X msg 101 95 1 0;
#X msg 132 94 100 2000;
#X obj 132 135 expr ((($f1 * .01) * ($f1 * .01)));
#X obj 132 156 tabwrite \$1-map;
#X obj 132 69 inlet draw(bang);
#X text 118 13 Exponential rise. Writes to 100 point table. First arg
gives table number.;
#X obj 276 68 inlet reset(bang);
#X connect 0 0 3 0;
#X connect 0 0 4 1;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 4 0;
#X connect 5 0 2 0;
#X connect 7 0 1 0;