blob: 71ff1f848a003baf78f358375a92654b7c262890 (
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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
|
#N canvas 339 222 580 502 10;
#X obj 134 465 outlet;
#X obj 37 19 inlet;
#X obj 134 180 route float list;
#X obj 279 20 inlet;
#X msg 37 86 stop;
#X obj 279 48 unpack f f;
#X obj 134 155 t a a;
#N canvas 848 299 450 300 rescale 0;
#X obj 29 27 inlet;
#X obj 89 27 inlet;
#X obj 103 265 outlet;
#X msg 89 82 \$1;
#X obj 89 54 t a b;
#X obj 29 181 *;
#X obj 103 237 +;
#X obj 121 105 f;
#X obj 89 143 -;
#X obj 176 205 == 0;
#X obj 176 227 sel 1;
#X obj 176 254 outlet;
#X connect 0 0 5 0;
#X connect 1 0 4 0;
#X connect 3 0 8 0;
#X connect 4 0 3 0;
#X connect 4 1 7 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 6 0 7 1;
#X connect 7 0 6 1;
#X connect 7 0 8 1;
#X connect 8 0 5 1;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X restore 134 414 pd rescale;
#N canvas 0 0 456 374 pow_curve 0;
#X obj 69 45 inlet;
#X obj 69 296 outlet;
#X obj 308 47 inlet;
#X obj 69 252 pow 1;
#X obj 308 110 t f b;
#X msg 340 133 2;
#X obj 340 154 log;
#X obj 322 178 *;
#X obj 322 202 exp;
#X connect 0 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 1 0;
#X connect 4 0 7 0;
#X connect 4 1 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 1;
#X connect 7 0 8 0;
#X connect 8 0 3 1;
#X restore 134 359 pd pow_curve;
#X obj 134 332 line 0 \$1;
#X msg 134 229 1;
#X obj 463 14 inlet;
#X obj 188 224 route 0;
#X obj 188 203 swap;
#X msg 234 248 0 \, 1 \$1;
#N canvas 0 0 678 417 curve_sigmoide 0;
#X obj 37 79 inlet;
#X obj 37 351 outlet;
#X obj 37 198 * 1;
#X obj 284 18 inlet;
#X obj 37 278 expr $f1 / $f2;
#X obj 37 251 - 0.5;
#X obj 316 249 - 0.5;
#X obj 37 118 - 0.5;
#X obj 37 140 * 2;
#X obj 37 304 / 2;
#X obj 37 326 + 0.5;
#X obj 284 105 * 10;
#X obj 284 154 t f f;
#X msg 304 70 0;
#X obj 304 47 loadbang;
#X obj 316 227 expr (exp($f1)) / ( 1 + exp($f1));
#X obj 37 228 expr (exp($f1)) / ( 1 + exp($f1));
#X obj 284 130 + 0.00015;
#X connect 0 0 7 0;
#X connect 2 0 16 0;
#X connect 3 0 11 0;
#X connect 4 0 9 0;
#X connect 5 0 4 0;
#X connect 6 0 4 1;
#X connect 7 0 8 0;
#X connect 8 0 2 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 17 0;
#X connect 12 0 2 1;
#X connect 12 1 15 0;
#X connect 13 0 11 0;
#X connect 14 0 13 0;
#X connect 15 0 6 0;
#X connect 16 0 5 0;
#X connect 17 0 12 0;
#X restore 134 387 pd curve_sigmoide;
#X obj 37 46 route stop set;
#X msg 84 88 set \$1;
#X text 211 476 protection si destination == depart \, alors pas de
line \, pour reduire l'utilisation CPU;
#X obj 201 435 delay 1;
#X msg 188 248 1;
#X text 209 523 TODO : ne pas avoir a trigger le line \, car c'est
ca qui prend des resources;
#X obj 134 438 t f f;
#X msg 187 92 \$1;
#X obj 134 71 t a a;
#X obj 134 136 spigot 1;
#X obj 187 114 != -1;
#X connect 1 0 16 0;
#X connect 2 0 10 0;
#X connect 2 1 13 0;
#X connect 3 0 5 0;
#X connect 4 0 9 0;
#X connect 5 0 8 1;
#X connect 5 1 15 1;
#X connect 6 0 2 0;
#X connect 6 1 7 1;
#X connect 7 0 22 0;
#X connect 7 1 19 0;
#X connect 8 0 15 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X connect 11 0 9 0;
#X connect 12 0 20 0;
#X connect 12 1 14 0;
#X connect 13 0 12 0;
#X connect 14 0 9 0;
#X connect 15 0 7 0;
#X connect 16 0 4 0;
#X connect 16 1 17 0;
#X connect 16 1 4 0;
#X connect 16 2 24 0;
#X connect 20 0 9 0;
#X connect 22 0 0 0;
#X connect 22 1 26 1;
#X connect 23 0 26 0;
#X connect 24 0 25 0;
#X connect 24 1 23 0;
#X connect 25 0 6 0;
#X connect 26 0 25 1;
|