Nuprl Definition : per-eq-def

per-eq-def{i:l}(Term;EQ;ts;T;T';eq) ==
  ∃A,B,a1,a2,b1,b2:Term
   ∃eqa:term-equality{i:l}(Term)
    (per-computes-to(Term;T;EQ a1 a2)
    ∧ per-computes-to(Term;T';EQ b1 b2)
    ∧ (ts eqa)
    ∧ (eqa a1 b1)
    ∧ (eqa a2 b2)
    ∧ (∀t,t':Term.  (eq t' ⇐⇒ (t Ax) ∧ (t' Ax) ∧ (eqa a1 a2))))



Definitions occuring in Statement :  per-computes-to: per-computes-to(Term;a;b) term-equality: term-equality{i:l}(Term) all: x:A. B[x] exists: x:A. B[x] iff: ⇐⇒ Q and: P ∧ Q apply: a sqequal: t axiom: Ax
Definitions occuring in definition :  exists: x:A. B[x] term-equality: term-equality{i:l}(Term) per-computes-to: per-computes-to(Term;a;b) all: x:A. B[x] iff: ⇐⇒ Q and: P ∧ Q sqequal: t axiom: Ax apply: a
FDL editor aliases :  per-eq-def

Latex:
per-eq-def\{i:l\}(Term;EQ;ts;T;T';eq)  ==
    \mexists{}A,B,a1,a2,b1,b2:Term
      \mexists{}eqa:term-equality\{i:l\}(Term)
        (per-computes-to(Term;T;EQ  A  a1  a2)
        \mwedge{}  per-computes-to(Term;T';EQ  B  b1  b2)
        \mwedge{}  (ts  A  B  eqa)
        \mwedge{}  (eqa  a1  b1)
        \mwedge{}  (eqa  a2  b2)
        \mwedge{}  (\mforall{}t,t':Term.    (eq  t  t'  \mLeftarrow{}{}\mRightarrow{}  (t  \msim{}  Ax)  \mwedge{}  (t'  \msim{}  Ax)  \mwedge{}  (eqa  a1  a2))))



Date html generated: 2016_05_15-PM-01_49_10
Last ObjectModification: 2015_09_23-AM-07_37_16

Theory : parameterized!rec


Home Index