aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

September Morn Update

Browse source
This commit is contained in:
Ingy döt Net 2019-09-12 10:33:56 -07:00
parent 4e2d22a71d
commit aac6731f2c
6856 changed files with 141342 additions and 21127 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Task/Arithmetic-Complex/Ol/arithmetic-complex.ol
View file

@ -1,4 +1,4 @@
(define A 0+1i)
(define A 0+1i) ; manually entered numbers
(define B 1+0i)
(print (+ A B))
@ -14,7 +14,7 @@
; <== 0+i
(define C 2/7-3i)
(define C (complex 2/7 -3)) ; functional way
(print "real part of " C " is " (car C))
; <== real part of 2/7-3i is 2/7