FB II Compiler

PG PRO

Debugging

Memory

System

Mathematics

Resources

Disk I/O

Windows

Controls

Menus

Mouse

Keyboard

Text

Fonts

Drawing

Sound

Clipboard

Printing

Communication

ASM

Made with FB

MATHEMATICS

Compute ARCSIN


It's been a long time since my last trigonometry class, but I had this
function laying around:

LOCAL FN ARCSIN#(value#)
END FN = ATN(value# / SQR(1-value# * value#))

Hope that does the trick.

Mars


You can use this for ARCSIN:

LOCAL FN ArcSin#(x#)
  SELECT CASE x#
     CASE 1
      a# = 1.5707963268 '=pi/2
    CASE -1
      a# = -1.5707963268
    CASE ELSE
      a# = ATN(x# / SQR(1 - x#*x#))
  END SELECT
END FN = a#

Rick