• Top
    • Documentation
    • Books
    • Boolean-reasoning
      • Ipasir
      • Aignet
      • Aig
        • Aig-constructors
        • Aig-vars
        • Aig-sat
        • Bddify
        • Aig-substitution
        • Aig-other
          • Best-aig
          • Aig2c
          • Expr-to-aig
          • Aiger-write
          • Aig-random-sim
            • Aig-vecsim60
            • 60-bit-fix
            • Logbitp-env60
            • Init-random-state
            • N-random-60-bit-nats
              • *60-bit-mask*
            • Aiger-read
            • Aig-print
            • Aig-cases
          • Aig-semantics
          • Aig-and-count
        • Satlink
        • Truth
        • Ubdds
        • Bdd
        • Faig
        • Bed
        • 4v
      • Projects
      • Debugging
      • Std
      • Community
      • Proof-automation
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Aig-random-sim

    N-random-60-bit-nats

    Generate a list of 60-bit naturals.

    Signature
    (n-random-60-bit-nats n state) → (mv * state)
    Arguments
    n — How many to generate.
        Guard (natp n).

    We just leave this enabled.

    Definitions and Theorems

    Function: n-random-60-bit-nats

    (defun n-random-60-bit-nats (n state)
      (declare (xargs :stobjs (state)))
      (declare (xargs :guard (natp n)))
      (let ((__function__ 'n-random-60-bit-nats))
        (declare (ignorable __function__))
        (random-list n (ash 1 60) state)))