org.jatha.dynatype
Class StandardLispComplex

java.lang.Object
  org.jatha.dynatype.StandardLispValue
      org.jatha.dynatype.StandardLispAtom
          org.jatha.dynatype.StandardLispNumber
              org.jatha.dynatype.StandardLispComplex

All Implemented Interfaces:

Comparable, LispAtom, LispComplex, LispNumber, LispValue

public class StandardLispComplex
extends StandardLispNumber
implements LispComplex

StandardLispComplex represents a Complex number.

Field Summary

protected LispValue	f_imaginaryPart
protected LispValue	f_realPart

Fields inherited from class org.jatha.dynatype.StandardLispValue

f_lisp

Constructor Summary

StandardLispComplex(Jatha lisp)
Creates the complex number (0, 0).

StandardLispComplex(Jatha lisp, LispValue realPart, LispValue imaginaryPart)
Creates realPart new complex number with the given real part and imaginary part.

Method Summary

double	abs(LispComplex a) Modulus
LispComplex	acos(LispComplex aa)
LispComplex	acosh(LispComplex aa)
double	arg()
double	arg(LispComplex a)
LispComplex	asin(LispComplex aa)
LispComplex	asinh(LispComplex aa)
LispComplex	atan(LispComplex aa)
LispComplex	atanh(LispComplex aa)
LispComplex	conjugate()
LispComplex	conjugate(LispComplex a)
LispComplex	copy(LispComplex a)
LispComplex[]	copy(LispComplex[] a)
LispComplex[][]	copy(LispComplex[][] a)
LispComplex	cos(LispComplex aa)
LispComplex	cosh(LispComplex aa)
boolean	equals(Object o)
LispComplex	exp(double aa)
LispComplex	exp(LispComplex aa)
LispComplex	expMinusJayArg(double arg)
LispComplex	expPlusJayArg(double arg)
BigInteger	getBigIntegerValue()
double	getDoubleValue() Returns a double value corresponding to this value.
LispValue	getImaginary() Returns the imaginary part of the complex number.
boolean	getInfOption()
long	getLongValue()
LispValue	getReal() Returns the real part of the complex number.
int	hashCode()
double	hypot(LispComplex aa, LispComplex bb)
LispComplex	inverse()
LispComplex	inverse(LispComplex a)
boolean	isEqual(LispComplex a, LispComplex b)
boolean	isEqualWithinLimits(LispComplex x, double limit)
boolean	isEqualWithinLimits(LispComplex a, LispComplex b, double limit)
boolean	isInfinite()
boolean	isInfinite(LispComplex a)
boolean	isMinusInfinity()
boolean	isMinusInfinity(LispComplex a)
boolean	isNaN()
boolean	isNaN(LispComplex a)
boolean	isPlusInfinity()
boolean	isPlusInfinity(LispComplex a)
boolean	isReal()
boolean	isReal(LispComplex a)
boolean	isZero()
boolean	isZero(LispComplex a)
LispComplex	log(LispComplex aa)
LispComplex	minus(double a)
LispComplex	minus(double a, double b)
LispComplex	minus(double a, LispComplex b)
LispComplex	minus(LispComplex a)
LispComplex	minus(LispComplex a, double b)
LispComplex	minus(LispComplex a, LispComplex b)
void	minusEquals(double a)
void	minusEquals(LispComplex a)
LispComplex	minusJay()
LispComplex	minusOne()
LispComplex	negate(LispComplex a)
LispComplex	nthRoot(LispComplex aa, int n)
LispComplex[]	oneDarray(int n)
LispComplex[]	oneDarray(int n, double a, double b)
LispComplex[]	oneDarray(int n, LispComplex xx)
LispComplex	over(double a)
LispComplex	over(double a, double b)
LispComplex	over(double a, LispComplex b)
LispComplex	over(LispComplex a)
LispComplex	over(LispComplex a, double b)
LispComplex	over(LispComplex a, LispComplex b)
void	overEquals(double a)
void	overEquals(LispComplex a)
LispComplex	pi()
LispComplex	plus(double a)
LispComplex	plus(double a, double b)
LispComplex	plus(double a, LispComplex b)
LispComplex	plus(LispComplex a)
LispComplex	plus(LispComplex a, double b)
LispComplex	plus(LispComplex a, LispComplex b)
void	plusEquals(double a)
void	plusEquals(LispComplex a)
LispComplex	plusJay()
LispComplex	plusOne()
void	polar(double length, double angle) Sets the real part of this Complex number to length*cos(angle) and sets the imaginary part to length*sin(angle) where lengthis the first argument and angle is the argument (in radians)
LispComplex	pow(double a, LispComplex b)
LispComplex	pow(int a, LispComplex b)
LispComplex	pow(LispComplex a, double b)
LispComplex	pow(LispComplex a, int b)
LispComplex	pow(LispComplex a, LispComplex b)
void	setImaginary(LispValue imaginaryPart) Sets the real part of a complex number.
void	setInfOption(int opt)
void	setReal(LispValue realPart) Sets the real part of a complex number.
void	setValue(LispValue real, LispValue imag) Sets both the real part and the imaginary part of a complex number.
LispComplex	sinh(LispComplex aa)
LispComplex	sqrt(LispComplex aa)
LispComplex	square(LispComplex aa)
double	squareAbs()
double	squareAbs(LispComplex a)
LispComplex	tan(LispComplex aa)
LispComplex	tanh(LispComplex aa)
LispComplex	times(double a)
LispComplex	times(double a, double b)
LispComplex	times(double a, LispComplex b)
LispComplex	times(LispComplex a)
LispComplex	times(LispComplex a, double b)
LispComplex	times(LispComplex a, LispComplex b)
void	timesEquals(double a)
void	timesEquals(LispComplex a)
String	toString() toString() returns a printed representation of the form (as printed by (prin1)) in a Java string.
LispComplex	transposedMinus(double a)
LispComplex	transposedOver(double a)
LispComplex[][]	twoDarray(int n, int m)
LispComplex[][]	twoDarray(int n, int m, double a, double b)
LispComplex[][]	twoDarray(int n, int m, LispComplex xx)
LispComplex	twoPiJay()
LispComplex	zero()

Methods inherited from class org.jatha.dynatype.StandardLispNumber

abs, acos, add, asin, atan, atan2, basic_constantp, basic_numberp, ceiling, constantp, cos, cot, csc, degreesToRadians, divide, eql, equalNumeric, factorial, floor, greaterThan, greaterThanOrEqual, lessThan, lessThanOrEqual, max, min, multiply, negate, numberp, radiansToDegrees, reciprocal, sec, sin, sqrt, subtract, tan, typep

Methods inherited from class org.jatha.dynatype.StandardLispAtom

atom, basic_atom

Methods inherited from class org.jatha.dynatype.StandardLispValue

adjustSpecialCount, append, apply, apropos_print, assoc, basic_bignump, basic_consp, basic_floatp, basic_foreignp, basic_functionp, basic_integerp, basic_keywordp, basic_length, basic_listp, basic_macrop, basic_null, basic_stringp, basic_symbolp, bignump, boundp, butlast, car, cdr, characterp, clrhash, compareTo, concatenate, consp, contains, copy_list, copy, documentation, eighth, elt, elt, eq, equal, fboundp, fifth, first, floatp, fourth, funcall, functionp, get_specialCount, gethash, gethash, getLisp, hash_table_count, hash_table_rehash_size, hash_table_rehash_threshold, hash_table_size, hash_table_test, hashtablep, integerp, internal_getName, internal_prin1_as_cdr, internal_prin1, internal_princ_as_cdr, internal_princ, internal_print_as_cdr, internal_print, iterator, keywordp, last, length, lisp_null, list, listp, member, nconc, neql, ninth, nreverse, nstringCapitalize, nstringDowncase, nstringUpcase, pop, position, prin1, princ, print, push, rassoc, readFromString, remhash, remove, rest, reverse, rplaca, rplacd, second, set_special, setf_documentation, setf_gethash, setf_symbol_function, setf_symbol_plist, setf_symbol_value, setLisp, setPackage, setq, seventh, showStackTrace, sixth, specialP, string, stringCapitalize, stringDowncase, stringEndsWith, stringEq, stringEqual, stringGreaterP, stringGreaterThan, stringGreaterThanOrEqual, stringLeftTrim, stringLeftTrim, stringLessP, stringLessThan, stringLessThanOrEqual, stringNeq, stringNotGreaterP, stringNotLessP, stringp, stringRightTrim, stringRightTrim, stringStartsWith, stringTrim, stringTrim, stringUpcase, subst, substring, substring, symbol_function, symbol_name, symbol_package, symbol_plist, symbol_value, symbolp, tenth, third, toCollection, toJava, toJava, toString, toStringAsCdr_internal, toStringAsCdr, toStringShort, toStringShort, toStringSimple, type_of, uses, zerop

Methods inherited from class java.lang.Object

clone, finalize, getClass, notify, notifyAll, wait, wait, wait

Methods inherited from interface org.jatha.dynatype.LispValue

abs, acos, add, adjustSpecialCount, append, apply, apropos_print, asin, assoc, atan, atan2, atom, basic_atom, basic_bignump, basic_consp, basic_constantp, basic_floatp, basic_foreignp, basic_functionp, basic_integerp, basic_keywordp, basic_length, basic_listp, basic_macrop, basic_null, basic_numberp, basic_stringp, basic_symbolp, bignump, boundp, butlast, car, cdr, ceiling, characterp, clrhash, compareTo, concatenate, consp, constantp, contains, copy_list, copy, cos, cot, csc, degreesToRadians, divide, documentation, eighth, elt, elt, eq, eql, equal, equalNumeric, factorial, fboundp, fifth, first, floatp, floor, fourth, funcall, functionp, get_specialCount, gethash, gethash, getLisp, greaterThan, greaterThanOrEqual, hash_table_count, hash_table_rehash_size, hash_table_rehash_threshold, hash_table_size, hash_table_test, hashtablep, integerp, internal_getName, internal_prin1_as_cdr, internal_prin1, internal_princ_as_cdr, internal_princ, internal_print_as_cdr, internal_print, iterator, keywordp, last, length, lessThan, lessThanOrEqual, lisp_null, list, listp, max, member, min, multiply, nconc, negate, neql, ninth, nreverse, nstringCapitalize, nstringDowncase, nstringUpcase, numberp, pop, position, prin1, princ, print, push, radiansToDegrees, rassoc, readFromString, reciprocal, remhash, remove, rest, reverse, rplaca, rplacd, sec, second, set_special, setf_documentation, setf_gethash, setf_symbol_function, setf_symbol_plist, setf_symbol_value, setLisp, setPackage, setq, seventh, sin, sixth, specialP, sqrt, string, stringCapitalize, stringDowncase, stringEndsWith, stringEq, stringEqual, stringGreaterP, stringGreaterThan, stringGreaterThanOrEqual, stringLeftTrim, stringLeftTrim, stringLessP, stringLessThan, stringLessThanOrEqual, stringNeq, stringNotGreaterP, stringNotLessP, stringp, stringRightTrim, stringRightTrim, stringStartsWith, stringTrim, stringTrim, stringUpcase, subst, substring, substring, subtract, symbol_function, symbol_name, symbol_package, symbol_plist, symbol_value, symbolp, tan, tenth, third, toCollection, toJava, toJava, toString, toStringAsCdr_internal, toStringAsCdr, toStringShort, toStringShort, toStringSimple, type_of, typep, uses, zerop

Field Detail

f_realPart

protected LispValue f_realPart

f_imaginaryPart

protected LispValue f_imaginaryPart

Constructor Detail

StandardLispComplex

public StandardLispComplex(Jatha lisp)

Creates the complex number (0, 0).

StandardLispComplex

public StandardLispComplex(Jatha lisp,
                           LispValue realPart,
                           LispValue imaginaryPart)

Creates realPart new complex number with the given real part and imaginary part.

Parameters:

realPart -

imaginaryPart -

Method Detail

toString

public String toString()

Description copied from class: StandardLispValue

toString() returns a printed representation of the form (as printed by (prin1)) in a Java string.

Specified by:

toString in interface LispValue

Overrides:

toString in class StandardLispValue

Returns:

String The value in a string.

equals

public boolean equals(Object o)

Overrides:

equals in class Object

hashCode

public int hashCode()

Overrides:

hashCode in class Object

setImaginary

public void setImaginary(LispValue imaginaryPart)

Description copied from interface: LispComplex

Sets the real part of a complex number.

Specified by:

setImaginary in interface LispComplex

Parameters:

imaginaryPart - the new value for the imaginary part of the complex number

See Also:

LispComplex.setValue(org.jatha.dynatype.LispValue, org.jatha.dynatype.LispValue)

getImaginary

public LispValue getImaginary()

Description copied from interface: LispComplex

Returns the imaginary part of the complex number.

Specified by:

getImaginary in interface LispComplex

getReal

public LispValue getReal()

Description copied from interface: LispComplex

Returns the real part of the complex number.

Specified by:

getReal in interface LispComplex

setReal

public void setReal(LispValue realPart)

Description copied from interface: LispComplex

Sets the real part of a complex number.

Specified by:

setReal in interface LispComplex

Parameters:

realPart - the new value for the real part of the complex number

See Also:

LispComplex.setValue(org.jatha.dynatype.LispValue, org.jatha.dynatype.LispValue)

abs

public double abs(LispComplex a)

Modulus

Specified by:

abs in interface LispComplex

acos

public LispComplex acos(LispComplex aa)

Specified by:

acos in interface LispComplex

acosh

public LispComplex acosh(LispComplex aa)

Specified by:

acosh in interface LispComplex

arg

public double arg()

Specified by:

arg in interface LispComplex

arg

public double arg(LispComplex a)

Specified by:

arg in interface LispComplex

asin

public LispComplex asin(LispComplex aa)

Specified by:

asin in interface LispComplex

asinh

public LispComplex asinh(LispComplex aa)

Specified by:

asinh in interface LispComplex

atan

public LispComplex atan(LispComplex aa)

Specified by:

atan in interface LispComplex

atanh

public LispComplex atanh(LispComplex aa)

Specified by:

atanh in interface LispComplex

conjugate

public LispComplex conjugate()

Specified by:

conjugate in interface LispComplex

conjugate

public LispComplex conjugate(LispComplex a)

Specified by:

conjugate in interface LispComplex

copy

public LispComplex copy(LispComplex a)

Specified by:

copy in interface LispComplex

copy

public LispComplex[] copy(LispComplex[] a)

Specified by:

copy in interface LispComplex

copy

public LispComplex[][] copy(LispComplex[][] a)

Specified by:

copy in interface LispComplex

cos

public LispComplex cos(LispComplex aa)

Specified by:

cos in interface LispComplex

cosh

public LispComplex cosh(LispComplex aa)

Specified by:

cosh in interface LispComplex

exp

public LispComplex exp(double aa)

Specified by:

exp in interface LispComplex

exp

public LispComplex exp(LispComplex aa)

Specified by:

exp in interface LispComplex

expMinusJayArg

public LispComplex expMinusJayArg(double arg)

Specified by:

expMinusJayArg in interface LispComplex

expPlusJayArg

public LispComplex expPlusJayArg(double arg)

Specified by:

expPlusJayArg in interface LispComplex

getBigIntegerValue

public BigInteger getBigIntegerValue()

Specified by:

getBigIntegerValue in interface LispNumber

getDoubleValue

public double getDoubleValue()

Description copied from interface: LispNumber

Returns a double value corresponding to this value.

Specified by:

getDoubleValue in interface LispNumber

Specified by:

getDoubleValue in class StandardLispNumber

getInfOption

public boolean getInfOption()

Specified by:

getInfOption in interface LispComplex

getLongValue

public long getLongValue()

Specified by:

getLongValue in interface LispNumber

hypot

public double hypot(LispComplex aa,
                    LispComplex bb)

Specified by:

hypot in interface LispComplex

inverse

public LispComplex inverse()

Specified by:

inverse in interface LispComplex

inverse

public LispComplex inverse(LispComplex a)

Specified by:

inverse in interface LispComplex

isEqual

public boolean isEqual(LispComplex a,
                       LispComplex b)

Specified by:

isEqual in interface LispComplex

isEqualWithinLimits

public boolean isEqualWithinLimits(LispComplex a,
                                   LispComplex b,
                                   double limit)

Specified by:

isEqualWithinLimits in interface LispComplex

isEqualWithinLimits

public boolean isEqualWithinLimits(LispComplex x,
                                   double limit)

Specified by:

isEqualWithinLimits in interface LispComplex

isInfinite

public boolean isInfinite()

Specified by:

isInfinite in interface LispComplex

isInfinite

public boolean isInfinite(LispComplex a)

Specified by:

isInfinite in interface LispComplex

isMinusInfinity

public boolean isMinusInfinity()

Specified by:

isMinusInfinity in interface LispComplex

isMinusInfinity

public boolean isMinusInfinity(LispComplex a)

Specified by:

isMinusInfinity in interface LispComplex

isNaN

public boolean isNaN()

Specified by:

isNaN in interface LispComplex

isNaN

public boolean isNaN(LispComplex a)

Specified by:

isNaN in interface LispComplex

isPlusInfinity

public boolean isPlusInfinity()

Specified by:

isPlusInfinity in interface LispComplex

isPlusInfinity

public boolean isPlusInfinity(LispComplex a)

Specified by:

isPlusInfinity in interface LispComplex

isReal

public boolean isReal()

Specified by:

isReal in interface LispComplex

isReal

public boolean isReal(LispComplex a)

Specified by:

isReal in interface LispComplex

isZero

public boolean isZero()

Specified by:

isZero in interface LispComplex

isZero

public boolean isZero(LispComplex a)

Specified by:

isZero in interface LispComplex

log

public LispComplex log(LispComplex aa)

Specified by:

log in interface LispComplex

minus

public LispComplex minus(double a)

Specified by:

minus in interface LispComplex

minus

public LispComplex minus(double a,
                         double b)

Specified by:

minus in interface LispComplex

minus

public LispComplex minus(double a,
                         LispComplex b)

Specified by:

minus in interface LispComplex

minus

public LispComplex minus(LispComplex a)

Specified by:

minus in interface LispComplex

minus

public LispComplex minus(LispComplex a,
                         double b)

Specified by:

minus in interface LispComplex

minus

public LispComplex minus(LispComplex a,
                         LispComplex b)

Specified by:

minus in interface LispComplex

minusEquals

public void minusEquals(double a)

Specified by:

minusEquals in interface LispComplex

minusEquals

public void minusEquals(LispComplex a)

Specified by:

minusEquals in interface LispComplex

minusJay

public LispComplex minusJay()

Specified by:

minusJay in interface LispComplex

minusOne

public LispComplex minusOne()

Specified by:

minusOne in interface LispComplex

negate

public LispComplex negate(LispComplex a)

Specified by:

negate in interface LispComplex

nthRoot

public LispComplex nthRoot(LispComplex aa,
                           int n)

Specified by:

nthRoot in interface LispComplex

oneDarray

public LispComplex[] oneDarray(int n)

Specified by:

oneDarray in interface LispComplex

oneDarray

public LispComplex[] oneDarray(int n,
                               double a,
                               double b)

Specified by:

oneDarray in interface LispComplex

oneDarray

public LispComplex[] oneDarray(int n,
                               LispComplex xx)

Specified by:

oneDarray in interface LispComplex

over

public LispComplex over(double a)

Specified by:

over in interface LispComplex

over

public LispComplex over(double a,
                        double b)

Specified by:

over in interface LispComplex

over

public LispComplex over(double a,
                        LispComplex b)

Specified by:

over in interface LispComplex

over

public LispComplex over(LispComplex a)

Specified by:

over in interface LispComplex

over

public LispComplex over(LispComplex a,
                        double b)

Specified by:

over in interface LispComplex

over

public LispComplex over(LispComplex a,
                        LispComplex b)

Specified by:

over in interface LispComplex

overEquals

public void overEquals(double a)

Specified by:

overEquals in interface LispComplex

overEquals

public void overEquals(LispComplex a)

Specified by:

overEquals in interface LispComplex

pi

public LispComplex pi()

Specified by:

pi in interface LispComplex

plus

public LispComplex plus(double a)

Specified by:

plus in interface LispComplex

plus

public LispComplex plus(double a,
                        double b)

Specified by:

plus in interface LispComplex

plus

public LispComplex plus(double a,
                        LispComplex b)

Specified by:

plus in interface LispComplex

plus

public LispComplex plus(LispComplex a)

Specified by:

plus in interface LispComplex

plus

public LispComplex plus(LispComplex a,
                        double b)

Specified by:

plus in interface LispComplex

plus

public LispComplex plus(LispComplex a,
                        LispComplex b)

Specified by:

plus in interface LispComplex

plusEquals

public void plusEquals(double a)

Specified by:

plusEquals in interface LispComplex

plusEquals

public void plusEquals(LispComplex a)

Specified by:

plusEquals in interface LispComplex

plusJay

public LispComplex plusJay()

Specified by:

plusJay in interface LispComplex

plusOne

public LispComplex plusOne()

Specified by:

plusOne in interface LispComplex

polar

public void polar(double length,
                  double angle)

Sets the real part of this Complex number to length*cos(angle) and sets the imaginary part to length*sin(angle) where lengthis the first argument and angle is the argument (in radians)

Specified by:

polar in interface LispComplex

Parameters:

length -

angle -

pow

public LispComplex pow(double a,
                       LispComplex b)

Specified by:

pow in interface LispComplex

pow

public LispComplex pow(int a,
                       LispComplex b)

Specified by:

pow in interface LispComplex

pow

public LispComplex pow(LispComplex a,
                       double b)

Specified by:

pow in interface LispComplex

pow

public LispComplex pow(LispComplex a,
                       int b)

Specified by:

pow in interface LispComplex

pow

public LispComplex pow(LispComplex a,
                       LispComplex b)

Specified by:

pow in interface LispComplex

setInfOption

public void setInfOption(int opt)

Specified by:

setInfOption in interface LispComplex

setValue

public void setValue(LispValue real,
                     LispValue imag)

Sets both the real part and the imaginary part of a complex number.

Specified by:

setValue in interface LispComplex

Parameters:

real - the new value for the real part of the complex number

imag - the new value for the imaginary part of the complex number

See Also:

setValue(org.jatha.dynatype.LispValue, org.jatha.dynatype.LispValue)

sinh

public LispComplex sinh(LispComplex aa)

Specified by:

sinh in interface LispComplex

sqrt

public LispComplex sqrt(LispComplex aa)

Specified by:

sqrt in interface LispComplex

square

public LispComplex square(LispComplex aa)

Specified by:

square in interface LispComplex

squareAbs

public double squareAbs()

Specified by:

squareAbs in interface LispComplex

squareAbs

public double squareAbs(LispComplex a)

Specified by:

squareAbs in interface LispComplex

tan

public LispComplex tan(LispComplex aa)

Specified by:

tan in interface LispComplex

tanh

public LispComplex tanh(LispComplex aa)

Specified by:

tanh in interface LispComplex

times

public LispComplex times(double a)

Specified by:

times in interface LispComplex

times

public LispComplex times(double a,
                         double b)

Specified by:

times in interface LispComplex

times

public LispComplex times(double a,
                         LispComplex b)

Specified by:

times in interface LispComplex

times

public LispComplex times(LispComplex a)

Specified by:

times in interface LispComplex

times

public LispComplex times(LispComplex a,
                         double b)

Specified by:

times in interface LispComplex

times

public LispComplex times(LispComplex a,
                         LispComplex b)

Specified by:

times in interface LispComplex

timesEquals

public void timesEquals(double a)

Specified by:

timesEquals in interface LispComplex

timesEquals

public void timesEquals(LispComplex a)

Specified by:

timesEquals in interface LispComplex

transposedMinus

public LispComplex transposedMinus(double a)

Specified by:

transposedMinus in interface LispComplex

transposedOver

public LispComplex transposedOver(double a)

Specified by:

transposedOver in interface LispComplex

twoDarray

public LispComplex[][] twoDarray(int n,
                                 int m)

Specified by:

twoDarray in interface LispComplex

twoDarray

public LispComplex[][] twoDarray(int n,
                                 int m,
                                 double a,
                                 double b)

Specified by:

twoDarray in interface LispComplex

twoDarray

public LispComplex[][] twoDarray(int n,
                                 int m,
                                 LispComplex xx)

Specified by:

twoDarray in interface LispComplex

twoPiJay

public LispComplex twoPiJay()

Specified by:

twoPiJay in interface LispComplex

zero

public LispComplex zero()

Specified by:

zero in interface LispComplex