;
;	test script two
;	again, these should print pairs of identical values
;
(double '(2 4 5))
'(4 8 10)
(mapAll #'numberp '((2 A) 3 A 4))
'((t nil) t nil t)
(mapAll '(lambda (x) (+ x 1)) '((2 (3) 4) 5 (6 7)))
'((3 (4) 5) 6 (7 8))
(mapAll #'numberp nil)
nil
(sum '(2 3 4))
9
(sum nil)
0
(reverse '(a b c))
'(C B A)
(reverse nil)
nil
(append '(A B C) '(D E F))
'(A B C D E F)
(append '((A)) '(D E F))
'((A) D E F)
(append '(A B C) nil)
'(A B C)
(append nil '(A B C))
'(A B C)
(count '(2 3 4))
3
(count nil)
0
(insertionSort nil)
nil
(insertionSort '(3 4 1 2 5))
'(1 2 3 4 5)
(allNumber '(1 2 3))
t
(allNumber '(1 2 A))
nil
(allNumber nil)
t
(allTrue #'numberp '(1 2 3))
t
(allTrue #'numberp '(1 2 A))
nil
(allTrue #'numberp nil)
t
(subSet '(1 2) '(2 1 3))
t
(subSet nil '(1 2 3))
t
(subSet '(1 2) nil)
nil
(subSet '(1 2) '(2 3 4))
nil
(quickSort nil)
nil
(quickSort '(3 4 1 2 5))
'(1 2 3 4 5)