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: T 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