Nuprl Lemma : do-chosen-command_wf

[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: 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
Lemmas :  lg-is-source_wf pInTransit_wf bool_wf eqtt_to_assert lg-label_wf lelt_wf lg-size_wf nat_wf eqff_to_assert equal_wf bool_cases_sqequal subtype_base_sq bool_subtype_base assert-bnot it_wf pMsg_wf list_wf component_wf ldag_wf Id_wf System_wf strong-type-continuous_wf lt_int_wf assert_wf bnot_wf not_wf less_than_wf assert_elim bfalse_wf btrue_neq_bfalse eq_atom_wf com-kind_wf equal-wf-T-base comm-msg_wf unit_wf2 deliver-msg_wf lg-remove_wf_dag is-dag_wf assert_of_eq_atom create-component_wf comm-create_wf neg_assert_of_eq_atom bool_cases assert_of_lt_int iff_transitivity iff_weakening_uiff assert_of_bnot uiff_transitivity

Latex:
\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: 2015_07_23-AM-11_09_15
Last ObjectModification: 2015_01_29-AM-00_09_43

Home Index