let I be Program of SCM+FSA ; :: thesis: IC (Initialized I) = insloc 0
dom (Start-At (insloc 0 )) = {(IC SCM+FSA )} by FUNCOP_1:19;
then A1: IC SCM+FSA in dom (Start-At (insloc 0 )) by TARSKI:def 1;
IC SCM+FSA in dom (Initialized I) by Th24;
hence IC (Initialized I) = ((I +* ((intloc 0 ) .--> 1)) +* (Start-At (insloc 0 ))) . (IC SCM+FSA ) by AMI_1:def 43
.= (Start-At (insloc 0 )) . (IC SCM+FSA ) by A1, FUNCT_4:14
.= insloc 0 by FUNCOP_1:87 ;
:: thesis: verum