coalton-lang / coalton

Coalton is an efficient, statically typed functional programming language that supercharges Common Lisp.

Home Page:https://coalton-lang.github.io/

Geek Repo:Geek Repo

Github PK Tool:Github PK Tool

Complex trigonometric functions don't match SBCL

Izaakwltn opened this issue · comments

Trigonometric functions on Complex numbers disagree with SBCL slightly, in the last digit or so.

NEW-TRIG> (coalton (sin (Complex 1.0d0 -1.0d0)))
#C(1.2984575814159771 -0.634963914784736)
NEW-TRIG> (cl:sin #C (1.0d0 -1.0d0))
#C(1.2984575814159773 -0.6349639147847361)
NEW-TRIG> (coalton (cos (Complex 1.0d0 -1.0d0)))
#C(0.8337300251311489 0.9888977057628648)
NEW-TRIG> (cl:cos #C (1.0d0 -1.0d0))
#C(0.8337300251311491 0.9888977057628651)
NEW-TRIG> (coalton (tan (Complex 1.0d0 -1.0d0)))
#C(0.2717525853195118 -1.0839233273386946)
NEW-TRIG> (cl:tan #C (1.0d0 -1.0d0))
#C(0.27175258531951174 -1.0839233273386943)