Theorems about get-funct7 applied to the encoding of different instructions.
Theorem:
(defthm get-funct7-of-encode-of-instr-op (equal (get-funct7 (encode (instr-op funct rd rs1 rs2) feat)) (mv-nth 1 (encode-op-funct funct))))
Theorem:
(defthm get-funct7-of-encode-of-instr-op-32 (equal (get-funct7 (encode (instr-op-32 funct rd rs1 rs2) feat)) (mv-nth 1 (encode-op-32-funct funct))))