RosettaCodeData/Task/Arithmetic-Complex/Scheme/arithmetic-complex.ss

8 lines
115 B
Scheme
Raw Permalink Normal View History

2013-04-10 14:58:50 -07:00
(define a 1+i)
(define b 3.14159+1.25i)
(define c (+ a b))
(define c (* a b))
(define c (/ 1 a))
(define c (- a))