Modifying constructor for lstmt-gout structures.
(change-lstmt-gout x [:stmt <stmt>] [:test-term <test-term>] [:body-term <body-term>] [:affect <affect>] [:limit-body <limit-body>] [:limit-all <limit-all>] [:events <events>] [:thm-name <thm-name>] [:thm-index <thm-index>] [:names-to-avoid <names-to-avoid>])
This is an often useful alternative to make-lstmt-gout.
We construct a new lstmt-gout structure that is a copy of
This is an ordinary
Macro:
(defmacro change-lstmt-gout (x &rest args) (std::change-aggregate 'lstmt-gout x args '((:stmt . lstmt-gout->stmt) (:test-term . lstmt-gout->test-term) (:body-term . lstmt-gout->body-term) (:affect . lstmt-gout->affect) (:limit-body . lstmt-gout->limit-body) (:limit-all . lstmt-gout->limit-all) (:events . lstmt-gout->events) (:thm-name . lstmt-gout->thm-name) (:thm-index . lstmt-gout->thm-index) (:names-to-avoid . lstmt-gout->names-to-avoid)) 'change-lstmt-gout 'nil))