_                                 _   _ _  __
 _ __ (_)_ __ ___  _ __ ___   __ _ _ __ | |_(_) |/ /
| '_ \| | '__/ _ \| '_ ` _ \ / _` | '_ \| __| | ' / 
| |_) | | | | (_) | | | | | | (_| | | | | |_| | . \ 
| .__/|_|_|  \___/|_| |_| |_|\__,_|_| |_|\__|_|_|\_\
|_| la llama que arde: alumbra, calienta y destruye


# Oráculo

He aquí un oráculo de la pitia de delfos:

```
(defun oráculo ()			; función oracular para emacs LISP
  "Muestra el recto camino"
  (interactive)
  (cond ((equal (sha1 (read-passwd "¿Qué distingue a un hombre de un animal?: ")) "57fbc016bbf1e85c7e24ac0dd593a626d0f30310") (message "Felicidades, ya eres un hombre sabio"))
	('t (oráculo))))