import  Math.Real

The Math.Real class contains real constants and arithmetic operations.

Type Declarations

Complex   { Real double, I double }
Complex1  { Real single, I single }

Polar     { Radius double, Angle double }
Polar1    { Radius single, Angle single }

Point     { X double, Y double }
Point1    { X single, Y single }

Global Variables

Pi     |=  3.14159_26535_89793_23846_26433       Archimedes
Tau    |=  6.28318_53071_79586_47692_52867       2 * Pi
E      |=  2.71828_18284_59045_23536_02874       Euler-Napier
Ln2    |=  0.69314_71805_59945_30941_72321       Napier
Gamma  |=  0.57721_56649_01532_86060_65120       Euler-Mascheroni
Radian |=  0.01745_32925_19943_29576_92369       Radains per degree
Degree |= 57.29577_95130_82320_87679_81548       Degrees per radian

Degree.To.Radian( .Degree ) => .Degree * Radian
Radian.To.Degree( .Radian ) => .Radian * Degree

Procedure Declarations

COMPLEX  exit _complex, entry Real = 0 _real, I = 0 _real   pure
Form(  _complex, Format = "(" string ) ==> Form string

Plus(   _complex, Add        _complex ) ==> Plus     _complex
Minus(  _complex, Delta      _complex ) ==> Minus    _complex
Times(  _complex, Multiplier _complex ) ==> Times    _complex
Divide( _complex, Divisor    _complex ) ==> Quotient _complex
Scale(  _complex, Real       _real )    ==> Scale    _complex

Square(         _complex  ) ==> Square     _complex
Principle.Root( _complex  ) ==> Root       _complex
Reciprocal(     _complex  ) ==> Reciprocal _complex
Conjugate(      _complex  ) ==> Conjugate  _complex

Modulus( _complex ) ==> Modulus _real
Phase(   _complex ) ==> Phase   _real


POINT  exit _point, entry X = 0 _real, Y = 0 _real   pure
form( _point, Format = "(" string ) ==> Form string

Distance( _point, To _point ) ==> Distance _real
To.Polar(  _point ) ==> Polar    _polar


POLAR  exit _polar, entry Radius = 0 _real, Angle = 0 _real   pure
Form( _polar, Format = "(" string ) ==> Form = "" string

Distance( _polar, To _polar ) ==> Distance _real
To.Point(  _polar ) ==> Point    _point