begin
:: deftheorem Def1 defines negation_faithful GOEDELCP:def 1 :
for X being Subset of CQC-WFF holds
( X is negation_faithful iff for p being Element of CQC-WFF holds
( X |- p or X |- 'not' p ) );
:: deftheorem Def2 defines with_examples GOEDELCP:def 2 :
for X being Subset of CQC-WFF holds
( X is with_examples iff for x being bound_QC-variable
for p being Element of CQC-WFF ex y being bound_QC-variable st X |- ('not' (Ex (x,p))) 'or' (p . (x,y)) );
theorem
theorem Th2:
theorem Th3:
theorem
theorem Th5:
theorem Th6:
theorem
theorem Th8:
theorem Th9:
theorem Th10:
theorem Th11:
theorem Th12:
theorem
theorem Th14:
theorem Th15:
theorem Th16:
theorem Th17:
begin
theorem Th18:
:: deftheorem Def3 defines ExCl GOEDELCP:def 3 :
for b1 being Subset of CQC-WFF holds
( b1 = ExCl iff for a being set holds
( a in b1 iff ex x being bound_QC-variable ex p being Element of CQC-WFF st a = Ex (x,p) ) );
theorem Th19:
theorem Th20:
Lm1:
for A being non empty set st A is countable holds
ex f being Function st
( dom f = NAT & A = rng f )
:: deftheorem Def4 defines Ex-bound_in GOEDELCP:def 4 :
for p being Element of QC-WFF st p is existential holds
for b2 being bound_QC-variable holds
( b2 = Ex-bound_in p iff ex q being Element of QC-WFF st p = Ex (b2,q) );
:: deftheorem Def5 defines Ex-the_scope_of GOEDELCP:def 5 :
for p being Element of CQC-WFF st p is existential holds
for b2 being Element of CQC-WFF holds
( b2 = Ex-the_scope_of p iff ex x being bound_QC-variable st p = Ex (x,b2) );
:: deftheorem Def6 defines bound_in GOEDELCP:def 6 :
for F being Function of NAT,CQC-WFF
for a being Element of NAT
for b3 being bound_QC-variable holds
( b3 = bound_in (F,a) iff for p being Element of CQC-WFF st p = F . a holds
b3 = Ex-bound_in p );
:: deftheorem Def7 defines the_scope_of GOEDELCP:def 7 :
for F being Function of NAT,CQC-WFF
for a being Element of NAT
for b3 being Element of CQC-WFF holds
( b3 = the_scope_of (F,a) iff for p being Element of CQC-WFF st p = F . a holds
b3 = Ex-the_scope_of p );
:: deftheorem defines still_not-bound_in GOEDELCP:def 8 :
for X being Subset of CQC-WFF holds still_not-bound_in X = union { (still_not-bound_in p) where p is Element of CQC-WFF : p in X } ;
theorem Th21:
theorem Th22:
theorem Th23:
theorem Th24:
theorem Th25:
theorem Th26:
theorem Th27:
theorem Th28:
theorem Th29:
theorem Th30:
theorem Th31:
theorem Th32:
theorem Th33:
theorem Th34:
begin
theorem Th35:
theorem Th36:
theorem Th37:
theorem