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

original commit: e06f31c94e6655c1ecf88ff18a0ecbee9af2e250
This commit is contained in:
Neil Toronto 2012-12-29 14:55:25 -07:00
parent c8e5b8caee
commit 78ee359d5a

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)