Problem 1: List Procedures
1. Write the procedure square-list, which takes in a list of numbers and returns a list of their
squares.
(square-list (list 1 2 3))
;Value: (1 4 9)
(square-list (list 3))
;Value: 9
(square-list nil)
;Value: ()
2. Write the procedure stutter-list, which takes in a list and returns a list that contains each
element of the original list twice:
(stutter-list (list 1 2 3))
;Value: (1 1 2 2 3 3)
(stutter-list (list 1)
;Value: (1 1)
(stutter-list nil)
;Value: ()
3. Write the procedure only-even, which takes in a list of numbers and returns a new list
containing only the even numbers from the original list.
(only-even (list 1 2 3 4 5))
;Value: (2 4)
(only-even (list 1 3 5 7 9))
;Value: ()
(only-even nil)
;Value: ()
Docsity.com
