TrigFunc49 v1.0 by Steen S. Schmidt
May 5, 2001
This program is freeware, so no registration or licensing fees are necessary. You are free to distribute this program to anyone, as long as this document is included.
I cannot take
responsibility for any damage or data loss caused by this program – it is
written in 100% SysRPL and there could be bugs in it. This also means that it
will not run on the HP48 series.
If you have any
suggestions, additions or find any bugs in the code, you’re welcome to contact
me per email at SSchmidt@nospam.dk.
Please include details about ROM revision and flag settings if you’re reporting
a bug.
The library is coded
and compiled directly on the HP49G, which has proven to be a great tool for
this too. A thanks goes to ACO for making it possible – including these
programming tools on the calculator itself has made the job a lot easier.
Mr. Bernard Parisse
(CAS author on the HP49G) has been a big help explaining his software to me.
As always, a big
thanks to the guys at the comp.sys.hp48 newsgroup – especially Carsten Dominik
for his Emacs library, in which the RPLCPL command resides.
You need to copy the
library (library #1130) to the calculator (with HPComm for example) and store
it in a port (any port should do).
To store it in port 2
for example, you will need to recall the library to the stack, type 2 and STO.
Hold down ON and press
F3, release both keys and the calc should warm boot (warning: you’ll loose all
stack contents, but calc memory will remain intact). When this is done, your
port 2 should contain the entry for the library (press left shift APPS to enter
the Filer):
à
Running BYTES on the
library on the stack should yield #5931h and 640.5 bytes.
à
This document shows
stack syntax for RPN mode, but algebraic mode seems to work too. Use RPN for
best results.
This library adds a
small set of trigonometric commands that the HP49G lacks from the factory. The
12 commands are:
COT (cotangent), defined as
SEC (secant), defined as
CSC (cosecant), defined as
ACOT (inverse cotangent), defined as
ASEC (inverse secant), defined as
ACSC (inverse cosecant), defined as
COTH (hyperbolic cotangent), defined as
SECH (hyperbolic secant), defined as
CSCH (hyperbolic cosecant), defined as
ACOTH (inverse hyperbolic cotangent), defined as
ASECH (inverse hyperbolic secant), defined as
ACSCH (inverse hyperbolic cosecant), defined as
The commands work
alike, and takes only one argument. If the argument is numeric, the result will
be numeric, and if the argument is symbolic, the definition of the functions
will be applied.
A couple of examples:
à
à
v1.0: Initial public release.