{ 
[M:Type 
 Type]
    
[nat2msg:
 
 pMsg(P.M[P])]. 
[loc2msg:Id 
 pMsg(P.M[P])].
    
[S:System(P.M[P])]. 
[t,n,m:
]. 
[nm:Id].
      (do-chosen-command(nat2msg;loc2msg;t;S;n;m;nm) 
 
 
 Id
                                                       
 Id
                                                       
 pMsg(P.M[P])?
                                                       
 System(P.M[P])) 
    supposing Continuous+(P.M[P]) }
{ Proof }
Definitions occuring in Statement : 
do-chosen-command: do-chosen-command(nat2msg;loc2msg;t;S;n;m;nm), 
System: System(P.M[P]), 
pMsg: pMsg(P.M[P]), 
Id: Id, 
strong-type-continuous: Continuous+(T.F[T]), 
nat:
, 
uimplies: b supposing a, 
uall:
[x:A]. B[x], 
so_apply: x[s], 
unit: Unit, 
member: t 
 T, 
function: x:A 
 B[x], 
product: x:A 
 B[x], 
union: left + right, 
int:
, 
universe: Type
Definitions : 
uall:
[x:A]. B[x], 
uimplies: b supposing a, 
so_apply: x[s], 
System: System(P.M[P]), 
member: t 
 T, 
do-chosen-command: do-chosen-command(nat2msg;loc2msg;t;S;n;m;nm), 
ifthenelse: if b then t else f fi , 
spreadn: spread3, 
let: let, 
ldag: LabeledDAG(T), 
so_lambda: 
x.t[x], 
all:
x:A. B[x], 
implies: P 
 Q, 
btrue: tt, 
bfalse: ff, 
prop:
, 
nat:
, 
unit: Unit, 
lg-is-source: lg-is-source(g;i), 
pInTransit: pInTransit(P.M[P]), 
bool:
, 
iff: P 

 Q, 
and: P 
 Q, 
false: False, 
or: P 
 Q, 
sq_type: SQType(T), 
guard: {T}, 
it:
, 
not:
A
Lemmas : 
lg-is-source_wf_dag, 
pInTransit_wf, 
bool_wf, 
iff_weakening_uiff, 
assert_wf, 
eqtt_to_assert, 
lg-label_wf_dag, 
is-dag_wf, 
not_wf, 
uiff_transitivity, 
bnot_wf, 
eqff_to_assert, 
assert_of_bnot, 
it_wf, 
Id_wf, 
pMsg_wf, 
nat_wf, 
System_wf, 
strong-type-continuous_wf, 
lt_int_wf, 
lg-size_wf, 
le_wf, 
le_int_wf, 
btrue_neq_bfalse, 
assert_elim, 
bfalse_wf, 
eq_atom_wf, 
com-kind_wf, 
comm-msg_wf, 
unit_wf, 
deliver-msg_wf, 
lg-remove_wf_dag, 
assert_of_eq_atom, 
create-component_wf, 
comm-create_wf, 
not_functionality_wrt_uiff, 
bool_cases, 
subtype_base_sq, 
bool_subtype_base, 
assert_of_lt_int, 
assert_functionality_wrt_uiff, 
bnot_of_lt_int, 
assert_of_le_int
\mforall{}[M:Type  {}\mrightarrow{}  Type]
    \mforall{}[nat2msg:\mBbbN{}  {}\mrightarrow{}  pMsg(P.M[P])].  \mforall{}[loc2msg:Id  {}\mrightarrow{}  pMsg(P.M[P])].  \mforall{}[S:System(P.M[P])].  \mforall{}[t,n,m:\mBbbN{}].
    \mforall{}[nm:Id].
        (do-chosen-command(nat2msg;loc2msg;t;S;n;m;nm)  \mmember{}  \mBbbZ{}  \mtimes{}  Id  \mtimes{}  Id  \mtimes{}  pMsg(P.M[P])?  \mtimes{}  System(P.M[P])) 
    supposing  Continuous+(P.M[P])
Date html generated:
2011_08_16-PM-06_53_57
Last ObjectModification:
2011_06_18-AM-11_08_40
Home
Index