Nuprl Lemma : mFOL_ind_wf

[A:Type]. ∀[R:A ─→ mFOL() ─→ ℙ]. ∀[v:mFOL()]. ∀[atomic:name:Atom ─→ vars:(ℤ List) ─→ {x:A| R[x;name(vars)]} ].
[connect:knd:Atom
          ─→ left:mFOL()
          ─→ right:mFOL()
          ─→ {x:A| R[x;left]} 
          ─→ {x:A| R[x;right]} 
          ─→ {x:A| R[x;mFOconnect(knd;left;right)]} ]. ∀[quant:isall:𝔹
                                                              ─→ var:ℤ
                                                              ─→ body:mFOL()
                                                              ─→ {x:A| R[x;body]} 
                                                              ─→ {x:A| R[x;mFOquant(isall;var;body)]} ].
  (mFOL_ind(v;
            mFOatomic(name,vars) atomic[name;vars];
            mFOconnect(knd,left,right) rec1,rec2.connect[knd;left;right;rec1;rec2];
            mFOquant(isall,var,body) rec3.quant[isall;var;body;rec3])  ∈ {x:A| R[x;v]} )


Proof




Definitions occuring in Statement :  mFOL_ind: mFOL_ind mFOquant: mFOquant(isall;var;body) mFOconnect: mFOconnect(knd;left;right) mFOatomic: name(vars) mFOL: mFOL() list: List bool: 𝔹 uall: [x:A]. B[x] prop: so_apply: x[s1;s2;s3;s4;s5] so_apply: x[s1;s2;s3;s4] so_apply: x[s1;s2] member: t ∈ T set: {x:A| B[x]}  function: x:A ─→ B[x] int: atom: Atom universe: Type
Lemmas :  top_wf has-value_wf_base lifting-strict-atom_eq base_wf list_wf mFOatomic_wf mFOL_wf mFOconnect_wf bool_wf mFOquant_wf all_wf set_wf subtype_rel-equal
\mforall{}[A:Type].  \mforall{}[R:A  {}\mrightarrow{}  mFOL()  {}\mrightarrow{}  \mBbbP{}].  \mforall{}[v:mFOL()].  \mforall{}[atomic:name:Atom
                                                                                                                {}\mrightarrow{}  vars:(\mBbbZ{}  List)
                                                                                                                {}\mrightarrow{}  \{x:A|  R[x;name(vars)]\}  ].
\mforall{}[connect:knd:Atom
                    {}\mrightarrow{}  left:mFOL()
                    {}\mrightarrow{}  right:mFOL()
                    {}\mrightarrow{}  \{x:A|  R[x;left]\} 
                    {}\mrightarrow{}  \{x:A|  R[x;right]\} 
                    {}\mrightarrow{}  \{x:A|  R[x;mFOconnect(knd;left;right)]\}  ].  \mforall{}[quant:isall:\mBbbB{}
                                                                                                                            {}\mrightarrow{}  var:\mBbbZ{}
                                                                                                                            {}\mrightarrow{}  body:mFOL()
                                                                                                                            {}\mrightarrow{}  \{x:A|  R[x;body]\} 
                                                                                                                            {}\mrightarrow{}  \{x:A| 
                                                                                                                                    R[x;mFOquant(isall;var;body)]\}  ].
    (mFOL\_ind(v;
                        mFOatomic(name,vars){}\mRightarrow{}  atomic[name;vars];
                        mFOconnect(knd,left,right){}\mRightarrow{}  rec1,rec2.connect[knd;left;right;rec1;rec2];
                        mFOquant(isall,var,body){}\mRightarrow{}  rec3.quant[isall;var;body;rec3])    \mmember{}  \{x:A|  R[x;v]\}  )



Date html generated: 2015_07_17-AM-07_53_52
Last ObjectModification: 2015_01_29-PM-04_40_31

Home Index