From 61982032ea7eee2c3864add894b2199b639dd225 Mon Sep 17 00:00:00 2001
From: musil <tmusil@users.sourceforge.net>
Date: Fri, 1 Apr 2005 17:37:22 +0000
Subject: initial checkin (release 1.15) this time as binary (instead of text)

svn path=/trunk/externals/iemlib/; revision=2665
---
 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..be63fad
--- /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