• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
      • Theories
      • Rule-classes
      • Proof-builder
      • Recursion-and-induction
      • Hons-and-memoization
      • Events
      • Parallelism
      • History
      • Programming
        • Defun
        • Declare
        • System-utilities
        • Stobj
        • State
        • Mutual-recursion
        • Memoize
        • Mbe
        • Io
        • Defpkg
        • Apply$
        • Loop$
        • Programming-with-state
        • Arrays
        • Characters
        • Time$
        • Defmacro
        • Loop$-primer
        • Fast-alists
        • Defconst
        • Evaluation
        • Guard
        • Equality-variants
        • Compilation
        • Hons
        • ACL2-built-ins
        • Developers-guide
        • System-attachments
        • Advanced-features
        • Set-check-invariant-risk
        • Numbers
        • Efficiency
        • Irrelevant-formals
        • Introduction-to-programming-in-ACL2-for-those-who-know-lisp
        • Redefining-programs
        • Lists
        • Invariant-risk
        • Errors
        • Defabbrev
        • Conses
        • Alists
        • Set-register-invariant-risk
        • Strings
          • Std/strings
          • String-listp
          • Stringp
          • Length
          • Search
          • Remove-duplicates
          • Position
          • Coerce
          • Concatenate
          • Reverse
            • Nrev
              • Nrev-set-hint
              • Nrev-finish
              • Nrev-copy
              • Nrev-push
              • Nrev-fix
              • Nrev-demo
              • Nrev-stobj
                • Nrev2
                • Nrev-append
                • With-local-nrev
                • Nrev$c
              • Rev
              • Std/lists/reverse
              • Hons-reverse
            • String
            • Subseq
            • Substitute
            • String-upcase
            • String-downcase
            • Count
            • Char
            • String<
            • String-equal
            • String-utilities
            • String-append
            • String>=
            • String<=
            • String>
            • Hex-digit-char-theorems
            • String-downcase-gen
            • String-upcase-gen
          • Program-wrapper
          • Get-internal-time
          • Basics
          • Packages
          • Oracle-eval
          • Defmacro-untouchable
          • <<
          • Primitive
          • Revert-world
          • Unmemoize
          • Set-duplicate-keys-action
          • Symbols
          • Def-list-constructor
          • Easy-simplify-term
          • Defiteration
          • Fake-oracle-eval
          • Defopen
          • Sleep
        • Operational-semantics
        • Real
        • Start-here
        • Debugging
        • Miscellaneous
        • Output-controls
        • Macros
        • Interfacing-tools
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Nrev

    Nrev-stobj

    Definition of the nrev abstract stobj.

    Definition: nrev

    (defabsstobj nrev
      :foundation nrev$c
      :recognizer (nrev$p :logic true-listp :exec nrev$cp)
      :creator (acl2::create-nrev :logic create-nrev$a
                                  :exec create-nrev$c)
      :corr-fn nrev-corr
      :exports ((nrev-fix :logic nrev$a-fix
                          :exec nrev$c-fix$inline)
                (nrev-copy :logic nrev$a-copy
                           :exec nrev$c-copy)
                (nrev-push :logic nrev$a-push
                           :exec nrev$c-push)
                (nrev-set-hint :logic nrev$a-set-hint
                               :exec nrev$c-set-hint)
                (nrev-finish :logic nrev$a-finish
                             :exec nrev$c-finish)))

    Definitions and Theorems

    Function: create-nrev$a

    (defun create-nrev$a nil
      (declare (xargs :guard t))
      nil)

    Function: nrev-corr

    (defun nrev-corr (nrev$c nrev$a)
      (declare (xargs :stobjs nrev$c))
      (equal (nrev$c-copy nrev$c)
             (nrev$a-copy nrev$a)))