let a, b be set ; ( a <> b implies Terminals (SingleGrammar a,b) = {b} )
set E = SingleGrammar a,b;
A1:
the Rules of (SingleGrammar a,b) = {[a,<*b*>]}
by Def8;
A2:
the carrier of (SingleGrammar a,b) = {a,b}
by Def8;
then reconsider x = a, y = b as Symbol of (SingleGrammar a,b) by TARSKI:def 2;
assume A3:
a <> b
; Terminals (SingleGrammar a,b) = {b}
[x,<*y*>] in the Rules of (SingleGrammar a,b)
by A1, TARSKI:def 1;
then A5:
x ==> <*y*>
by Def1;
thus
Terminals (SingleGrammar a,b) c= {b}
XBOOLE_0:def 10 {b} c= Terminals (SingleGrammar a,b)
let c be set ; TARSKI:def 3 ( not c in {b} or c in Terminals (SingleGrammar a,b) )
assume
c in {b}
; c in Terminals (SingleGrammar a,b)
then
c = b
by TARSKI:def 1;
hence
c in Terminals (SingleGrammar a,b)
by A4; verum