let F, G be Element of QC-WFF ; :: thesis: ( F '&' ('not' G) is_proper_subformula_of F => G & F is_proper_subformula_of F => G & 'not' G is_proper_subformula_of F => G & G is_proper_subformula_of F => G )
thus A1: F '&' ('not' G) is_proper_subformula_of F => G by Th86; :: thesis: ( F is_proper_subformula_of F => G & 'not' G is_proper_subformula_of F => G & G is_proper_subformula_of F => G )
( F is_proper_subformula_of F '&' ('not' G) & 'not' G is_proper_subformula_of F '&' ('not' G) ) by Th89;
hence A2: ( F is_proper_subformula_of F => G & 'not' G is_proper_subformula_of F => G ) by A1, Th76; :: thesis: G is_proper_subformula_of F => G
G is_proper_subformula_of 'not' G by Th86;
hence G is_proper_subformula_of F => G by A2, Th76; :: thesis: verum