Major Section: SWITCHES-PARAMETERS-AND-MODES
Examples: (add-macro-fn append binary-append) (add-macro-fn append binary-append t)These examples each associate the function symbol
binary-append
with
the macro name append
. As a result, theory functions will understand
that append
refers to binary-append
-- see add-macro-alias --
and moreover, proof output will be printed using append
rather than
binary-append
. In the first case, (append x (append y z))
is printed
rather than (append x y z)
. In the second case, right-associated
arguments are printed flat: (append x y z)
. Such right-association is
considered only for binary function symbols; otherwise the optional third
argument is ignored.
General Forms: (add-macro-fn macro-name function-name) (add-macro-fn macro-name function-name nil) ; same as abov (add-macro-fn macro-name function-name t)This is a convenient way to add an entry to
macro-aliases-table
and at
the same time extend the :
untrans-table
. As suggested by the
example above, calls of a function in this table will be printed as
corresponding calls of macros, with right-associated arguments printed flat
in the case of a binary function symbol if the optional third argument is t.
In that case, for a binary function symbol fn
associated with macro name
mac
, then a call (fn arg1 (fn arg2 (... (fn argk arg))))
will be
displayed to the user as though the ``term'' were
(mac arg1 arg2 ... argk arg)
. For a call (f a1 ... ak)
of a function
symbol that is not binary, or the optional argument is not supplied as t
,
then the effect is simply to replace f
by the corresponding macro symbol.
See macro-aliases-table, see remove-macro-alias, see untrans-table, and
see remove-macro-fn.