let lb be Element of NAT ; :: thesis: for a being Int-Location holds InsCode (a =0_goto lb) = 7
let a be Int-Location ; :: thesis: InsCode (a =0_goto lb) = 7
ex A being Data-Location st
( a = A & a =0_goto lb = A =0_goto lb ) by Def17;
hence InsCode (a =0_goto lb) = 7 by RECDEF_2:def 1; :: thesis: verum