LispForum

funny when I realized that I can make this one simple. lol (defun noun() (print "Enter First Sentence:") (setq n(read)) (print "Enter Second Setence:") (setq m(read)) (cond ((equal (n m) (print "equal") )) ((print "not equal")) I'm gonna make this display the ...

hi, im new here.. I just have a difficulty on debugging my code.. (defun noun() (print "Enter First Sentence:") (setq n(read)) (print "Enter Second Setence:") (setq m(read)) (cond ((equal (nth '0 '(n)) (nth '0 '(m)) (print "equal") )) ((print "not equal")) )) ...