#0Y UTF-8
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::JUGAR
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::J1 COMMON-LISP::&OPTIONAL
    (COMMON-LISP-USER::LC COMMON-LISP-USER::A)
    (COMMON-LISP-USER::L COMMON-LISP-USER::INICIAL) COMMON-LISP::&KEY
    (COMMON-LISP-USER::EF (COMMON-LISP::LIST COMMON-LISP-USER::FINAL)))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::HUMANO
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE 'COMMON-LISP::NIL))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::HUMANO2
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP::&OPTIONAL (COMMON-LISP-USER::LC COMMON-LISP-USER::A))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::JUEGOAC
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP::&OPTIONAL (COMMON-LISP-USER::LC COMMON-LISP-USER::A)
    (COMMON-LISP-USER::L COMMON-LISP-USER::INICIAL) COMMON-LISP::&KEY
    (COMMON-LISP-USER::EF (COMMON-LISP::LIST COMMON-LISP-USER::FINAL)))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::ACCIONES
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::LC COMMON-LISP::&OPTIONAL
    (COMMON-LISP-USER::L COMMON-LISP::NIL))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::POSIBLES
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::ACCIONES COMMON-LISP-USER::LC COMMON-LISP-USER::L)))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::POSIBLES2
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::ACCIONES COMMON-LISP-USER::LC COMMON-LISP-USER::L)))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::CUMPLEF
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::L COMMON-LISP-USER::L2)))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::FINAL?
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::LEF COMMON-LISP-USER::L2)))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::HACER
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP::&KEY (COMMON-LISP-USER::INI COMMON-LISP-USER::INICIAL)
    (COMMON-LISP-USER::FIN (COMMON-LISP::LIST COMMON-LISP-USER::FINAL))
    (COMMON-LISP-USER::ACC (COMMON-LISP-USER::ACCIONES COMMON-LISP-USER::A))
    (COMMON-LISP-USER::TRAZA COMMON-LISP::NIL))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::LEERLISTA
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::CADENA COMMON-LISP-USER::E)))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::SITUAR
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::E COMMON-LISP-USER::N COMMON-LISP-USER::L)))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::FABESTADO
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP-USER::LL COMMON-LISP-USER::LP)))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::TINI
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE 'COMMON-LISP::NIL))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::TFINAL
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE 'COMMON-LISP::NIL))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::INCLUIR
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP::&OPTIONAL (COMMON-LISP-USER::L COMMON-LISP::NIL))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::MENU
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP::&OPTIONAL (COMMON-LISP-USER::INI COMMON-LISP-USER::INICIAL)
    (COMMON-LISP-USER::FIN (COMMON-LISP::LIST COMMON-LISP-USER::FINAL))
    (COMMON-LISP-USER::ACC (COMMON-LISP-USER::ACCIONES COMMON-LISP-USER::A)))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::IA
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE
  '(COMMON-LISP::&OPTIONAL (COMMON-LISP-USER::INI COMMON-LISP-USER::INICIAL)
    (COMMON-LISP-USER::FIN (COMMON-LISP::LIST COMMON-LISP-USER::FINAL))
    (COMMON-LISP-USER::ACC (COMMON-LISP-USER::ACCIONES COMMON-LISP-USER::A)))))
(SYSTEM::C-DEFUN 'COMMON-LISP-USER::MACC
 (SYSTEM::LAMBDA-LIST-TO-SIGNATURE 'COMMON-LISP::NIL))