let X be Subset of CQC-WFF ; :: thesis: for p, q being Element of CQC-WFF holds X |- p => (('not' p) => q)
let p, q be Element of CQC-WFF ; :: thesis: X |- p => (('not' p) => q)
A1: p => (('not' p) => q) in Cn X by Th29;
thus X |- p => (('not' p) => q) by A1, Def9; :: thesis: verum