Nuprl Lemma : es-prior-match-programmable
∀[Info,A,B:Type]. ∀[R:A ─→ B ─→ 𝔹]. ∀[X:EClass(A)]. ∀[Y:EClass(B)].
  (es-prior-match(R; X; Y) = λp.if R (fst(p)) (snd(p)) then {p} else {} fi [X;Y] ∈ EClass(A × B))
Proof
Definitions occuring in Statement : 
es-prior-match: es-prior-match(R; X; Y)
, 
es-interface-pair-prior: X;Y
, 
es-filter-image: f[X]
, 
eclass: EClass(A[eo; e])
, 
ifthenelse: if b then t else f fi 
, 
bool: 𝔹
, 
uall: ∀[x:A]. B[x]
, 
pi1: fst(t)
, 
pi2: snd(t)
, 
apply: f a
, 
lambda: λx.A[x]
, 
function: x:A ─→ B[x]
, 
product: x:A × B[x]
, 
universe: Type
, 
equal: s = t ∈ T
, 
single-bag: {x}
, 
empty-bag: {}
Lemmas : 
es-interface-extensionality, 
es-prior-match_wf, 
es-filter-image_wf, 
bool_wf, 
eqtt_to_assert, 
single-bag_wf, 
eqff_to_assert, 
equal_wf, 
bool_cases_sqequal, 
subtype_base_sq, 
bool_subtype_base, 
assert-bnot, 
empty-bag_wf, 
es-interface-pair-prior_wf, 
in-eclass_wf, 
eclass-val_wf, 
es-E_wf, 
event-ordering+_subtype, 
bag_size_single_lemma, 
false_wf, 
bag_size_empty_lemma, 
es-interface-subtype_rel2, 
top_wf, 
subtype_top, 
es-prior-val_wf, 
bag_only_single_lemma, 
assert_wf, 
eq_int_wf, 
bag-size_wf, 
bag-only_wf2, 
single-valued-bag-single, 
eclass_wf, 
event-ordering+_wf
Latex:
\mforall{}[Info,A,B:Type].  \mforall{}[R:A  {}\mrightarrow{}  B  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].
    (es-prior-match(R;  X;  Y)  =  \mlambda{}p.if  R  (fst(p))  (snd(p))  then  \{p\}  else  \{\}  fi  [X;Y])
Date html generated:
2015_07_21-PM-03_49_42
Last ObjectModification:
2015_01_27-PM-06_06_05
Home
Index