reserve A for QC-alphabet;
reserve k,n,m for Nat;
reserve P for QC-pred_symbol of A;
reserve F for Element of QC-WFF(A);
reserve Q for QC-pred_symbol of A;
reserve F, G for (Element of QC-WFF(A)), s for FinSequence;
reserve p for Element of QC-WFF(A);
reserve F for Element of QC-WFF(A);
reserve p for Element of QC-WFF(A);
reserve j,k for Nat;
reserve k for Nat;
reserve s,t,u,v for QC-symbol of A;

theorem Th22:
  t <= t
proof
  set R = the Relation of A;
  R well_orders QC-symbols(A) \ NAT by Def32;
  then
A1: R is_reflexive_in QC-symbols(A) \ NAT by WELLORD1:def 5;
  per cases;
  suppose t in NAT;
    hence thesis by Def33;
  end;
  suppose
A2: not t in NAT;
    then t in QC-symbols(A) \ NAT by XBOOLE_0:def 5;
    then [t,t] in the Relation of A by A1,RELAT_2:def 1;
    hence thesis by A2,Def33;
  end;
end;
