		Search-engine friendly clone of the ACL2 documentation.

Unop-square

Make-unop-square

Basic constructor macro for unop-square structures.

Syntax

(make-unop-square )

This is the usual way to construct unop-square structures. It simply conses together a structure with the specified fields.

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

Definition

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

Macro: make-unop-square

(defmacro make-unop-square (&rest args)
  (std::make-aggregate 'unop-square
                       args 'nil
                       'make-unop-square
                       nil))

Function: unop-square

(defun unop-square nil
  (declare (xargs :guard t))
  (let ((__function__ 'unop-square))
    (declare (ignorable __function__))
    (cons :square (list))))