Step * 3 of Lemma assert-eq_mFO


1. isall : 𝔹@i
2. var : ℤ@i
3. body mFOL()@i
4. ∀y:mFOL(). uiff(↑eq_mFO(body;y);body y ∈ mFOL())@i
5. i1 : 𝔹@i
6. v1 : ℤ@i
7. b1 mFOL()@i
8. uiff(↑eq_mFO(mFOquant(isall;var;body);b1);mFOquant(isall;var;body) b1 ∈ mFOL())@i
⊢ uiff(↑if i1 =b isall then (var =z v1) ∧b eq_mFO(body;b1) else inr ⋅  fi ;mFOquant(isall;var;body)
mFOquant(i1;v1;b1)
∈ mFOL())
BY
((AutoSplit THEN Try (Fold `bfalse` 0)) THEN (RW assert_pushdownC THENA Auto) THEN RWW "4 5" THEN Auto) }


Latex:



1.  isall  :  \mBbbB{}@i
2.  var  :  \mBbbZ{}@i
3.  body  :  mFOL()@i
4.  \mforall{}y:mFOL().  uiff(\muparrow{}eq\_mFO(body;y);body  =  y)@i
5.  i1  :  \mBbbB{}@i
6.  v1  :  \mBbbZ{}@i
7.  b1  :  mFOL()@i
8.  uiff(\muparrow{}eq\_mFO(mFOquant(isall;var;body);b1);mFOquant(isall;var;body)  =  b1)@i
\mvdash{}  uiff(\muparrow{}if  i1  =b  isall  then  (var  =\msubz{}  v1)  \mwedge{}\msubb{}  eq\_mFO(body;b1)  else  inr  \mcdot{}    fi  ;mFOquant(isall;var;body)
=  mFOquant(i1;v1;b1))


By

((AutoSplit  THEN  Try  (Fold  `bfalse`  0))
  THEN  (RW  assert\_pushdownC  0  THENA  Auto)
  THEN  RWW  "4  5"  0
  THEN  Auto)




Home Index