Commit 497ac14e authored by bjoern kessler's avatar bjoern kessler

differen approach following millers paper in 02.unitary-delay-network.dsp

parent fb9111a7
......@@ -5,7 +5,7 @@ fi = library("filters.lib");
no = library("noises.lib");
ma = library("maths.lib");
process =
pricess =
chair.dc_offset :
// 1. DC as an envelope
// 2. Clean signal
......@@ -36,3 +36,7 @@ process =
(_,+,_) :
//de.fdelay4(ma.SR/5),_) ~ _ : (!,_);
de.delay(ma.SR/5),_) ~ _ : (!,_);
process =
chair.dc_offset : (_, 4 * ma.SR / 1000, _ ) :
(chair.allp);
chair = library("chair.lib");
de = library("delays.lib");
fi = library("filters.lib");
no = library("noises.lib");
ma = library("maths.lib");
//prociss =
// chair.dc_offset <:
// (
// (((chair.x,_) : (2 * ma.PI * (cos)),( + : de.delay(ma.SR/5, 5) * 0.999) : * ) ~ _ ),
// (((chair.x,_) : (2 * ma.PI * (sin)),( + : de.delay(ma.SR/5, 5) * 0.999) : * ) ~ _ )
// ) : + ;
g(x) =
(x, _, x, _, x, _, x,_) : (*,*,*,*);
mx(psi,damp) =
(cos(psi),_, sin(psi) * (-1),_, sin(psi),_, cos(psi),_) : (*,*,*,*) : g(damp);
process =
// chair.dc_offset <: ;
((_,chair.x,_) : (+,+) : (_,_) <: mx(0.5,0.99) : (+,+)) ~
(de.delay(ma.SR/5, 5*ma.SR/1000),de.delay(ma.SR/5, 5*ma.SR/1000)) ;
jackconsole: 01.percussion-snare.dsp
faust -a jack-console.cpp -o 01.percussion-snare.cpp 01.percussion-snare.dsp
g++ -lpthread `pkg-config --cflags --libs jack` -Wfatal-errors -O3 -mfpmath=sse -msse -msse2 -msse3 -ffast-math 01.percussion-snare.cpp -o 01.percussion-snare-jackconsole
install -d build
install 01.percussion-snare-jackconsole build/01.percussion-snare-jackconsole
rm 01.percussion-snare-jackconsole
svg: 01.percussion-snare.dsp
faust -svg 01.percussion-snare.dsp > /dev/null
sources = *.dsp
svg : $(sources)
faust -svg $< > /dev/null
jackconsole : %.cpp
# faust -a jack-console.cpp -o 01.percussion-snare.cpp 01.percussion-snare.dsp
# g++ -lpthread `pkg-config --cflags --libs jack` -Wfatal-errors -O3 -mfpmath=sse -msse -msse2 -msse3 -ffast-math 01.percussion-snare.cpp -o 01.percussion-snare-jackconsole
g++ -lpthread `pkg-config --cflags --libs jack` -Wfatal-errors -O3 -mfpmath=sse -msse -msse2 -msse3 -ffast-math $< -o $@
# install -d build
# install 01.percussion-snare-jackconsole build/01.percussion-snare-jackconsole
# rm 01.percussion-snare-jackconsole
%.cpp : $(sources)
faust -a jack-console.cpp -o $@.cpp $<
#oldsvg : 01.percussion-snare.dsp
# faust -svg 01.percussion-snare.dsp > /dev/null
clean:
rm -f *.cpp
rm -rf *-svg
......
......@@ -28,3 +28,4 @@ allp =
//de.fdelay4(ma.SR/10),_) ~_ ),_) : (*,*) : (-);
de.delay(ma.SR/10),_) ~_ ),_) : (*,*) : (-);
// (_,_,_):((*),_):(-);
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment