• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
      • Std/lists
      • Omaps
      • Std/alists
      • Obags
      • Std/util
        • Defprojection
        • Deflist
        • Defaggregate
        • Define
        • Defmapping
        • Defenum
        • Add-io-pairs
        • Defalist
        • Defmapappend
        • Returns-specifiers
        • Defarbrec
        • Define-sk
        • Defines
        • Error-value-tuples
        • Defmax-nat
          • Defmax-nat-implementation
            • Defmax-nat-fn
            • Defmax-nat-macro-definition
              • Defmax-nat-input-processing
              • Defmax-nat-event-generation
          • Defmin-int
          • Deftutorial
          • Extended-formals
          • Defrule
          • Defval
          • Defsurj
          • Defiso
          • Defconstrained-recognizer
          • Deffixer
          • Defmvtypes
          • Defconsts
          • Defthm-unsigned-byte-p
          • Support
          • Defthm-signed-byte-p
          • Defthm-natp
          • Defund-sk
          • Defmacro+
          • Defsum
          • Defthm-commutative
          • Definj
          • Defirrelevant
          • Defredundant
        • Std/strings
        • Std/osets
        • Std/io
        • Std/basic
        • Std/system
        • Std/typed-lists
        • Std/bitsets
        • Std/testing
        • Std/typed-alists
        • Std/stobjs
      • Proof-automation
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Defmax-nat-implementation

    Defmax-nat-macro-definition

    Definition of the defmax-nat macro.

    Submit the event generated by defmax-nat-fn.

    Macro: defmax-nat

    (defmacro defmax-nat (f y x1...xn body &key (guard 't)
                            (verify-guards 't))
     (cons
      'make-event
      (cons
       (cons
        'defmax-nat-fn
        (cons
         (cons 'quote (cons f 'nil))
         (cons
          (cons 'quote (cons y 'nil))
          (cons
           (cons 'quote (cons x1...xn 'nil))
           (cons
            (cons 'quote (cons body 'nil))
            (cons
               (cons 'quote (cons guard 'nil))
               (cons (cons 'quote (cons verify-guards 'nil))
                     (cons (cons 'cons
                                 (cons ''defmax-nat
                                       (cons (cons 'quote (cons f 'nil))
                                             'nil)))
                           '(state)))))))))
       'nil)))