let p be PartState of SCM+FSA; :: thesis: dom (Initialized p) = ((dom p) \/ {(intloc 0)}) \/ {(IC )}
A1: ( dom ((intloc 0) .--> 1) = {(intloc 0)} & dom (Start-At (0,SCM+FSA)) = {(IC )} ) ;
Initialized p = Initialize (p +* ((intloc 0) .--> 1)) by FUNCT_4:14;
hence dom (Initialized p) = (dom (p +* ((intloc 0) .--> 1))) \/ (dom (Start-At (0,SCM+FSA))) by FUNCT_4:def 1
.= ((dom p) \/ {(intloc 0)}) \/ {(IC )} by A1, FUNCT_4:def 1 ;
:: thesis: verum