From 577ac6e80ff4f436fbd054291ed7dddbc31bd49a Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Tue, 18 May 2004 21:33:33 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r1738, which included commits to RCS files with non-trunk default branches. svn path=/trunk/externals/iemlib/; revision=1739 --- iemabs/int_fract~.pd | 35 +++++++++++++++++++++++++++++++++++ 1 file changed, 35 insertions(+) create mode 100644 iemabs/int_fract~.pd (limited to 'iemabs/int_fract~.pd') diff --git a/iemabs/int_fract~.pd b/iemabs/int_fract~.pd new file mode 100644 index 0000000..edf0ec2 --- /dev/null +++ b/iemabs/int_fract~.pd @@ -0,0 +1,35 @@ +#N canvas 323 149 549 327 10; +#X obj 21 68 inlet~; +#X obj 22 238 outlet~; +#X text 14 277 (c) musil@iem.kug.ac.at; +#X text 56 290 IEM KUG; +#X text 61 68 ~signal_in~; +#X text 31 302 graz \, austria 2003; +#X obj 152 115 float24 12 582 912; +#X obj 22 152 +~ 1.25829e+007; +#X obj 22 178 -~ 1.25829e+007; +#X obj 152 95 loadbang; +#X text 278 112 1.5 * 2 ^ 23; +#X text 11 9 int_fract~; +#X text 143 34 and the fractal part of the float-number; +#X text 120 12 signal-float-splitting to the; +#X text 130 23 truncated signal-integer-number; +#X obj 196 237 outlet~; +#X text 69 239 ~signal_int~; +#X text 243 238 ~signal_fract~; +#X obj 22 125 -~ 0.5; +#X obj 196 213 -~; +#X text 235 253 fractal-part: 0 .. 1; +#X text 68 252 integer-part; +#X text 260 150 there is a little inaccuracy; +#X text 265 162 each odd number has a fractal-part of 1; +#X connect 0 0 18 0; +#X connect 0 0 19 0; +#X connect 6 0 7 1; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 1 0; +#X connect 8 0 19 1; +#X connect 9 0 6 0; +#X connect 18 0 7 0; +#X connect 19 0 15 0; -- cgit v1.2.1