[PD] is there a way to implement [lop~] with raw filters?

[Miller Puckette]

Dig...

#N canvas 562 85 537 289 10;
#X obj 400 126 samplerate~;
#X obj 400 149 v sr_\$0;
#X obj 390 62 loadbang;
#X floatatom 154 74 0 0 0 0 - - -;
#X obj 157 51 hsl 128 15 0 7000 0 1 empty empty empty -2 -8 0 10 -262144
-1 -1 4200 1;
#X obj 121 159 rpole~;
#X obj 48 178 lop~;
#X obj 121 183 expr~ $v1 * (1 - $f2);
#X obj 154 130 expr 1 - $f1;
#X obj 58 70 noise~;
#X msg 410 86 \; pd dsp 1;
#X obj 154 102 expr $f1 * 2*pi_\$0 / sr_\$0;
#X obj 390 171 expr atan(1) * 4;
#X obj 390 192 v pi_\$0;
#X text 90 176 =;
#X obj 68 213 -~;
#X obj 68 235 env~;
#X floatatom 68 257 5 0 0 0 - - -, f 5;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
#X connect 2 0 10 0;
#X connect 2 0 12 0;
#X connect 3 0 6 1;
#X connect 3 0 11 0;
#X connect 4 0 3 0;
#X connect 5 0 7 0;
#X connect 6 0 15 0;
#X connect 7 0 15 1;
#X connect 8 0 7 1;
#X connect 8 0 5 1;
#X connect 9 0 6 0;
#X connect 9 0 5 0;
#X connect 11 0 8 0;
#X connect 12 0 13 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;

On Thu, Sep 12, 2013 at 06:14:57PM -0300, Alexandre Torres Porres wrote:
> Well, I've tried it now and looks I got it right, check the code below...
> can you confirm if I nailed it please?
> 
> THANKS
> Cheers
> 
> #N canvas 425 68 530 262 10;
> #X obj 400 126 samplerate~;
> #X obj 400 149 v sr_\$0;
> #X obj 390 62 loadbang;
> #X floatatom 154 74 0 0 0 0 - - -;
> #X obj 157 51 hsl 128 15 0 7000 0 1 empty empty empty -2 -8 0 10 -262144
> -1 -1 1600 1;
> #X obj 121 159 rpole~;
> #X obj 48 178 lop~;
> #X obj 121 183 expr~ $v1 * (1 - $f2);
> #X obj 154 130 expr 1 - $f1;
> #X obj 58 70 noise~;
> #X obj 115 215 dac~;
> #X msg 410 86 \; pd dsp 1;
> #X obj 154 102 expr $f1 * 2*pi_\$0 / sr_\$0;
> #X obj 390 171 expr atan(1) * 4;
> #X obj 390 192 v pi_\$0;
> #X text 90 176 =;
> #X connect 0 0 1 0;
> #X connect 2 0 0 0;
> #X connect 2 0 11 0;
> #X connect 2 0 13 0;
> #X connect 3 0 6 1;
> #X connect 3 0 12 0;
> #X connect 4 0 3 0;
> #X connect 5 0 7 0;
> #X connect 7 0 10 0;
> #X connect 7 0 10 1;
> #X connect 8 0 7 1;
> #X connect 8 0 5 1;
> #X connect 9 0 6 0;
> #X connect 9 0 5 0;
> #X connect 12 0 8 0;
> #X connect 13 0 14 0;
> 
> 
> 
> 2013/9/12 Miller Puckette <msp at ucsd.edu>
> 
> > Theory is in: http://msp.ucsd.edu/techniques/latest/book-html/node140.html
> > and an example (actually a shelving filter but give the "rzero" a
> > coefficient
> > of zero to get a pure low-pass) : H11.shelving.pd
> >
> > cheers
> > Miller
> >
> > On Thu, Sep 12, 2013 at 04:24:43PM -0300, Alexandre Torres Porres wrote:
> > > Hi there, since it says [lop~] is a "one pole" filter, I was wondering if
> > > using objects like [rpole~] or [cpole~] could do the job... but I'm not
> > > even close to figure out if yes or not and why...
> > >
> > > anyone?
> > >
> > > thanks
> >
> > > _______________________________________________
> > > Pd-list at iem.at mailing list
> > > UNSUBSCRIBE and account-management ->
> > http://lists.puredata.info/listinfo/pd-list
> >
> >