Examples given from the Emacs Lisp Intro that ships with Emacs.