| v × m ∈ recs, recs ⊥ vols ⊦ recs -- (v × m) ⊥ vols |
m0 < # vols[v0], v0 ∈ vols, v0 × m0 ∈ recs, v × m ∈ recs, ∀ v, m. ¬ v × m ∈ recs ∨ ¬ v ∈ vols ∨ ¬ m < # vols[v] ∨ vols[v][m] = unmapped ⊦ vols[v0][m0] = unmapped, v0 × m0 = v × m
Used simplifier rules: disj: ⊦ recs ⊥ vols ↔ (∀ v, m. ¬ v × m ∈ recs ∨ ¬ v ∈ vols ∨ ¬ m < # vols[v] ∨ vols[v][m] = unmapped);% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ ladr ∈ recs -- ladr0 ↔ ladr ≠ ladr0 ∧ ladr ∈ recs; (s)