> (defvar L (list (list 1 2) (list 3 4))) 
L
> (MYCOUNT L)
2
> (ADVCOUNT L)
4
> (defvar M (list 1 2 3 4))
M
> (EXISTS 2 M)
T
> (EXISTS 5 M)
NIL
> (MYREVERSE M)
(4 3 2 1)
> M
(1 2 3 4)
> (MY REVERSE L)
((3 4) (1 2))
> (APPENDITEM 5 M)
(1 2 3 4 5)
> M
(1 2 3 4 5)
> (MYREMOVE 4 M)
(1 2 3 5)
> M
(1 2 3 5)
> (MYREMOVE 4 M)
NIL
> M
(1 2 3 5)
> (MYLAST M)
5
> (MYLAST L)
(3 4)
>