(setq AGENDA nil)
(setq AGENDA `(("Alice" 1) . ,AGENDA))
(setq AGENDA `(("Bob" 2) . ,AGENDA))
(setq AGENDA `(("Charlie" 3) . ,AGENDA))
(print AGENDA)
(defun incluir (lista elemento) `(,elemento . ,lista))
(setq AGENDA (incluir AGENDA '("Isabel" 3233876)))
(print AGENDA)
KHNldHEgQUdFTkRBIG5pbCkKCihzZXRxIEFHRU5EQSBgKCgiQWxpY2UiIDEpIC4gLEFHRU5EQSkpCihzZXRxIEFHRU5EQSBgKCgiQm9iIiAyKSAuICxBR0VOREEpKQooc2V0cSBBR0VOREEgYCgoIkNoYXJsaWUiIDMpIC4gLEFHRU5EQSkpCgoocHJpbnQgQUdFTkRBKQoKKGRlZnVuIGluY2x1aXIgKGxpc3RhIGVsZW1lbnRvKSBgKCxlbGVtZW50byAuICxsaXN0YSkpCgooc2V0cSBBR0VOREEgKGluY2x1aXIgQUdFTkRBICcoIklzYWJlbCIgMzIzMzg3NikpKQoKKHByaW50IEFHRU5EQSkK