let p, q be Element of CQC-WFF ; :: thesis: (p '&' q) => p in TAUT
('not' p) => (('not' p) 'or' ('not' q)) in TAUT by Th3;
then A1: ('not' (('not' p) 'or' ('not' q))) => ('not' ('not' p)) in TAUT by LUKASI_1:34;
(('not' p) 'or' ('not' q)) => ('not' (p '&' q)) in TAUT by Th18;
then A2: ('not' ('not' (p '&' q))) => ('not' (('not' p) 'or' ('not' q))) in TAUT by LUKASI_1:34;
(p '&' q) => ('not' ('not' (p '&' q))) in TAUT by LUKASI_1:27;
then A3: (p '&' q) => ('not' (('not' p) 'or' ('not' q))) in TAUT by A2, LUKASI_1:3;
('not' ('not' p)) => p in TAUT by LUKASI_1:25;
then ('not' (('not' p) 'or' ('not' q))) => p in TAUT by A1, LUKASI_1:3;
hence (p '&' q) => p in TAUT by A3, LUKASI_1:3; :: thesis: verum