| vols[v][m] = ⌜n⌝ , m < # vols[v], valid-ebatbl(apebs, wlar, vols, n0), v ∈ vols ⊦ n < # apebs |
vols[v][m] = ⌜n⌝ , m < # vols[v], valid-ebatbl(apebs, wlar, vols, n0), v ∈ vols, # apebs ≤ n ⊦
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m < n ↔ ¬ n ≤ m; (ss)