First working module, test-list.scm