#lang racket (+ 123 456) (* (+ 123 456) 789) 2/3 (+ 1 2 3 4) (+ 5) (+) (*) pi 'foo '(red blue green) '(orange) '() null #t #f #\a #\b (define foo 42) foo (+ foo (* 2 3 4)) (quote (red blue)) '(+ + + + ) (= foo 42) (define bar '(red green blue)) (first bar) (rest bar) (first (rest bar)) (rest (rest bar)) (first (rest (rest bar))) (rest (rest (rest bar))) (cons 'yellow bar) (define baz (cons 'yellow bar)) baz (append bar baz) (cons bar baz) (sort '(9 8 7 6 1 2 3 4) <) (sort '(9 8 7 6 1 2 3 4) >) (append '(9 8 7 6 1 2 3 4) '(9 8 7 6 1 2 3 4)) (length baz) (null? baz) (define (square x) (* x x)) (square 5) (map square '(9 8 7 6 1 2 3 4)) (define (cube x) (* x x x)) (map cube '(9 8 7 6 1 2 3 4)) (foldl + 0 '(9 8 7 6 1 2 3 4 2)) (foldl * 1 '(9 8 7 6 1 2 3 4 2)) (map + '(9 8 7 6 1 2 3 4) '(9 8 7 6 1 2 3 4)) (define (fac n) (foldl * 1 (range 1 (+ n 1)))) (reverse bar)