aboutsummaryrefslogtreecommitdiff
path: root/cubic_seat.pd
blob: 2f79ff1c16fd93db5e48d2724b3e53eda5761053 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
#N canvas 571 181 589 471 12;
#X obj 42 10 inlet;
#X obj 349 13 inlet;
#X obj 106 405 outlet;
#X obj 220 10 loadbang;
#X obj 147 9 inlet;
#X obj 147 50 purepd/float_argument \$1;
#X obj 349 54 purepd/float_argument \$2;
#X obj 42 113 moses;
#X obj 147 97 moses 1;
#X obj 147 121 + 1e-06;
#X text 202 106 prevent divide by 0;
#X obj 7 199 expr $f3 - $f3*pow(1 - $f1/$f2 \, 3);
#X obj 152 275 expr $f3 + (1 - $f3) * pow(($f1 - $f2) / (1 - $f2) \,
3);
#X obj 349 121 float;
#X connect 0 0 7 0;
#X connect 1 0 6 0;
#X connect 3 0 5 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 7 1;
#X connect 5 0 8 0;
#X connect 6 0 13 0;
#X connect 7 0 11 0;
#X connect 7 1 12 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 9 0 12 1;
#X connect 11 0 2 0;
#X connect 12 0 2 0;
#X connect 13 0 11 2;
#X connect 13 0 12 2;