RosettaCodeData/Task/Arithmetic-Complex/Common-Lisp/arithmetic-complex-1.lisp

6 lines
47 B
Common Lisp

> (sqrt -1)
#C(0.0 1.0)
> (expt #c(0 1) 2)
-1