let N be non empty with_non-empty_elements set ; for S being non empty IC-Ins-separated AMI-Struct of N
for p being NAT -defined the Instructions of b1 -valued Function
for s being State of S holds Comput (p,s,0) = s
let S be non empty IC-Ins-separated AMI-Struct of N; for p being NAT -defined the Instructions of S -valued Function
for s being State of S holds Comput (p,s,0) = s
let p be NAT -defined the Instructions of S -valued Function; for s being State of S holds Comput (p,s,0) = s
let s be State of S; Comput (p,s,0) = s
ex f being Function of NAT,(product the Object-Kind of S) st
( Comput (p,s,0) = f . 0 & f . 0 = s & ( for i being Nat holds f . (i + 1) = Following (p,(f . i)) ) )
by Def6;
hence
Comput (p,s,0) = s
; verum