a ∈ st ⊦ #(st -- a) = # st - 1
Used simplifier rules: pred-03: ⊦ n -1 = n - 1; from specification nat