let I be Program of SCMPDS ; :: thesis: (Initialized I) | NAT = I
A1: dom I c= NAT by RELAT_1:def 18;
A2: now end;
dom (Start-At (inspos 0 )) = {(IC SCMPDS )} by FUNCOP_1:19;
hence (Initialized I) | NAT = I by A1, A2, FUNCT_4:82, ZFMISC_1:56; :: thesis: verum