Vector Basic Interpreter Basic 80 Reference Manual - page 175
Functions
that
are not
intrinsic
to BASIC-80
may
be
calculated
as follows:
SECANT
COSECANT
COTANGENT
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
INVERSE
HYPERBOLIC
SECANT
INVERSE
HYPERBOLIC
COSECANT
INVERSE
HYPERBOLIC
COTANGENT
BASIC-80
Equivalent
SEC(X)-1/COS(X)
CSC(X)=1/SIN(X)
COT (X)=1/TAN(X)
ARCSIN(X)=ATN(X/SQR(-X*X+1»
ARCCOS(X)=-ATN
(X/SQR(-X*X+1»+1.5708
ARCSEC(X)=ATN(X/SQR(X*X-1»
+SGN(SGN(X)-1)*1.5708
ARCCSC(X)=ATN(X/SQR(X*X-1»
+(SGN(X)-1)*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(X)+EXP(-X»*2+1
SECH(X)=2/(EXP(X)+EXP(-X»
CSCH(X)=2/(EXP(X)-EXP(-X»
COTH(X)=EXP(-X)/(EXP(X)-EXP(-X»*2+1
ARCSINH(X)=LOG(X+SQR(X*X+1»
ARCCOSH(X)=LOG(X+SQR(X*X-1)
ARCTANH(X)=LOG«1+X)/(1-X»/2
ARCSECH(X)=LOG«SQR(-X*X+1)+1)/X)
ARCCSCH(X)=LOG«SGN(X)*SQR(X*X+1)+1)/X
ARCCOTH(X)=LOG«X+1)/(X-1»/2