Nuprl Definition : equiv-substs
equiv-substs(opr;s1;s2) ==
  ∀x:varname()
    (isl(apply-alist(VarDeq;s1;x)) = isl(apply-alist(VarDeq;s2;x))
    ∧ ((↑isl(apply-alist(VarDeq;s1;x)))
      
⇒ alpha-eq-terms(opr;outl(apply-alist(VarDeq;s1;x));outl(apply-alist(VarDeq;s2;x)))))
Definitions occuring in Statement : 
alpha-eq-terms: alpha-eq-terms(opr;a;b)
, 
var-deq: VarDeq
, 
varname: varname()
, 
apply-alist: apply-alist(eq;L;x)
, 
outl: outl(x)
, 
assert: ↑b
, 
isl: isl(x)
, 
bool: 𝔹
, 
all: ∀x:A. B[x]
, 
implies: P 
⇒ Q
, 
and: P ∧ Q
, 
equal: s = t ∈ T
Definitions occuring in definition : 
all: ∀x:A. B[x]
, 
and: P ∧ Q
, 
equal: s = t ∈ T
, 
bool: 𝔹
, 
implies: P 
⇒ Q
, 
assert: ↑b
, 
isl: isl(x)
, 
alpha-eq-terms: alpha-eq-terms(opr;a;b)
, 
outl: outl(x)
, 
apply-alist: apply-alist(eq;L;x)
, 
var-deq: VarDeq
FDL editor aliases : 
equiv-substs
Latex:
equiv-substs(opr;s1;s2)  ==
    \mforall{}x:varname()
        (isl(apply-alist(VarDeq;s1;x))  =  isl(apply-alist(VarDeq;s2;x))
        \mwedge{}  ((\muparrow{}isl(apply-alist(VarDeq;s1;x)))
            {}\mRightarrow{}  alpha-eq-terms(opr;outl(apply-alist(VarDeq;s1;x));outl(apply-alist(VarDeq;s2;x)))))
Date html generated:
2020_05_19-PM-09_57_34
Last ObjectModification:
2020_03_09-PM-04_09_50
Theory : terms
Home
Index