theorem Th33: :: SCMRING3:34
for R being Ring
for a being Data-Location of R
for i1 being Nat holds JUMP (a =0_goto i1) = {i1}