		Search-engine friendly clone of the ACL2 documentation.

Member-designor-sub

Make-member-designor-sub

Basic constructor macro for member-designor-sub structures.

Syntax

(make-member-designor-sub [:member <member>] 
                          [:index <index>])

This is the usual way to construct member-designor-sub structures. It simply conses together a structure with the specified fields.

This macro generates a new member-designor-sub structure from scratch. See also change-member-designor-sub, which can "change" an existing structure, instead.

Definition

This is an ordinary make- macro introduced by fty::defprod.

Macro: make-member-designor-sub

(defmacro make-member-designor-sub (&rest args)
  (std::make-aggregate 'member-designor-sub
                       args '((:member) (:index))
                       'make-member-designor-sub
                       nil))

Function: member-designor-sub

(defun member-designor-sub (member index)
  (declare (xargs :guard (and (member-designorp member)
                              (exprp index))))
  (declare (xargs :guard t))
  (b* ((member (mbe :logic (member-designor-fix member)
                    :exec member))
       (index (mbe :logic (expr-fix index)
                   :exec index)))
    (cons :sub (cons member index))))