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
|
// Size = 103
ID_0 = float(fSamplingFreq);
ID_1 = max(1.0f, ID_0);
ID_2 = min(1.92e+05f, ID_1);
ID_3 = 1e+03f/ID_2;
ID_4 = hslider("grainsize [unit:msec]",1e+02f,1.0f,1e+03f,1.0f);
ID_5 = ID_3/ID_4;
ID_6 = W1;
ID_7 = proj0(ID_6);
ID_8 = ID_7';
ID_9 = ID_5+ID_8;
ID_10 = floor(ID_9);
ID_11 = ID_8-ID_10;
ID_12 = ID_5+ID_11;
ID_13 = letrec(W1 = (ID_12));
ID_14 = proj0(ID_13);
ID_15 = ID_14@0;
ID_16 = (ID_15>0.0001f);
ID_17 = (ID_8<=0.0001f);
ID_18 = ID_16*ID_17;
ID_19 = W5;
ID_20 = proj0(ID_19);
ID_21 = ID_20';
ID_22 = W2;
ID_23 = proj0(ID_22);
ID_24 = ID_23';
ID_25 = 1103515245*ID_24;
ID_26 = ID_25+12345;
ID_27 = letrec(W2 = (ID_26));
ID_28 = proj0(ID_27);
ID_29 = ID_28@0;
ID_30 = float(ID_29);
ID_31 = 4.656613e-10f*ID_30;
ID_32 = (ID_31+1.0f);
ID_33 = 0.5f*ID_32;
ID_34 = hslider("rarefaction",0.2f,0.0f,1.0f,0.01f);
ID_35 = ID_33>ID_34;
ID_36 = select2(ID_18,ID_21,ID_35);
ID_37 = letrec(W5 = (ID_36));
ID_38 = proj0(ID_37);
ID_39 = ID_38@0;
ID_40 = float(ID_39);
ID_41 = W0;
ID_42 = proj0(ID_41);
ID_43 = ID_42';
ID_44 = 0.0005f*ID_2;
ID_45 = hslider("delaymax",1e+03f,1e+01f,1e+04f,1.0f);
ID_46 = ID_44*ID_45;
ID_47 = ID_46*ID_32;
ID_48 = select2(ID_18,ID_43,ID_47);
ID_49 = letrec(W0 = (ID_48));
ID_50 = proj0(ID_49);
ID_51 = ID_50@0;
ID_52 = int(ID_51);
ID_53 = max(0, ID_52);
ID_54 = min(524289, ID_53);
ID_55 = IN[0]@ID_54;
ID_56 = floor(ID_51);
ID_57 = 1.0f-ID_51;
ID_58 = (ID_56+ID_57);
ID_59 = ID_55*ID_58;
ID_60 = (ID_51-ID_56);
ID_61 = ID_52+1;
ID_62 = max(0, ID_61);
ID_63 = min(524289, ID_62);
ID_64 = IN[0]@ID_63;
ID_65 = ID_60*ID_64;
ID_66 = (ID_59+ID_65);
ID_67 = ID_40*ID_66;
ID_68 = W3;
ID_69 = proj0(ID_68);
ID_70 = ID_69';
ID_71 = ID_70+1;
ID_72 = letrec(W3 = (ID_71));
ID_73 = proj0(ID_72);
ID_74 = ID_73@0;
ID_75 = ID_74+-1;
ID_76 = float(ID_75);
ID_77 = 9.58738e-05f*ID_76;
ID_78 = sin(ID_77);
ID_79 = sigGen(ID_78);
ID_80 = WRTbl2p(65536,ID_79);
ID_81 = W4;
ID_82 = proj0(ID_81);
ID_83 = ID_82';
ID_84 = floor(ID_83);
ID_85 = ID_83-ID_84;
ID_86 = letrec(W4 = (ID_85));
ID_87 = proj0(ID_86);
ID_88 = ID_87@0;
ID_89 = 65536.0f*ID_88;
ID_90 = int(ID_89);
ID_91 = sigRDTbl(ID_80,ID_90);
ID_92 = 3.1415927f*ID_15;
ID_93 = cos(ID_92);
ID_94 = ID_91*ID_93;
ID_95 = cos(ID_77);
ID_96 = sigGen(ID_95);
ID_97 = WRTbl2p(65536,ID_96);
ID_98 = sigRDTbl(ID_97,ID_90);
ID_99 = sin(ID_92);
ID_100 = ID_98*ID_99;
ID_101 = (ID_94+ID_100);
ID_102 = ID_67*ID_101;
SIG = (ID_102);
|
