let p, q, r be Element of CQC-WFF ; :: thesis: (p => q) => ((r => p) => (r => q)) is valid
thus (p => q) => ((r => p) => (r => q)) in TAUT by Th9; :: according to CQC_THE1:def 11 :: thesis: verum