From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/878
Path: main.gmane.org!not-for-mail
From: David Arnold <darnold@northcoast.com>
Newsgroups: gmane.comp.tex.context
Subject: mp-tool
Date: Thu, 09 Sep 1999 14:55:56 -0700
Sender: owner-ntg-context@let.uu.nl
Message-ID: <3.0.5.32.19990909145556.00b4fb30@mail.northcoast.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
X-Trace: main.gmane.org 1035391716 27878 80.91.224.250 (23 Oct 2002 16:48:36 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 23 Oct 2002 16:48:36 +0000 (UTC)
Original-To: ntg-context@ntg.nl
Xref: main.gmane.org gmane.comp.tex.context:878
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:878

All,

Defined in mp-tool is

def tand (expr x) = (sind(x)/cosd(x))                enddef;
def sqr  (expr
x) = (x*x)                            enddef;
def ln   (expr x) = (if x=0:
0 else: mlog(x)/256 fi) enddef;
def exp  (expr x) = ((mexp 256)**x)
         enddef;
def pow  (expr x) = (x**power)
enddef;
def inv  (expr x) = (if x=0: 0 else: x**-1 fi)       enddef;
def
asin (expr x) = (x+(x**3)/6+3(x**5)/40)          enddef;
def acos (expr x)
= (asin(-x))                       enddef;
def atan (expr x) =
(x-(x**3)/3+(x**5)/5-(x**7)/7)   enddef;

It would be useful to add to this list. Specifically, cos, sin, tan for
radian measure, and create a value for pi. Maybe,

pi=4*atan(1);
def sin (expr x) = sind(x*(180/pi)) enddef;

etc.

Any other suggested additions?