set E = TheEqSymbOf S;
ar (TheEqSymbOf S) = - 2 by FOMODEL1:def 23;
hence for b1 being number st b1 = (ar (TheEqSymbOf S)) + 2 holds
b1 is zero ; :: thesis: verum