let IAlph, OAlph be non empty set ; :: thesis: for tfsm being non empty finite Mealy-FSM of IAlph,OAlph
for CRtfsm1, CRtfsm2 being non empty finite reduced connected Mealy-FSM of IAlph,OAlph st the carrier of CRtfsm1 misses the carrier of CRtfsm2 & CRtfsm1,CRtfsm2 -are_equivalent & tfsm = CRtfsm1 -Mealy_union CRtfsm2 holds
for Q being State of (the_reduction_of tfsm) ex q1, q2 being Element of Q st
( q1 in the carrier of CRtfsm1 & q2 in the carrier of CRtfsm2 & ( for q being Element of Q holds
( q = q1 or q = q2 ) ) )
let tfsm be non empty finite Mealy-FSM of IAlph,OAlph; :: thesis: for CRtfsm1, CRtfsm2 being non empty finite reduced connected Mealy-FSM of IAlph,OAlph st the carrier of CRtfsm1 misses the carrier of CRtfsm2 & CRtfsm1,CRtfsm2 -are_equivalent & tfsm = CRtfsm1 -Mealy_union CRtfsm2 holds
for Q being State of (the_reduction_of tfsm) ex q1, q2 being Element of Q st
( q1 in the carrier of CRtfsm1 & q2 in the carrier of CRtfsm2 & ( for q being Element of Q holds
( q = q1 or q = q2 ) ) )
let CRtfsm1, CRtfsm2 be non empty finite reduced connected Mealy-FSM of IAlph,OAlph; :: thesis: ( the carrier of CRtfsm1 misses the carrier of CRtfsm2 & CRtfsm1,CRtfsm2 -are_equivalent & tfsm = CRtfsm1 -Mealy_union CRtfsm2 implies for Q being State of (the_reduction_of tfsm) ex q1, q2 being Element of Q st
( q1 in the carrier of CRtfsm1 & q2 in the carrier of CRtfsm2 & ( for q being Element of Q holds
( q = q1 or q = q2 ) ) ) )
set rtfsm1 = CRtfsm1;
set rtfsm2 = CRtfsm2;
assume A1:
( the carrier of CRtfsm1 misses the carrier of CRtfsm2 & CRtfsm1,CRtfsm2 -are_equivalent & tfsm = CRtfsm1 -Mealy_union CRtfsm2 )
; :: thesis: for Q being State of (the_reduction_of tfsm) ex q1, q2 being Element of Q st
( q1 in the carrier of CRtfsm1 & q2 in the carrier of CRtfsm2 & ( for q being Element of Q holds
( q = q1 or q = q2 ) ) )
assume
ex Q being State of (the_reduction_of tfsm) st
for q1, q2 being Element of Q holds
( not q1 in the carrier of CRtfsm1 or not q2 in the carrier of CRtfsm2 or ex q being Element of Q st
( not q = q1 & not q = q2 ) )
; :: thesis: contradiction
then consider Q being Element of (the_reduction_of tfsm) such that
A2:
for q1, q2 being Element of Q holds
( not q1 in the carrier of CRtfsm1 or not q2 in the carrier of CRtfsm2 or ex q being Element of Q st
( not q = q1 & not q = q2 ) )
;
A3:
the carrier of CRtfsm1 /\ the carrier of CRtfsm2 = {}
by A1, XBOOLE_0:def 7;
set rtfsm = the_reduction_of tfsm;
set Srtfsm1 = the carrier of CRtfsm1;
set ISrtfsm1 = the InitS of CRtfsm1;
set Srtfsm2 = the carrier of CRtfsm2;
set ISrtfsm2 = the InitS of CRtfsm2;
set Stfsm = the carrier of tfsm;
set Srtfsm = the carrier of (the_reduction_of tfsm);
A4:
the carrier of (the_reduction_of tfsm) = final_states_partition tfsm
by Def18;
then reconsider Q = Q as Subset of the carrier of tfsm by TARSKI:def 3;
Q in the carrier of (the_reduction_of tfsm)
;
then A5:
Q in final_states_partition tfsm
by Def18;
then A6:
Q <> {}
by EQREL_1:def 6;
then consider q being Element of the carrier of tfsm such that
A7:
q in Q
by SUBSET_1:10;
union (final_states_partition tfsm) =
the carrier of tfsm
by EQREL_1:def 6
.=
the carrier of CRtfsm1 \/ the carrier of CRtfsm2
by A1, Def24
;
then A8:
Q c= the carrier of CRtfsm1 \/ the carrier of CRtfsm2
by A4, ZFMISC_1:92;
per cases
( q in the carrier of CRtfsm1 or q in the carrier of CRtfsm2 )
by A7, A8, XBOOLE_0:def 3;
suppose A9:
q in the
carrier of
CRtfsm1
;
:: thesis: contradictionset Q' =
Q \ {q};
A10:
now assume A11:
Q \ {q} = {}
;
:: thesis: contradictionreconsider q =
q as
Element of the
carrier of
CRtfsm1 by A9;
q is
accessible
by Def22;
then consider w being
FinSequence of
IAlph such that A12:
the
InitS of
CRtfsm1,
w -leads_to q
by Def21;
set adl = the
InitS of
CRtfsm2 leads_to_under w;
now assume A15:
not the
InitS of
CRtfsm2 leads_to_under w in Q
;
:: thesis: contradictionA16:
the
InitS of
CRtfsm2 leads_to_under w in the
carrier of
CRtfsm1 \/ the
carrier of
CRtfsm2
by XBOOLE_0:def 3;
reconsider q =
q as
Element of the
carrier of
tfsm ;
reconsider adl = the
InitS of
CRtfsm2 leads_to_under w as
Element of the
carrier of
tfsm by A1, A16, Def24;
A17:
final_states_partition tfsm is
final
by Def15;
for
Y being
Element of the
carrier of
(the_reduction_of tfsm) holds
( not
q in Y or not
adl in Y )
then
not
q,
adl -are_equivalent
by A4, A17, Def14;
then consider dseq being
FinSequence of
IAlph such that A19:
q,
dseq -response <> adl,
dseq -response
by Def10;
reconsider adl2 =
adl as
Element of the
carrier of
CRtfsm2 ;
reconsider q1 =
q as
Element of the
carrier of
CRtfsm1 ;
A20:
the
InitS of
CRtfsm2,
w -leads_to adl2
by Def5;
q,
dseq -response = q1,
dseq -response
by A1, Th72;
then
q1,
dseq -response <> adl2,
dseq -response
by A1, A19, Th74;
then
the
InitS of
CRtfsm1,
(w ^ dseq) -response <> the
InitS of
CRtfsm2,
(w ^ dseq) -response
by A12, A20, Th27;
hence
contradiction
by A1, Def9;
:: thesis: verum end; hence
contradiction
by A13;
:: thesis: verum end; hence
contradiction
by A10;
:: thesis: verum end; suppose A38:
q in the
carrier of
CRtfsm2
;
:: thesis: contradictionset Q' =
Q \ {q};
A39:
now assume A40:
Q \ {q} = {}
;
:: thesis: contradictionreconsider q =
q as
Element of the
carrier of
CRtfsm2 by A38;
q is
accessible
by Def22;
then consider w being
FinSequence of
IAlph such that A41:
the
InitS of
CRtfsm2,
w -leads_to q
by Def21;
set adl = the
InitS of
CRtfsm1 leads_to_under w;
now assume A44:
not the
InitS of
CRtfsm1 leads_to_under w in Q
;
:: thesis: contradictionA45:
the
InitS of
CRtfsm1 leads_to_under w in the
carrier of
CRtfsm1 \/ the
carrier of
CRtfsm2
by XBOOLE_0:def 3;
reconsider q =
q as
Element of the
carrier of
tfsm ;
reconsider adl = the
InitS of
CRtfsm1 leads_to_under w as
Element of the
carrier of
tfsm by A1, A45, Def24;
A46:
final_states_partition tfsm is
final
by Def15;
for
Y being
Element of the
carrier of
(the_reduction_of tfsm) holds
( not
q in Y or not
adl in Y )
then
not
q,
adl -are_equivalent
by A4, A46, Def14;
then consider dseq being
FinSequence of
IAlph such that A48:
q,
dseq -response <> adl,
dseq -response
by Def10;
reconsider adl2 =
adl as
Element of the
carrier of
CRtfsm1 ;
reconsider q1 =
q as
Element of the
carrier of
CRtfsm2 ;
A49:
the
InitS of
CRtfsm1,
w -leads_to adl2
by Def5;
q,
dseq -response = q1,
dseq -response
by A1, Th74;
then
q1,
dseq -response <> adl2,
dseq -response
by A1, A48, Th72;
then
the
InitS of
CRtfsm2,
(w ^ dseq) -response <> the
InitS of
CRtfsm1,
(w ^ dseq) -response
by A41, A49, Th27;
hence
contradiction
by A1, Def9;
:: thesis: verum end; hence
contradiction
by A42;
:: thesis: verum end; hence
contradiction
by A39;
:: thesis: verum end; end;