prints('Hello World!')

a = 5  ; integer
b = true  ; boolean
c = :something  ; symbol
d = 'a string of characters'  ; string

a = 5  ; ERROR, can't mutate variables

a = cons(1, cons(2, cons(3, cons(4, nil))))  ; "pure" way

b = (1, 2, 3, 4)  ; syntactic sugar
head(a)  ; 1
tail(b)  ; cons(2, cons(3, cons(4, nil)))

v = [1, 2, 3, 4]
v(2)  ; 3
len(v)  ; 4

m = #{
  :a 4,
  'stringkey' :symbolvalue,
  true (6, 6, 6)
}

m(:a)  ; 4
m('stringkey')  ; :symbolvalue
m(true)  ; (6, 6, 6)

a = 5
b = +(3, 5)  ; 8
c = -(1, 4, 8)  ; -11
d = /(2, 4, 10)  ;  frac(1, 20)
e = +(*(2, 5), 7)  ; 17
f = >(4, -1)  ; true

a, b = (1, 2, 3)  ; a = 1, b = (2, 3)
c, d, e = [4, 5, 6]  ; c = 4, d = 5, e = 6

f = (x, y, z) => {
  +(x, *(y, z))
}

f(1, 2, 3)  ; 7
f(4, 5)  ; (z) => { f(4, 5, z) }

g = { 4 + 5 }
g()  ; 9

(a) => { 4 + a }(10)  ; 14

a = if({ >(4, 5) }, 47, :no)  ; :no

map((x) => {x+1}, [1, 2, 3])  ; [2, 3, 4]
foldl((a, b) => { a + b }, (1, 2, 3))  ; 6
foldr((a, b) => { a + b }, (1, 2, 3))  ; 6

prints('string')  ; 'string'
prints(65)  ; '17'
prints(true)  ; '1'
prints(:thing)  ; 'thing'

a = reads()
>>something
a  ; 'something'