Tandy 1000 Basic Reference Manual page 378

Appendix
A
~
Derived BASIC Functions
Functions which are not intrinsic to BASIC may be calculated as
follows:
Function
SECANT
COSECANT
CONTANGENT
INVERSE SINE
INVERSE COSINE
INVERSE SECANT
INVERSE
COSECANT
INVERSE
COTANGENT
HYPERBOLIC
SINE
HYPERBOLIC
COSINE
HYPERBOLIC
TANGENT
HYPERBOLIC
SECANT
HYPERBOLIC
COSECANT
HYPERBOLIC
COTANGENT
INVERSE
HYPERBOLIC
SINE
INVERSE
HYPERBOLIC
COSINE
INVERSE
HYPERBOLIC
TANGENT
BASIC Equivalent
SEC(X)
=
1/COS(X)
CSC(X)
=
l/SIN(X)
COT(X)
=
l/TAN(X)
ARCSIN(X)
=
ATN(X/
SQR(
-
X*X
+
1))
ARCCOS(X)
=
-
ATN(X/
SQR(
-
X*X
+
1))
+
1.5708
SQR(X*X
-
1))
+
(SGN(X)
-
1)
ARCCSC(X)
=
ATN(X/SQR(X*X
-
1))
+
(SGN(X)
-
1)*1.5708
ARCSEC(X)
=
ATN(X/
*1.5708
ARCCOT(X)
=
ATN(X)
+
1.5708
SINH(X)
=
(EXP(X)
-
EXP(
-
X))/2
COSH(X)
=
(EXP(X)
+
EXP(
-
X))/2
TANH(X)
=
(EXP(X)
-
EXP(
-
XI)/
(EXP(X)
+
EXP(
-
X))
SECH(X)
=
2/(EXP(X)
+
EXP(
-
XI)
CSCH(X)
=
SI(EXP(X1- EXP(
-
XI)
COTH(X)
=
(EXP(X)
+
(EXP(
-
X))/
(EXP(X)
-
EXP(
-
X))
ARCSINH(X1
=
LOG(X
+
SQR(X*X
+
1))
ARCCOSH(X)
=
LOG(X
+
SQR(X*X
-
1))
ARCTANH(X)
=
LOG((l+ XI/( 1
-
X))/
2
376