let N be non empty with_non-empty_elements set ; :: thesis: for S being non empty stored-program IC-Ins-separated definite realistic COM-Struct of N
for I being NAT -defined Function holds not IC in dom I

let S be non empty stored-program IC-Ins-separated definite realistic COM-Struct of N; :: thesis: for I being NAT -defined Function holds not IC in dom I
let I be NAT -defined Function; :: thesis: not IC in dom I
dom I c= NAT by RELAT_1:def 18;
hence not IC in dom I by Def12; :: thesis: verum