#N canvas 486 219 326 391 12;
#X obj 71 171 vasp.pwrap;
#X obj 25 285 vasp.rect;
#X obj 25 259 vasp.join 2;
#X obj 71 223 vasp.int;
#X obj 71 197 vasp.* \$1;
#X obj 70 145 vasp.dif;
#X obj 25 81 vasp.polar;
#X obj 25 110 vasp.split 2;
#X text 26 31 multiply phase velocity by argument factor;
#X obj 25 56 inlet;
#X obj 24 316 outlet;
#X connect 0 0 4 0;
#X connect 1 0 10 0;
#X connect 2 0 1 0;
#X connect 3 0 2 1;
#X connect 4 0 3 0;
#X connect 5 0 0 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X connect 7 1 5 0;
#X connect 9 0 6 0;