Alquimista de código

En el post anterior se trato de JOptionPane , algunos ejemplos del uso de los métodos showInputDialog y showMessageDialog . En esta ocasión usaremos el método showConfirmDialog para hacer una pregunta. Código Clojure ;;Importamos la librería javax.swing ( import '(javax.swing JOptionPane));' ( try ;; variable "pregunta" ( def pregunta      (JOptionPane/showConfirmDialog nil,       ( str " Estas de acuerdo en que Clojure es mejor que Lisp?" )     ) )       ;;la variable pregunta devolverá un valor entre 0, si es OK; 1, si es No; 2, si es Cancelar    ( if (= pregunta 0)        (JOptionPane/ showMessageDialog nil,         ( str "Bien, estas de acuerdo" )        )        ( if (= pregunta 1)           (JOptionPane/ showMessageDialog nil,             ( str "Claro, entiendo que no todos pueden estar de acuerdo" )           )           ((JOptionPane/ showMessageDialog nil,             ( str "Operaci