		Search-engine friendly clone of the ACL2 documentation.

Cuts4-config

Make-cuts4-config

Basic constructor macro for cuts4-config structures.

Syntax

(make-cuts4-config [:max-cuts <max-cuts>])

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

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

Definition

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

Macro: make-cuts4-config

(defmacro make-cuts4-config (&rest args)
  (std::make-aggregate 'cuts4-config
                       args '((:max-cuts . 10))
                       'make-cuts4-config
                       nil))

Function: cuts4-config

(defun cuts4-config (max-cuts)
  (declare (xargs :guard (posp max-cuts)))
  (declare (xargs :guard t))
  (let ((__function__ 'cuts4-config))
    (declare (ignorable __function__))
    (b* ((max-cuts (mbe :logic (pos-fix max-cuts)
                        :exec max-cuts)))
      max-cuts)))