• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
      • B*
      • Defunc
      • Fty
        • Deftagsum
        • Defprod
        • Defflexsum
        • Defbitstruct
        • Deflist
          • Deflist-of-len
            • Deflist-of-len-implementation
              • Deflist-of-len-fn
              • Deflist-of-len-support-lemma
              • Deflist-of-len-macro-definition
          • Defalist
          • Defbyte
          • Defresult
          • Deffixequiv
          • Deffixtype
          • Defoption
          • Fty-discipline
          • Fold
          • Specific-types
          • Fty-extensions
          • Defsubtype
          • Deftypes
          • Defset
          • Defflatsum
          • Deflist-of-len
            • Deflist-of-len-implementation
              • Deflist-of-len-fn
              • Deflist-of-len-support-lemma
              • Deflist-of-len-macro-definition
            • Defomap
            • Defbytelist
            • Fty::basetypes
            • Defvisitors
            • Deffixtype-alias
            • Deffixequiv-sk
            • Defunit
            • Multicase
            • Deffixequiv-mutual
            • Fty::baselists
            • Def-enumcase
            • Defmap
          • Apt
          • Std/util
          • Defdata
          • Defrstobj
          • Seq
          • Match-tree
          • Defrstobj
          • With-supporters
          • Def-partial-measure
          • Template-subst
          • Soft
          • Defthm-domain
          • Event-macros
          • Def-universal-equiv
          • Def-saved-obligs
          • With-supporters-after
          • Definec
          • Sig
          • Outer-local
          • Data-structures
        • ACL2
        • Interfacing-tools
        • Hardware-verification
        • Software-verification
        • Math
        • Testing-utilities
      • Deflist-of-len-implementation

      Deflist-of-len-macro-definition

      Definition of the deflist-of-len macro.

      Macro: deflist-of-len

      (defmacro deflist-of-len (type &key list-type length
                                     pred fix equiv parents short long)
       (cons
        'make-event
        (cons
         (cons
          'deflist-of-len-fn
          (cons
           (cons 'quote (cons type 'nil))
           (cons
            (cons 'quote (cons list-type 'nil))
            (cons
             (cons 'quote (cons length 'nil))
             (cons
              (cons 'quote (cons pred 'nil))
              (cons
                 (cons 'quote (cons fix 'nil))
                 (cons (cons 'quote (cons equiv 'nil))
                       (cons (cons 'quote (cons parents 'nil))
                             (cons short (cons long '((w state))))))))))))
         'nil)))