equal
deleted
inserted
replaced
476 defaultPrintFormat:something |
476 defaultPrintFormat:something |
477 DefaultPrintFormat := something. |
477 DefaultPrintFormat := something. |
478 ! |
478 ! |
479 |
479 |
480 epsilon |
480 epsilon |
|
481 "return the maximum relative spacing of instances of mySelf |
|
482 (i.e. the value-delta of the least significant bit)" |
|
483 |
481 Epsilon isNil ifTrue:[ |
484 Epsilon isNil ifTrue:[ |
482 Epsilon := self computeEpsilon. |
485 Epsilon := self computeEpsilon. |
483 ]. |
486 ]. |
484 ^ Epsilon |
487 ^ Epsilon |
|
488 |
|
489 " |
|
490 Float epsilon -> 2.22044604925031E-16 |
|
491 ShortFloat epsilon -> 1.19209289550781E-07 |
|
492 LongFloat epsilon -> 1.0842021724855E-19 |
|
493 QDouble epsilon -> 1.21543267145725E-63 |
|
494 " |
|
495 |
|
496 "Modified (comment): / 21-06-2017 / 13:57:03 / cg" |
485 ! ! |
497 ! ! |
486 |
498 |
487 !LongFloat class methodsFor:'class initialization'! |
499 !LongFloat class methodsFor:'class initialization'! |
488 |
500 |
489 initialize |
501 initialize |