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