Common lisp で Scheme の begin を使いたい時は progn を使います。