view scene demo/compTeleWireSource.pd @ 261:eb3fb10f2541

Howe Intensity Eqns fixed. Added into dipole and monopole patches.
Frquency limits added to dipole patches
Need to add frequency limits to the monopole patch
Look at adding in the effect of shear layer thickness

#N canvas 99 56 1095 540 10;
#X obj -345 61 inlet;
#X obj -282 60 inlet;
#X obj -216 62 inlet;
#X obj -153 62 inlet;
#X obj -85 63 inlet;
#X obj -15 64 inlet;
#X obj 55 65 inlet;
#X obj 125 63 inlet;
#X obj 197 63 inlet;
#X obj -149 184 pack f f f f f f f f f;
#X obj 365 67 loadbang;
#X msg 365 92 200;
#X obj 314 67 r setUp;
#X obj 365 115 s NO_WIR_SRC;
#X obj -444 274 loadbang;
#X msg -444 295 1;
#X obj -444 253 r setUp;
#X obj -495 317 wire10_D2;
#X connect 0 0 9 0;
#X connect 1 0 9 1;
#X connect 2 0 9 2;
#X connect 3 0 9 3;
#X connect 4 0 9 4;
#X connect 5 0 9 5;
#X connect 6 0 9 6;
#X connect 7 0 9 7;
#X connect 8 0 9 8;
#X connect 9 0 17 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 12 0 11 0;
#X connect 14 0 15 0;
#X connect 15 0 17 1;
#X connect 16 0 14 0;