#N canvas 223 126 515 348 10;
#X obj 21 39 unpack f f f;
#X obj 21 82 t f f f;
#X obj 43 107 *;
#X obj 76 82 t f f f;
#X obj 98 107 *;
#X obj 131 81 t f f f;
#X obj 153 106 *;
#X obj 43 130 +;
#X obj 43 151 +;
#X obj 43 172 sqrt;
#X obj 21 266 /;
#X obj 60 266 /;
#X obj 115 269 /;
#X obj 21 293 pack f f f;
#X text 195 135 V =;
#X obj 60 245 f;
#X obj 115 248 f;
#X obj 60 218 t b f;
#X obj 115 220 t b f;
#X obj 21 14 inlet vector;
#X obj 21 318 outlet vector;
#X text 123 319 V;
#X text 117 13 A;
#X text 176 41 normalizes the incomimg vector A to ||V|| = 1;
#X text 228 119 | Ax/((x^2+y^2+z^2)^(1/2)) |;
#X text 227 135 | Ay/((x^2+y^2+z^2)^(1/2)) |;
#X text 227 152 | Az/((x^2+y^2+z^2)^(1/2)) |;
#X text 300 306 Version: 2007-12-09;
#X text 301 325 Author: Roman Haefeli;
#X connect 0 0 1 0;
#X connect 0 1 3 0;
#X connect 0 2 5 0;
#X connect 1 0 10 0;
#X connect 1 1 2 0;
#X connect 1 2 2 1;
#X connect 2 0 7 0;
#X connect 3 0 15 1;
#X connect 3 1 4 0;
#X connect 3 2 4 1;
#X connect 4 0 7 1;
#X connect 5 0 16 1;
#X connect 5 1 6 0;
#X connect 5 2 6 1;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 10 1;
#X connect 9 0 17 0;
#X connect 9 0 18 0;
#X connect 10 0 13 0;
#X connect 11 0 13 1;
#X connect 12 0 13 2;
#X connect 13 0 20 0;
#X connect 15 0 11 0;
#X connect 16 0 12 0;
#X connect 17 0 15 0;
#X connect 17 1 11 1;
#X connect 18 0 16 0;
#X connect 18 1 12 1;
#X connect 19 0 0 0;