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

9 lines
107 B
Common Lisp

> (complex 64 (/ 3 4))
#C(64 3/4)
> (realpart #c(5 5))
5
> (imagpart (complex 0 pi))
3.141592653589793d0