theorem Th4: :: CQC_THE1:8
for Al being QC-alphabet
for X being Subset of (CQC-WFF Al)
for p, q being Element of CQC-WFF Al holds p => (('not' p) => q) in Cn X