thus (q => (q => r)) => (q => r) in TAUT by Th10; :: according to CQC_THE1:def 11 :: thesis: verum