zettacode.files/arithmetic.integer/xlisp.txt in zettacode-0.1.0 vs zettacode.files/arithmetic.integer/xlisp.txt in zettacode-0.1.1

@@ -1,17 +1,17 @@
 (DEFUN INTEGER-ARITHMETIC ()
-    (DISPLAY "E    b  c.")
+    (DISPLAY "Enter two integers separated by a space.")
     (NEWLINE)
-    (DISPLAY " ")
+    (DISPLAY "> ")
     (DEFINE A (READ))
     (DEFINE B (READ))
     (DISPLAY `(SUM ,(+ A B)))
     (NEWLINE)
     (DISPLAY `(DIFFERENCE ,(- A B)))
     (NEWLINE)
     (DISPLAY `(PRODUCT ,(* A B)))
     (NEWLINE)
-    (DISPLAY `(QUOTIENT ,(QUOTIENT A B)))  uc  z
+    (DISPLAY `(QUOTIENT ,(QUOTIENT A B))) ; truncates towards zero
     (NEWLINE)
-    (DISPLAY `(REMAINDER ,(REM A B)))    f f 
+    (DISPLAY `(REMAINDER ,(REM A B))) ; takes sign of first operand
     (NEWLINE)
     (DISPLAY `(EXPONENTIATION ,(EXPT A B))))