Skip to content

Instantly share code, notes, and snippets.

@SergeStinckwich
Last active August 29, 2015 14:23
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save SergeStinckwich/871bf16587deeb6f0abb to your computer and use it in GitHub Desktop.
Save SergeStinckwich/871bf16587deeb6f0abb to your computer and use it in GitHub Desktop.
Rump Example
"http://www.informatik.uni-bremen.de/agbkb/lehre/extratreffen/Santiago102007Interval.pdf"
f := [ :x : y|
((333.75 - (x raisedTo:2))* (y raisedTo: 6)) + ((x raisedTo: 2) *
((11* (x raisedTo: 2) * (y raisedTo: 2)) - (121 * (y raisedTo: 4)) - 2))
+ (5.5 * (y raisedTo: 8)) + (x/(2*y))
].
f value: 77617 value: 33096. "1.1726039400531787"
f value: (77617 asArbitraryPrecisionFloatNumBits: 53) value: (33096 asArbitraryPrecisionFloatNumBits: 53).
"1.1726039400531787"
f value: (77617 asArbitraryPrecisionFloatNumBits: 64) value: (33096 asArbitraryPrecisionFloatNumBits: 64).
"5.764607523034234892e17"
f value: (77617 asArbitraryPrecisionFloatNumBits: 122) value: (33096 asArbitraryPrecisionFloatNumBits: 122).
"-0.827396059946821368141165095479816292"
f value: (77617 asArbitraryPrecisionFloatNumDecimalDigits: 37) value: (33096 asArbitraryPrecisionFloatNumDecimalDigits: 37).
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment