		Search-engine friendly clone of the ACL2 documentation.

Encoding

Encode-op-imms64-funct

Encode the name of a 64-bit shift instruction with the OP-IMM opcode into the funct3 field and the high 6 immediate bits [ISA:4.2.1] [ISA:35].

Signature
(encode-op-imms64-funct funct) → (mv funct3 hi6imm)
Arguments: funct — Guard (op-imms-funct-p funct).
Returns: funct3 — Type (ubyte3p funct3).; hi6imm — Type (ubyte6p hi6imm).

Definitions and Theorems

Function: encode-op-imms64-funct

(defun encode-op-imms64-funct (funct)
  (declare (xargs :guard (op-imms-funct-p funct)))
  (op-imms-funct-case funct
                      :slli (mv 1 0)
                      :srli (mv 5 0)
                      :srai (mv 5 16)))

Theorem: ubyte3p-of-encode-op-imms64-funct.funct3

(defthm ubyte3p-of-encode-op-imms64-funct.funct3
  (b* (((mv ?funct3 ?hi6imm)
        (encode-op-imms64-funct funct)))
    (ubyte3p funct3))
  :rule-classes :rewrite)

Theorem: ubyte6p-of-encode-op-imms64-funct.hi6imm

(defthm ubyte6p-of-encode-op-imms64-funct.hi6imm
  (b* (((mv ?funct3 ?hi6imm)
        (encode-op-imms64-funct funct)))
    (ubyte6p hi6imm))
  :rule-classes :rewrite)

Theorem: encode-op-imms64-funct-of-op-imms-funct-fix-funct

(defthm encode-op-imms64-funct-of-op-imms-funct-fix-funct
  (equal (encode-op-imms64-funct (op-imms-funct-fix funct))
         (encode-op-imms64-funct funct)))

Theorem: encode-op-imms64-funct-op-imms-funct-equiv-congruence-on-funct

(defthm
     encode-op-imms64-funct-op-imms-funct-equiv-congruence-on-funct
  (implies (op-imms-funct-equiv funct funct-equiv)
           (equal (encode-op-imms64-funct funct)
                  (encode-op-imms64-funct funct-equiv)))
  :rule-classes :congruence)