Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2025-11-15 17:43:53 +01:00
Code Issues Releases Wiki Activity

Update Nyquist to v3.09.

Browse Source
This commit is contained in:
Leland Lucius
2015-04-07 22:10:17 -05:00
parent f88b27e6d8
commit 9fb0ce5b82
358 changed files with 26327 additions and 7043 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lib-src/libnyquist/nyquist/tran/buzz.alg
View File

@@ -18,16 +18,13 @@
: (sample_type) (SINE_TABLE_LEN * 0.5 / sr)")) ;cancel 0/0
(ALWAYS-SCALE s_fm)
(INLINE-INTERPOLATION T) ; so that modulation can be low frequency
(STEP-FUNCTION s_fm)
(TERMINATE (MIN s_fm))
(LOGICAL-STOP (MIN s_fm))
(INNER-LOOP-LOCALS " long table_index;
(INNER-LOOP-LOCALS " long table_index;
double x1;
sample_type num, denom, samp;
")
(INNER-LOOP "
table_index = (long) phase;
sample_type num, denom, samp;\n")
(INNER-LOOP "table_index = (long) phase;
x1 = sine_table[table_index];
denom = (sample_type) (x1 + (phase - table_index) *
(sine_table[table_index + 1] - x1));
@@ -48,7 +45,6 @@
/* watch out for negative frequencies! */
while (phase < 0) phase += SINE_TABLE_LEN")
(CONSTANT "ph_incr" "n_2_p1" "n_2_r")
(SAMPLE-RATE "sr")
)