30 |
nil) |
nil) |
31 |
|
|
32 |
(deftest some.6 |
(deftest some.6 |
33 |
(not (some #'/= '(1 2 3 4 5) '(1 2 3 4 6))) |
(not-mv (some #'/= '(1 2 3 4 5) '(1 2 3 4 6))) |
34 |
nil) |
nil) |
35 |
|
|
36 |
(deftest some.7 |
(deftest some.7 |
55 |
nil) |
nil) |
56 |
|
|
57 |
(deftest some.11 |
(deftest some.11 |
58 |
(not (some #'zerop #*1111111011111)) |
(not-mv (some #'zerop #*1111111011111)) |
59 |
nil) |
nil) |
60 |
|
|
61 |
(deftest some.12 |
(deftest some.12 |
67 |
nil) |
nil) |
68 |
|
|
69 |
(deftest some.14 |
(deftest some.14 |
70 |
(not (some #'(lambda (x) (not (eql x #\a))) "aaaaaabaaaa")) |
(not-mv (some #'(lambda (x) (not (eql x #\a))) "aaaaaabaaaa")) |
71 |
nil) |
nil) |
72 |
|
|
73 |
(deftest some.15 |
(deftest some.15 |
75 |
nil) |
nil) |
76 |
|
|
77 |
(deftest some.16 |
(deftest some.16 |
78 |
(not (some 'null '(1 2 3 nil 5))) |
(not-mv (some 'null '(1 2 3 nil 5))) |
79 |
nil) |
nil) |
80 |
|
|
81 |
|
|