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