From 577ac6e80ff4f436fbd054291ed7dddbc31bd49a Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
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