Create scheme-get-atom-from-list