summaryrefslogtreecommitdiff
path: root/metapost
diff options
context:
space:
mode:
authorContext Git Mirror Bot <phg42.2a@gmail.com>2014-07-11 13:15:03 +0200
committerContext Git Mirror Bot <phg42.2a@gmail.com>2014-07-11 13:15:03 +0200
commitb707604d6f165b803831d20654724c8f129d4700 (patch)
tree8d7359f673ababd992b0542910fd366b4c01cfb1 /metapost
parentc9b642d1b85111d8dcd94c443161e74583207e7d (diff)
downloadcontext-b707604d6f165b803831d20654724c8f129d4700.tar.gz
2014-07-11 12:22:00
Diffstat (limited to 'metapost')
-rw-r--r--metapost/context/base/mp-tool.mpiv6
1 files changed, 3 insertions, 3 deletions
diff --git a/metapost/context/base/mp-tool.mpiv b/metapost/context/base/mp-tool.mpiv
index 7845467a4..17bb0e9c2 100644
--- a/metapost/context/base/mp-tool.mpiv
+++ b/metapost/context/base/mp-tool.mpiv
@@ -292,12 +292,12 @@ enddef;
%D Some missing functions can be implemented rather straightforward (thanks to
%D Taco and others):
-pi := 3.14159265358979323846 ; radian := 180/pi ; % 2pi*radian = 360 ;
+% oldpi := 3.14159265358979323846 ; % from <math.h>
+pi := 3.14159265358979323846264338327950288419716939937510 ; % 50 digits
+radian := 180/pi ; % 2pi*radian = 360 ;
% let +++ = ++ ;
-numeric Pi ; Pi := pi ; % for some old compatibility reasons i guess
-
vardef sqr primary x = x*x enddef ;
vardef log primary x = if x=0: 0 else: mlog(x)/mlog(10) fi enddef ;
vardef ln primary x = if x=0: 0 else: mlog(x)/256 fi enddef ;