theorem :: SCMFSA_X:15

for a being Int-Location
for I being MacroInstruction of SCM+FSA holds (while=0 (a,I)) . ((card I) + 2) = goto 0