Theorems about reads of program counter over writes of memory.
These theorems are all enabled by default because they always clearly simplify the term.
Theorem:
(defthm read-pc-of-write-mem8 (equal (read-pc (write-mem8 addr val stat feat) feat) (read-pc stat feat)))
Theorem:
(defthm read-pc-of-write-mem16 (equal (read-pc (write-mem16 addr val stat feat) feat) (read-pc stat feat)))
Theorem:
(defthm read-pc-of-write-mem32 (equal (read-pc (write-mem32 addr val stat feat) feat) (read-pc stat feat)))
Theorem:
(defthm read-pc-of-write-mem64 (equal (read-pc (write-mem64 addr val stat feat) feat) (read-pc stat feat)))