home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast2.iso
/
calculat
/
sm30a.zip
/
ARG.(X)
< prev
next >
Wrap
Text File
|
1993-10-16
|
239b
|
7 lines
# arg(x) give the arguement (phase angle) of x in radians. Its value is
# -pi < arg(x) <= pi. arg(x)=atan2(re(x),im(x)). For positive real x,
# arg(x)=0.
# See also: abs, sign, atan2.
arg(x_) := if(isnumber(x), atan2(re(x),im(x)))