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 12;
hence AddTo a,b = [2,<*a,b*>] ; :: thesis: verum