steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add more math.constants

db4
Aaron Schaefer 2008-01-24 18:12:39 -05:00
parent cf670bd234
commit 6d5c1bf1d2
2 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
extra/math/constants/constants-docs.factor
View File

@ -4,6 +4,8 @@ IN: math.constants
ARTICLE: "math-constants" "Constants" ARTICLE: "math-constants" "Constants"
"Standard mathematical constants:" "Standard mathematical constants:"
{ $subsection e } { $subsection e }
{ $subsection gamma }
{ $subsection phi }
{ $subsection pi } { $subsection pi }
"Various limits:" "Various limits:"
{ $subsection most-positive-fixnum } { $subsection most-positive-fixnum }
@ -15,6 +17,13 @@ ABOUT: "math-constants"
HELP: e HELP: e
{ $values { "e" "base of natural logarithm" } } ; { $values { "e" "base of natural logarithm" } } ;
HELP: gamma
{ $values { "gamma" "Euler-Mascheroni constant" } }
{ $description "The Euler-Mascheroni constant, also called \"Euler's constant\" or \"the Euler constant\"." } ;
HELP: phi
{ $values { "phi" "golden ratio" } } ;
HELP: pi HELP: pi
{ $values { "pi" "circumference of circle with diameter 1" } } ; { $values { "pi" "circumference of circle with diameter 1" } } ;

2
extra/math/constants/constants.factor
View File

@ -3,5 +3,7 @@
IN: math.constants IN: math.constants
: e ( -- e ) 2.7182818284590452354 ; inline : e ( -- e ) 2.7182818284590452354 ; inline
: gamma ( -- gamma ) 0.57721566490153286060 ; inline
: pi ( -- pi ) 3.14159265358979323846 ; inline : pi ( -- pi ) 3.14159265358979323846 ; inline
: phi ( -- phi ) 1.61803398874989484820 ; inline
: epsilon ( -- epsilon ) 2.2204460492503131e-16 ; inline : epsilon ( -- epsilon ) 2.2204460492503131e-16 ; inline