Twee---2.7.UNS-Prf.s

%------------------------------------------------------------------------------
% File     : Twee---2.7
% Problem  : LCL056-1 : TPTP v9.3.1. Released v1.0.0.
% Transfm  : none
% Format   : tptp:raw
% Command  : run_twee /export/starexec/sandbox2/benchmark/theBenchmark.p

% Computer : n003.cluster.edu
% Model    : x86_64 x86_64
% CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 2.10GHz
% Memory   : 8046.5625MB
% OS       : Linux 6.8.0-71-generic
% CPULimit : 300s
% WCLimit  : 300s
% DateTime : Tue Sep 29 11:48:55 AM UTC 2026

% Result   : Unsatisfiable 20.40s 3.10s
% Output   : Proof 40.86s
% Verified : 
% SZS Type : -

% Comments : 
%------------------------------------------------------------------------------
%----WARNING: Could not form TPTP format derivation
%------------------------------------------------------------------------------
%----ORIGINAL SYSTEM OUTPUT
% 0.00/0.03  % Problem  : LCL056-1 : TPTP v9.3.1. Released v1.0.0.
% 0.00/0.04  % Command  : run_twee /export/starexec/sandbox2/benchmark/theBenchmark.p
% 0.11/0.37  % Computer : n003.cluster.edu
% 0.11/0.37  % Model    : x86_64 x86_64
% 0.11/0.37  % CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 @ 2.10GHz
% 0.11/0.37  % Memory   : 8046.5625MB
% 0.11/0.37  % OS       : Linux 6.8.0-71-generic
% 0.11/0.37  % CPULimit : 300
% 0.11/0.37  % WCLimit  : 300
% 0.11/0.37  % DateTime : Sun Sep 27 15:21:39 UTC 2026
% 0.11/0.37  % CPUTime  : 
% 0.11/0.37  Running run_twee /export/starexec/sandbox2/benchmark/theBenchmark.p
% 20.40/3.10  Command-line arguments: --no-flatten-goal
% 20.40/3.10  
% 20.40/3.10  % SZS status Unsatisfiable
% 20.40/3.10  
% 33.83/4.79  % SZS output start Proof
% 33.83/4.79  Axiom 1 (ifeq_axiom): ifeq(X, X, Y, Z) = Y.
% 33.83/4.79  Axiom 2 (cn_3): is_a_theorem(implies(X, implies(not(X), Y))) = true.
% 33.83/4.79  Axiom 3 (cn_2): is_a_theorem(implies(implies(not(X), X), X)) = true.
% 33.83/4.79  Axiom 4 (condensed_detachment): ifeq(is_a_theorem(implies(X, Y)), true, ifeq(is_a_theorem(X), true, is_a_theorem(Y), true), true) = true.
% 34.68/4.83  Axiom 5 (cn_1): is_a_theorem(implies(implies(X, Y), implies(implies(Y, Z), implies(X, Z)))) = true.
% 34.68/4.83  
% 34.68/4.83  Goal 1 (prove_cn_39): is_a_theorem(implies(not(not(a)), a)) = true.
% 34.68/4.83  Proof:
% 34.68/4.83    is_a_theorem(implies(not(not(a)), a))
% 34.68/4.83  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.83    ifeq(true, true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.83  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.83    ifeq(ifeq(is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.83  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.84    ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(a, a), implies(implies(not(a), a), a)), implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a))))), true, ifeq(is_a_theorem(implies(implies(a, a), implies(implies(not(a), a), a))), true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 5 (cn_1) }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(a, a), implies(implies(not(a), a), a))), true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(a, a), implies(implies(not(a), a), a))), true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(a, a), implies(implies(not(a), a), a))), true), true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 5 (cn_1) R->L }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(a), a), a), implies(implies(a, a), implies(implies(not(a), a), a)))), true, is_a_theorem(implies(implies(a, a), implies(implies(not(a), a), a))), true), true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(a), a), a), implies(implies(a, a), implies(implies(not(a), a), a)))), true, ifeq(true, true, is_a_theorem(implies(implies(a, a), implies(implies(not(a), a), a))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 3 (cn_2) R->L }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(a), a), a), implies(implies(a, a), implies(implies(not(a), a), a)))), true, ifeq(is_a_theorem(implies(implies(not(a), a), a)), true, is_a_theorem(implies(implies(a, a), implies(implies(not(a), a), a))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.84  = { by axiom 4 (condensed_detachment) }
% 34.68/4.84    ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.85    ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.85    ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.85    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(implies(not(a), a), a), implies(not(not(a)), a))), implies(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a))), implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))))), true, ifeq(is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(implies(not(a), a), a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a))), implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 5 (cn_1) }
% 34.68/4.85    ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(implies(not(a), a), a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a))), implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.85    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(implies(not(a), a), a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a))), implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a))))), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 5 (cn_1) }
% 34.68/4.85    ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a))), implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a))))), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.85    ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a))), implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a))))), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(a), a), a), implies(not(not(a)), a)), implies(implies(a, a), implies(not(not(a)), a)))), true, is_a_theorem(implies(implies(not(not(a)), implies(not(a), a)), implies(implies(a, a), implies(not(not(a)), a)))), true), true), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 4 (condensed_detachment) }
% 34.68/4.85    ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.85    ifeq(ifeq(is_a_theorem(implies(not(not(a)), implies(not(a), a))), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.85    ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.85    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.85  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.85    ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.86  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.86    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a))), implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))))), true, ifeq(is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)))), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.86  = { by axiom 5 (cn_1) }
% 34.68/4.86    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)))), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.86  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.86    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)))), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.86  = { by axiom 5 (cn_1) }
% 34.68/4.86    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.86  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.86    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.87  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.87    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(true, true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.87  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.87    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(implies(not(not(not(a))), not(not(a)))), a)), implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(implies(not(not(not(a))), not(not(a)))), a))), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.87  = { by axiom 2 (cn_3) }
% 34.68/4.87    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(implies(not(not(not(a))), not(not(a)))), a)), implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.87  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.87    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(implies(not(not(not(a))), not(not(a)))), a)), implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.87  = { by axiom 5 (cn_1) }
% 34.68/4.87    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.88  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.88    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))))), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), a), implies(not(a), a)), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true, is_a_theorem(implies(implies(not(a), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.88  = { by axiom 4 (condensed_detachment) }
% 34.68/4.88    ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.88  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.88    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.88  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.88    ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.88  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.88    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.89  = { by axiom 1 (ifeq_axiom) R->L }
% 34.68/4.89    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(true, true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.89  = { by axiom 4 (condensed_detachment) R->L }
% 34.68/4.89    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.89  = { by axiom 2 (cn_3) }
% 34.68/4.89    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.90  = { by axiom 1 (ifeq_axiom) }
% 34.68/4.90    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 34.68/4.90  = { by axiom 5 (cn_1) }
% 35.42/4.90    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.90  = { by axiom 1 (ifeq_axiom) }
% 35.42/4.90    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.90  = { by axiom 1 (ifeq_axiom) R->L }
% 35.42/4.91    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(true, true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.91  = { by axiom 3 (cn_2) R->L }
% 35.42/4.91    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.91  = { by axiom 4 (condensed_detachment) }
% 35.42/4.91    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.91  = { by axiom 1 (ifeq_axiom) }
% 35.42/4.91    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.91  = { by axiom 1 (ifeq_axiom) R->L }
% 35.42/4.91    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.92  = { by axiom 4 (condensed_detachment) R->L }
% 35.42/4.92    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.92  = { by axiom 1 (ifeq_axiom) R->L }
% 35.42/4.92    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.93  = { by axiom 4 (condensed_detachment) R->L }
% 35.42/4.93    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.93  = { by axiom 3 (cn_2) }
% 35.42/4.94    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.94  = { by axiom 1 (ifeq_axiom) }
% 35.42/4.94    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.94  = { by axiom 5 (cn_1) }
% 35.42/4.95    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.95  = { by axiom 1 (ifeq_axiom) }
% 35.42/4.95    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.95  = { by axiom 1 (ifeq_axiom) R->L }
% 35.42/4.96    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.96  = { by axiom 5 (cn_1) R->L }
% 35.42/4.96    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))))), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.96  = { by axiom 4 (condensed_detachment) }
% 35.42/4.96    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.97  = { by axiom 1 (ifeq_axiom) }
% 35.42/4.97    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.97  = { by axiom 1 (ifeq_axiom) R->L }
% 35.42/4.97    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.98  = { by axiom 4 (condensed_detachment) R->L }
% 35.42/4.98    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/4.99  = { by axiom 1 (ifeq_axiom) R->L }
% 35.42/4.99    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 35.42/5.00  = { by axiom 4 (condensed_detachment) R->L }
% 35.42/5.00    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.02  = { by axiom 1 (ifeq_axiom) R->L }
% 36.26/5.02    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.02  = { by axiom 5 (cn_1) R->L }
% 36.26/5.03    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, is_a_theorem(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.03  = { by axiom 1 (ifeq_axiom) R->L }
% 36.26/5.04    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.05  = { by axiom 2 (cn_3) R->L }
% 36.26/5.05    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(is_a_theorem(implies(not(not(not(a))), implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.05  = { by axiom 4 (condensed_detachment) }
% 36.26/5.06    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(true, true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.06  = { by axiom 1 (ifeq_axiom) }
% 36.26/5.07    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.08  = { by axiom 1 (ifeq_axiom) R->L }
% 36.26/5.08    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.26/5.09  = { by axiom 4 (condensed_detachment) R->L }
% 36.26/5.10    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.11  = { by axiom 1 (ifeq_axiom) R->L }
% 36.98/5.11    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.12  = { by axiom 5 (cn_1) R->L }
% 36.98/5.13    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a)))))), implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))))), true, is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.13  = { by axiom 1 (ifeq_axiom) R->L }
% 36.98/5.14    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a)))))), implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.15  = { by axiom 2 (cn_3) R->L }
% 36.98/5.16    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a)))))), implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))))), true, ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.17  = { by axiom 4 (condensed_detachment) }
% 36.98/5.17    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.17  = { by axiom 1 (ifeq_axiom) }
% 36.98/5.18    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.18  = { by axiom 5 (cn_1) }
% 36.98/5.19    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.19  = { by axiom 1 (ifeq_axiom) }
% 36.98/5.20    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 36.98/5.20  = { by axiom 1 (ifeq_axiom) R->L }
% 37.74/5.20    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.21  = { by axiom 5 (cn_1) R->L }
% 37.74/5.21    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))))), true, ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(not(a)))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.22  = { by axiom 4 (condensed_detachment) }
% 37.74/5.22    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.23  = { by axiom 1 (ifeq_axiom) }
% 37.74/5.23    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.23  = { by axiom 1 (ifeq_axiom) R->L }
% 37.74/5.23    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.23  = { by axiom 5 (cn_1) R->L }
% 37.74/5.23    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))))), implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.24  = { by axiom 4 (condensed_detachment) }
% 37.74/5.24    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.24  = { by axiom 1 (ifeq_axiom) }
% 37.74/5.24    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.25  = { by axiom 1 (ifeq_axiom) R->L }
% 37.74/5.25    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.25  = { by axiom 4 (condensed_detachment) R->L }
% 37.74/5.26    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true, ifeq(is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.26  = { by axiom 5 (cn_1) }
% 37.74/5.26    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.27  = { by axiom 1 (ifeq_axiom) }
% 37.74/5.27    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.28  = { by axiom 1 (ifeq_axiom) R->L }
% 37.74/5.28    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.28  = { by axiom 4 (condensed_detachment) R->L }
% 37.74/5.29    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true, ifeq(is_a_theorem(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.29  = { by axiom 3 (cn_2) }
% 37.74/5.30    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true, ifeq(true, true, is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 37.74/5.30  = { by axiom 1 (ifeq_axiom) }
% 38.38/5.30    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.31  = { by axiom 5 (cn_1) }
% 38.38/5.31    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.32  = { by axiom 1 (ifeq_axiom) }
% 38.38/5.32    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.33  = { by axiom 1 (ifeq_axiom) R->L }
% 38.38/5.33    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.34  = { by axiom 4 (condensed_detachment) R->L }
% 38.38/5.34    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a)))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))))), true, ifeq(is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))))), true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.35  = { by axiom 2 (cn_3) }
% 38.38/5.35    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a)))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.36  = { by axiom 1 (ifeq_axiom) }
% 38.38/5.36    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a)))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.37  = { by axiom 5 (cn_1) }
% 38.38/5.37    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.37  = { by axiom 1 (ifeq_axiom) }
% 38.38/5.38    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a)))))), true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(not(a))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true, is_a_theorem(implies(not(implies(not(not(not(a))), not(not(a)))), implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.38  = { by axiom 4 (condensed_detachment) }
% 38.38/5.38    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.39  = { by axiom 1 (ifeq_axiom) }
% 38.38/5.40    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 38.38/5.40  = { by axiom 1 (ifeq_axiom) R->L }
% 38.38/5.40    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.41  = { by axiom 4 (condensed_detachment) R->L }
% 39.12/5.41    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a))))), implies(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.42  = { by axiom 5 (cn_1) }
% 39.12/5.42    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.42  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.43    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.43  = { by axiom 5 (cn_1) }
% 39.12/5.43    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.44  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.44    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))))), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a)))))), not(not(a))), implies(not(not(not(a))), not(not(a)))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(not(not(a))), implies(not(not(not(implies(not(not(not(a))), not(not(a)))))), not(not(implies(not(not(not(a))), not(not(a))))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.44  = { by axiom 4 (condensed_detachment) }
% 39.12/5.44    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.44  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.45    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.45  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.45    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.45  = { by axiom 5 (cn_1) R->L }
% 39.12/5.45    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(not(not(implies(not(not(not(a))), not(not(a))))), implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.45  = { by axiom 4 (condensed_detachment) }
% 39.12/5.46    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.46  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.46    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.47  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.47    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.47  = { by axiom 4 (condensed_detachment) R->L }
% 39.12/5.47    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))))), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.48  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.49    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.49  = { by axiom 5 (cn_1) R->L }
% 39.12/5.50    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.50  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.50    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.51  = { by axiom 5 (cn_1) R->L }
% 39.12/5.51    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))))), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.52  = { by axiom 4 (condensed_detachment) }
% 39.12/5.52    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.52  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.53    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.53  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.53    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.54  = { by axiom 4 (condensed_detachment) R->L }
% 39.12/5.54    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.54  = { by axiom 3 (cn_2) }
% 39.12/5.55    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(true, true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.55  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.55    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.56  = { by axiom 5 (cn_1) }
% 39.12/5.56    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.57  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.57    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.57  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.57    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.57  = { by axiom 5 (cn_1) R->L }
% 39.12/5.58    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))))), true, ifeq(is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.58  = { by axiom 4 (condensed_detachment) }
% 39.12/5.58    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.58  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.58    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), implies(not(not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(not(implies(not(not(not(a))), not(not(a)))), not(implies(not(not(not(a))), not(not(a))))), implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.58  = { by axiom 4 (condensed_detachment) }
% 39.12/5.58    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.58  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.58    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.59  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.59    ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.59  = { by axiom 4 (condensed_detachment) R->L }
% 39.12/5.59    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.59  = { by axiom 5 (cn_1) }
% 39.12/5.59    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.59  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.59    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.59  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.59    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.59  = { by axiom 4 (condensed_detachment) R->L }
% 39.12/5.60    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(not(a))), implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), not(not(a)))), true, is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.60  = { by axiom 3 (cn_2) }
% 39.12/5.60    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(not(a))), implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(true, true, is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.60  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.60    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(not(a))), implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true, is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.60  = { by axiom 5 (cn_1) }
% 39.12/5.60    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.60  = { by axiom 1 (ifeq_axiom) }
% 39.12/5.61    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.61  = { by axiom 1 (ifeq_axiom) R->L }
% 39.12/5.61    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 39.12/5.61  = { by axiom 4 (condensed_detachment) R->L }
% 39.12/5.61    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(a), implies(not(not(a)), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))))), true, ifeq(is_a_theorem(implies(not(a), implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.61  = { by axiom 2 (cn_3) }
% 40.86/5.62    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(a), implies(not(not(a)), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.62  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.62    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(a), implies(not(not(a)), not(implies(not(not(not(a))), not(not(a)))))), implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))))), true, is_a_theorem(implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.62  = { by axiom 5 (cn_1) }
% 40.86/5.62    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true), true, ifeq(is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.62  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.62    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))), implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a)))))))), true, ifeq(is_a_theorem(implies(implies(not(not(a)), not(implies(not(not(not(a))), not(not(a))))), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true, is_a_theorem(implies(not(a), implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))))), true), true), true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.62  = { by axiom 4 (condensed_detachment) }
% 40.86/5.62    ifeq(ifeq(ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.62  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.62    ifeq(ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a))))), implies(not(a), not(implies(not(not(not(a))), not(not(a))))))), true, ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), not(implies(not(not(not(a))), not(not(a))))), not(implies(not(not(not(a))), not(not(a)))))), true, is_a_theorem(implies(not(a), not(implies(not(not(not(a))), not(not(a)))))), true), true), true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 4 (condensed_detachment) }
% 40.86/5.63    ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.63    ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) R->L }
% 40.86/5.63    ifeq(ifeq(ifeq(true, true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 4 (condensed_detachment) R->L }
% 40.86/5.63    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(a)), implies(not(not(not(a))), not(not(a)))), implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a))))), true, ifeq(is_a_theorem(implies(not(not(a)), implies(not(not(not(a))), not(not(a))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 2 (cn_3) }
% 40.86/5.63    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(a)), implies(not(not(not(a))), not(not(a)))), implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a))))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a)))), true), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.63    ifeq(ifeq(ifeq(ifeq(is_a_theorem(implies(implies(not(not(a)), implies(not(not(not(a))), not(not(a)))), implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a))))), true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 5 (cn_1) }
% 40.86/5.63    ifeq(ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a)))), true), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.63    ifeq(ifeq(ifeq(is_a_theorem(implies(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a)), implies(not(not(a)), implies(not(a), a)))), true, ifeq(is_a_theorem(implies(implies(not(not(not(a))), not(not(a))), implies(not(a), a))), true, is_a_theorem(implies(not(not(a)), implies(not(a), a))), true), true), true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 4 (condensed_detachment) }
% 40.86/5.63    ifeq(ifeq(true, true, is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, is_a_theorem(implies(not(not(a)), a)), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) R->L }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(true, true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 4 (condensed_detachment) R->L }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(a), a), a), implies(a, a))), true, ifeq(is_a_theorem(implies(implies(not(a), a), a)), true, is_a_theorem(implies(a, a)), true), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 3 (cn_2) }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(a), a), a), implies(a, a))), true, ifeq(true, true, is_a_theorem(implies(a, a)), true), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(is_a_theorem(implies(implies(implies(not(a), a), a), implies(a, a))), true, is_a_theorem(implies(a, a)), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) R->L }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(ifeq(true, true, is_a_theorem(implies(implies(implies(not(a), a), a), implies(a, a))), true), true, is_a_theorem(implies(a, a)), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 5 (cn_1) R->L }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(ifeq(is_a_theorem(implies(implies(a, implies(not(a), a)), implies(implies(implies(not(a), a), a), implies(a, a)))), true, is_a_theorem(implies(implies(implies(not(a), a), a), implies(a, a))), true), true, is_a_theorem(implies(a, a)), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) R->L }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(ifeq(is_a_theorem(implies(implies(a, implies(not(a), a)), implies(implies(implies(not(a), a), a), implies(a, a)))), true, ifeq(true, true, is_a_theorem(implies(implies(implies(not(a), a), a), implies(a, a))), true), true), true, is_a_theorem(implies(a, a)), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 2 (cn_3) R->L }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(ifeq(is_a_theorem(implies(implies(a, implies(not(a), a)), implies(implies(implies(not(a), a), a), implies(a, a)))), true, ifeq(is_a_theorem(implies(a, implies(not(a), a))), true, is_a_theorem(implies(implies(implies(not(a), a), a), implies(a, a))), true), true), true, is_a_theorem(implies(a, a)), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 4 (condensed_detachment) }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(ifeq(true, true, is_a_theorem(implies(a, a)), true), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 1 (ifeq_axiom) }
% 40.86/5.63    ifeq(is_a_theorem(implies(implies(a, a), implies(not(not(a)), a))), true, ifeq(is_a_theorem(implies(a, a)), true, is_a_theorem(implies(not(not(a)), a)), true), true)
% 40.86/5.63  = { by axiom 4 (condensed_detachment) }
% 40.86/5.64    true
% 40.86/5.64  % SZS output end Proof
% 40.86/5.64  
% 40.86/5.64  RESULT: Unsatisfiable (the axioms are contradictory).
%------------------------------------------------------------------------------