let a, b be Int-Location; :: thesis: AddTo (a,b) = [2,{},<*a,b*>]
ex A, B being Data-Location st
( a = A & b = B & AddTo (a,b) = AddTo (A,B) ) by SCMFSA_2:def 9;
hence AddTo (a,b) = [2,{},<*a,b*>] ; :: thesis: verum