{ [M:Type  Type]. [r:fulpRunType(P.M[P])]. [t:]. [x:pInTransit(P.M[P])].
  [env:pEnvType(P.M[P])].
    (chosen-command(P.M[P];env;r;t;x)  ) }

{ Proof }



Definitions occuring in Statement :  chosen-command: chosen-command(P.M[P];env;r;t;x) pEnvType: pEnvType(T.M[T]) fulpRunType: fulpRunType(T.M[T]) pInTransit: pInTransit(P.M[P]) nat_plus: uall: [x:A]. B[x] prop: so_apply: x[s] member: t  T function: x:A  B[x] universe: Type
Definitions :  uall: [x:A]. B[x] fulpRunType: fulpRunType(T.M[T]) so_apply: x[s] member: t  T prop: chosen-command: chosen-command(P.M[P];env;r;t;x) let: let pi1: fst(t) and: P  Q so_lambda: x.t[x] all: x:A. B[x] implies: P  Q nat: int_seg: {i..j} top: Top lelt: i  j < k cand: A c B nat_plus: lg-is-source: lg-is-source(g;i) System: System(P.M[P]) ldag: LabeledDAG(T) uimplies: b supposing a false: False ifthenelse: if b then t else f fi  bfalse: ff or: P  Q btrue: tt sq_type: SQType(T) guard: {T} iff: P  Q not: A
Lemmas :  run-system_wf System_wf subtype_rel_function nat_wf Id_wf pMsg_wf unit_wf int_seg_wf nat_plus_properties top_wf ldag_wf pInTransit_wf le_wf subtype_rel_simple_product subtype_rel_self assert_wf lg-is-source_wf_dag lg-label_wf_dag pEnvType_wf nat_plus_wf fulpRunType_wf lt_int_wf lg-size_wf bool_wf le_int_wf bnot_wf btrue_neq_bfalse assert_elim bfalse_wf bool_cases subtype_base_sq bool_subtype_base iff_weakening_uiff uiff_transitivity eqtt_to_assert assert_of_lt_int eqff_to_assert assert_functionality_wrt_uiff bnot_of_lt_int assert_of_le_int

\mforall{}[M:Type  {}\mrightarrow{}  Type].  \mforall{}[r:fulpRunType(P.M[P])].  \mforall{}[t:\mBbbN{}\msupplus{}].  \mforall{}[x:pInTransit(P.M[P])].
\mforall{}[env:pEnvType(P.M[P])].
    (chosen-command(P.M[P];env;r;t;x)  \mmember{}  \mBbbP{})


Date html generated: 2011_08_17-PM-03_42_31
Last ObjectModification: 2011_06_18-AM-11_23_47

Home Index