ast letter in a word or array (defun last-element (array) (aref array (- (length array) 1))) ;;; Produce a hash table whose key is a word and whose value is a list of the;;; words that can follow that word (defun get-followers (words) (let ((map-word-to-followers (make-hash-table :test 'equal)) (