Scheme code (22/30)

Scheme code