thus (p => q) => ((q => r) => (p => r)) in TAUT A by Th1; :: according to CQC_THE1:def 10 :: thesis: verum