Add operands to syntax help message

web.lisp

@@ -50,7 +50,7 @@
       (:span :id "help-close-button"
        :onclick "document.querySelector(\".help-overlay\").style.display = \"none\""
        "Close"))
-     (:table
+     (:table ;:style "margin-bottom: 10px;"
       (:tr (:th "Operator") (:th "Syntax"))
       (loop for ((sym (name . nics) desc (examples)) . rest-desc)
               = *operator-descriptions* then rest-desc
@@ -61,7 +61,13 @@
                (:tr
                 (:td name)
                 (:td (format nil "~{~a~^, ~}" (sort (copy-list syntax)
-                                                    'string<))))))
+                                                    'string<)))))
+      (:tr (:th "Operand") (:th "Syntax"))
+      (loop for (sym . syntax) in *operand-symbol-table* do
+        (:tr
+         (:td (string-downcase (symbol-name sym)))
+         (:td (format nil "~{~a~^, ~}" (sort (copy-list syntax)
+                                             'string<))))))
      (:p "You can input multiple propositions by separating them with"
       "commas (,):"
       (:br)