#N canvas 283 137 706 514 10;
#X obj 10 9 inlet;
#X text 58 10 takes a list of 9 numbers (3 vectors of a triangular
face);
#X obj 10 486 outlet;
#X obj 10 433 pack f f f;
#X obj 10 33 unpack f f f f f f f f f;
#X obj 101 140 expr ( ($f1 - $f2) * ($f3 - $f4) ) - ( ($f3 - $f5) *
($f1 - $f6) );
#X obj 10 344 expr ( ($f1 - $f2) * ($f3 - $f4) ) - ( ($f3 - $f5) *
($f1 - $f6) );
#X obj 10 460 sx/unit;
#X obj 52 244 expr ( ($f3 - $f2) * ($f1 - $f4) ) - ( ($f1 - $f5) *
($f3 - $f6) );
#X obj 11 106 t f f;
#X obj 13 408 f;
#X obj 10 378 t b f;
#X connect 0 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 9 0;
#X connect 4 1 5 0;
#X connect 4 1 6 2;
#X connect 4 2 5 2;
#X connect 4 2 8 2;
#X connect 4 3 6 1;
#X connect 4 3 8 4;
#X connect 4 4 5 1;
#X connect 4 4 6 4;
#X connect 4 5 5 4;
#X connect 4 5 8 1;
#X connect 4 6 6 5;
#X connect 4 6 8 3;
#X connect 4 7 5 5;
#X connect 4 7 6 3;
#X connect 4 8 5 3;
#X connect 4 8 8 5;
#X connect 5 0 10 1;
#X connect 6 0 11 0;
#X connect 7 0 2 0;
#X connect 8 0 3 1;
#X connect 9 0 6 0;
#X connect 9 1 8 0;
#X connect 10 0 3 0;
#X connect 11 0 10 0;
#X connect 11 1 3 2;