90 likes | 231 Views
Porovnanie. ( eq t ‘t) (eq nil ‘nil) (eq nil ‘()) (eq nil ()). Porovnanie. (eq 9 9) (eq 9 (* (+ 2 1) 3)) (eq 9999999999 9999999999) (eq #a #a) (eq #a (char "abc" 1)). Porovnanie. (let ((x 999999999999999999)) (eq x x)) (let* ((x 999999999999999) (y x)) (eq x y))
E N D
Porovnanie • (eq t ‘t) • (eq nil ‘nil) • (eq nil ‘()) • (eq nil ())
Porovnanie • (eq 9 9) • (eq 9 (* (+ 2 1) 3)) • (eq 9999999999 9999999999) • (eq #\a #\a) • (eq #\a (char "abc" 1))
Porovnanie • (let ((x 999999999999999999)) (eq x x)) • (let* ((x 999999999999999) (y x)) (eq x y)) • (let ((x 999999999999999) (y 999999999999999)) (eq x y)) • (eq '(a b) '(a b)) • (let* ((x '(a b)) (y x)) (eq x y)) • (let* ((x '(a b)) (y '(a b))) (eq x y))
Porovnanie • (eql 9999999999 9999999999) • (eql #\a #\a) • (eql '(a b) '(a b)) • (eql "abc" "abc")
Porovnanie • (equal '(a b) '(a b)) • (equal "abc" "abc") • (equal "abc" "ABC") • (equal 1 1.0) • (equal '#(a b) '#(a b))
Porovnanie • (equalp 1 1.0) • (equalp "abc" "ABC") • (equalp '#(a b) '#(a b))
Porovnanie • (= 2 2.0) • (= 'a 'a)
Porovnanie • (not t) • (not nil) • (not 6)
Porovnanie • (and (= 3 3) (< 4 3 5)) • (and (/= 4 3) (<= 3 4 4)) • (and) • (and 2 3 4) • (or (>= 3 4) (> 3 4)) • (or 2 3 4)