AK
Size: a a a
AK
AK
SA
SA
AK
SA
SA
AK
SA
(defun back (array)
(aref array (1- (length array))))
(Defun array->set-list (array)
(loop :with set := '()
:for a :across array
:do (pushnew a set)
:finally (return set)))
(defun check (predicate sequence)
(some predicate sequence))
VM
(defun back (array)
(aref array (1- (length array))))
(Defun array->set-list (array)
(loop :with set := '()
:for a :across array
:do (pushnew a set)
:finally (return set)))
(defun check (predicate sequence)
(some predicate sequence))
A
SA
AK
SA
(defun back (array)
(aref array (1- (length array))))
(defun array->set-list (array)
(coerce (remove-duplicates array) 'list))
(defun check (predicate sequence)
(some predicate sequence))
A
AK
SA
SA
SA
AK