More precise return type for `magnitude' (it always returns nonnegative)

This commit is contained in:
Neil Toronto 2012-12-29 14:55:25 -07:00
parent cdfc4912ad
commit e06f31c94e

View File

@ -1578,10 +1578,10 @@
(-FloatComplex . -> . -Flonum)
(-InexactComplex . -> . -InexactReal)
(N . -> . -Real))]
[magnitude (cl->* (-Rat . -> . -Rat)
(-FloatComplex . -> . -Flonum)
(-InexactComplex . -> . -InexactReal)
(N . -> . -Real))]
[magnitude (cl->* (-Rat . -> . -NonNegRat)
(-FloatComplex . -> . -NonNegFlonum)
(-InexactComplex . -> . -NonNegInexactReal)
(N . -> . -NonNegReal))]
[angle (cl->* (-PosReal . -> . -Zero)
(-FloatComplex . -> . -Flonum)
(-InexactComplex . -> . -InexactReal)