theorem :: LUKASI_1:39
for A being QC-alphabet
for p, q being Element of CQC-WFF A st p => ('not' q) in TAUT A holds
q => ('not' p) in TAUT A