let N be with_zero set ; :: thesis: for S being non empty with_non-empty_values IC-Ins-separated Mem-Struct over N
for l being Nat holds IC in dom (Start-At (l,S))

let S be non empty with_non-empty_values IC-Ins-separated Mem-Struct over N; :: thesis: for l being Nat holds IC in dom (Start-At (l,S))
let l be Nat; :: thesis: IC in dom (Start-At (l,S))
dom (Start-At (l,S)) = {(IC )} by FUNCOP_1:13;
hence IC in dom (Start-At (l,S)) by TARSKI:def 1; :: thesis: verum