testing list.scm