view Propellor/pulse_demo.pd @ 265:d5feff271036

Shear layer thickness patch added based on equations
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Wed, 25 Jan 2017 09:31:42 +0000
parents 18d9eb604d30
children
line wrap: on
line source
#N canvas 215 58 261 395 10;
#X obj 102 45 phasor~;
#N canvas 0 0 450 300 grapha 0;
#X obj 100 100 cnv 15 100 100 empty empty empty 20 12 0 14 -262144
-66577 0;
#N canvas 0 0 450 300 graph3 0;
#X array A 100 float 0;
#X coords 0 1 99 -1 100 100 1;
#X restore 100 100 graph;
#X obj 210 209 tabwrite~ A;
#X obj 289 155 inlet~;
#X obj 210 130 loadbang;
#X obj 278 131 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 217 178 s b;
#X obj 210 155 metro 200;
#X connect 3 0 2 0;
#X connect 4 0 7 0;
#X connect 5 0 7 0;
#X connect 7 0 2 0;
#X connect 7 0 6 0;
#X coords 0 -1 1 1 100 100 1 100 100;
#X restore 3 277 pd grapha;
#N canvas 0 0 450 300 grapha 0;
#X obj 100 100 cnv 15 100 100 empty empty empty 20 12 0 14 -262144
-66577 0;
#N canvas 0 0 450 300 graph3 0;
#X array B 100 float 0;
#X coords 0 1 99 -1 100 100 1;
#X restore 100 100 graph;
#X obj 289 155 inlet~;
#X obj 210 182 tabwrite~ B;
#X obj 210 156 r b;
#X connect 2 0 3 0;
#X connect 4 0 3 0;
#X coords 0 -1 1 1 100 100 1 100 100;
#X restore 133 277 pd grapha;
#X obj 35 150 -~ 0.5;
#X obj 35 174 *~;
#X obj 35 194 *~ -4;
#X obj 35 214 +~ 1;
#X obj 35 234 *~ 0.5;
#X obj 105 4 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8 -262144
-1 -1 5700 1;
#X obj 102 22 * 700;
#X obj 103 67 *~ 4;
#X obj 35 96 clip~ 0 1;
#X obj 158 94 clip~ 1 2;
#X obj 158 115 -~ 1;
#X obj 158 151 -~ 0.5;
#X obj 158 175 *~;
#X obj 158 195 *~ -4;
#X obj 158 215 +~ 1;
#X obj 158 235 *~ 0.5;
#X connect 0 0 10 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 1 0;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 10 0 11 0;
#X connect 10 0 12 0;
#X connect 11 0 3 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 14 0 15 1;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 18 0 2 0;