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: 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
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