let N be with_zero set ; :: thesis: for S being non empty with_non-empty_values IC-Ins-separated Mem-Struct over N
for s being State of S holds Start-At ((IC s),S) c= s
let S be non empty with_non-empty_values IC-Ins-separated Mem-Struct over N; :: thesis: for s being State of S holds Start-At ((IC s),S) c= s
let s be State of S; :: thesis: Start-At ((IC s),S) c= s
Start-At ((IC s),S) = s | {(IC )} by Th18;
hence Start-At ((IC s),S) c= s by RELAT_1:59; :: thesis: verum