#N canvas 159 54 987 753 10;
#X floatatom 143 239 11 0 0 0 - - -;
#X floatatom 120 266 11 0 0 0 - - -;
#X symbolatom 21 380 25 0 0 0 - - -;
#X symbolatom 473 281 25 0 0 0 - - -;
#X obj 472 222 + 3.1415;
#X msg 472 201 9.26536e-05;
#X text 526 258 7-8 digits accurate;
#X text 229 238 difference;
#X text 204 265 truncated;
#X text 203 380 internal value;
#X text 664 617 IEM KUG;
#X text 648 605 musil;
#X text 685 605 @;
#X text 694 605 iem.at;
#X text 647 627 Graz \, Austria;
#X text 707 579 @;
#X text 716 579 iem.at;
#X text 648 579 zmoelnig;
#X text 75 53 the inputs are two floats \, left one is the float-truncated
value of a double value \, the right one is the difference between
double value and the float-truncated.;
#X text 74 112 output is a symbol:hexadeximal of sum of both double
casted inputs;
#X symbolatom 104 459 25 0 0 0 - - -;
#X obj 36 313 +__ 2;
#X symbolatom 159 337 25 0 0 0 - - -;
#X msg 668 440 1e-23;
#X symbolatom 645 493 25 0 0 0 - - -;
#X obj 644 470 ftohex;
#X msg 719 440 2e-23;
#X msg 773 440 4e-23;
#X msg 824 440 8e-23;
#X msg 707 361 1e+19;
#X msg 756 360 1e+20;
#X symbolatom 318 579 25 0 0 0 - - -;
#X msg 670 385 1e-18;
#X msg 719 385 1e-19;
#X text 70 13 double to hexadecimal converter (only for debugging purpose)
;
#X msg 20 149 "0.000000000000000001;
#X msg 21 175 "1e-18;
#X msg 19 199 "1e-23;
#X msg 709 95 "22.2222222233;
#X msg 708 71 "44.4444444444;
#X msg 708 48 "44.444444444444;
#X msg 710 119 "22.2222222222;
#X msg 710 142 "-22.2222222222;
#X msg 555 81 "1.234;
#X msg 558 106 "1.9999;
#X msg 562 131 "2.00123;
#X msg 491 154 "0.987;
#X msg 627 175 "1e-14;
#X msg 384 388 "1e+19;
#X msg 436 388 "1e+20;
#X msg 396 413 "-1e+19;
#X msg 456 413 "-1e+20;
#X msg 365 448 "1e-18;
#X msg 423 449 "1e-19;
#X msg 377 471 "-1e-18;
#X msg 423 513 "2;
#X msg 441 473 "-1e-19;
#N canvas 0 22 907 755 (subpatch) 0;
#X symbolatom 317 582 25 0 0 0 - - -;
#X msg 396 413 "-1e+19;
#X msg 456 413 "-1e+20;
#X msg 365 448 "1e-18;
#X msg 423 449 "1e-19;
#X msg 377 471 "-1e-18;
#X msg 423 513 "2;
#X msg 441 473 "-1e-19;
#X symbolatom 163 312 10 0 0 0 - - -;
#X obj 162 290 makefilename "1e%d;
#X floatatom 163 254 5 -78 78 0 - - -;
#X obj 164 334 unsymbol;
#X symbolatom 314 311 10 0 0 0 - - -;
#X floatatom 314 253 5 -46 39 0 - - -;
#X obj 315 333 unsymbol;
#X obj 313 289 makefilename "-1e%d;
#X obj 316 559 dptohex;
#X obj 317 531 symtodp;
#X connect 1 0 17 0;
#X connect 2 0 17 0;
#X connect 3 0 17 0;
#X connect 4 0 17 0;
#X connect 5 0 17 0;
#X connect 6 0 17 0;
#X connect 7 0 17 0;
#X connect 8 0 11 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X connect 11 0 17 0;
#X connect 12 0 14 0;
#X connect 13 0 15 0;
#X connect 14 0 17 0;
#X connect 15 0 12 0;
#X connect 16 0 0 0;
#X connect 17 0 16 0;
#X connect 17 1 16 1;
#X restore 76 577 pd;
#X obj 548 377 pow;
#X msg 546 355 10 \$1;
#X floatatom 545 335 5 -46 39 0 - - -;
#X floatatom 549 400 0 0 0 0 - - -;
#X obj 595 376 pow;
#X msg 593 354 10 \$1;
#X floatatom 592 334 5 -46 39 0 - - -;
#X floatatom 600 423 0 0 0 0 - - -;
#X obj 598 400 * -1;
#X obj 472 258 dptohex;
#X obj 317 556 dptohex;
#X obj 20 357 dptohex;
#X obj 158 314 dptohex;
#X obj 103 436 dptosym;
#X text 14 12 dptohex;
#X text 199 196 15 digits accurate;
#X msg 94 169 "3.14159265358979;
#X msg 100 477 "3.14159265358979;
#X text 37 478 should be;
#X obj 117 195 symtodp;
#X obj 317 531 symtodp;
#X text 599 566 (c) IOhannes m zmoelnig 1999 - 2013;
#X text 599 594 (c) Thomas Musil 2000 - 2013;
#X connect 4 0 67 0;
#X connect 5 0 4 0;
#X connect 21 0 69 0;
#X connect 21 1 69 1;
#X connect 23 0 25 0;
#X connect 25 0 24 0;
#X connect 26 0 25 0;
#X connect 27 0 25 0;
#X connect 28 0 25 0;
#X connect 29 0 25 0;
#X connect 30 0 25 0;
#X connect 32 0 25 0;
#X connect 33 0 25 0;
#X connect 35 0 77 0;
#X connect 36 0 77 0;
#X connect 37 0 77 0;
#X connect 48 0 78 0;
#X connect 49 0 78 0;
#X connect 50 0 78 0;
#X connect 51 0 78 0;
#X connect 52 0 78 0;
#X connect 53 0 78 0;
#X connect 54 0 78 0;
#X connect 55 0 78 0;
#X connect 56 0 78 0;
#X connect 58 0 61 0;
#X connect 59 0 58 0;
#X connect 60 0 59 0;
#X connect 61 0 25 0;
#X connect 62 0 66 0;
#X connect 63 0 62 0;
#X connect 64 0 63 0;
#X connect 65 0 25 0;
#X connect 66 0 65 0;
#X connect 67 0 3 0;
#X connect 68 0 31 0;
#X connect 69 0 2 0;
#X connect 70 0 22 0;
#X connect 71 0 20 0;
#X connect 74 0 77 0;
#X connect 77 0 1 0;
#X connect 77 0 21 0;
#X connect 77 0 70 0;
#X connect 77 0 71 0;
#X connect 77 1 0 0;
#X connect 77 1 21 1;
#X connect 77 1 70 1;
#X connect 77 1 71 1;
#X connect 78 0 68 0;
#X connect 78 1 68 1;