TSTP Solution File: PUZ031+3 by Zenon---0.7.1

View Problem - Process Solution

%------------------------------------------------------------------------------
% File     : Zenon---0.7.1
% Problem  : PUZ031+3 : TPTP v8.1.0. Released v4.1.0.
% Transfm  : none
% Format   : tptp:raw
% Command  : run_zenon %s %d

% Computer : n017.cluster.edu
% Model    : x86_64 x86_64
% CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 2.10GHz
% Memory   : 8042.1875MB
% OS       : Linux 3.10.0-693.el7.x86_64
% CPULimit : 300s
% WCLimit  : 600s
% DateTime : Mon Jul 18 18:33:38 EDT 2022

% Result   : Theorem 0.50s 0.70s
% Output   : Proof 0.50s
% Verified : 
% SZS Type : -

% Comments : 
%------------------------------------------------------------------------------
%----WARNING: Could not form TPTP format derivation
%------------------------------------------------------------------------------
%----ORIGINAL SYSTEM OUTPUT
% 0.03/0.11  % Problem  : PUZ031+3 : TPTP v8.1.0. Released v4.1.0.
% 0.03/0.12  % Command  : run_zenon %s %d
% 0.11/0.33  % Computer : n017.cluster.edu
% 0.11/0.33  % Model    : x86_64 x86_64
% 0.11/0.33  % CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 @ 2.10GHz
% 0.11/0.33  % Memory   : 8042.1875MB
% 0.11/0.33  % OS       : Linux 3.10.0-693.el7.x86_64
% 0.11/0.33  % CPULimit : 300
% 0.11/0.33  % WCLimit  : 600
% 0.11/0.33  % DateTime : Sat May 28 20:01:38 EDT 2022
% 0.11/0.33  % CPUTime  : 
% 0.50/0.70  (* PROOF-FOUND *)
% 0.50/0.70  % SZS status Theorem
% 0.50/0.70  (* BEGIN-PROOF *)
% 0.50/0.70  % SZS output start Proof
% 0.50/0.70  Theorem pel47 : (exists X : zenon_U, (exists Y : zenon_U, (exists Z : zenon_U, ((animal X)/\((animal Y)/\((grain Z)/\((eats Y Z)/\(eats X Y)))))))).
% 0.50/0.70  Proof.
% 0.50/0.70  assert (zenon_L1_ : forall (zenon_TA_bf : zenon_U), (bird zenon_TA_bf) -> (~(animal zenon_TA_bf)) -> False).
% 0.50/0.70  do 1 intro. intros zenon_H1d zenon_H1e.
% 0.50/0.70  generalize (bird_is_animal zenon_TA_bf). zenon_intro zenon_H20.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H20); [ zenon_intro zenon_H22 | zenon_intro zenon_H21 ].
% 0.50/0.70  exact (zenon_H22 zenon_H1d).
% 0.50/0.70  exact (zenon_H1e zenon_H21).
% 0.50/0.70  (* end of lemma zenon_L1_ *)
% 0.50/0.70  assert (zenon_L2_ : forall (zenon_TA_bl : zenon_U), (wolf zenon_TA_bl) -> (~(animal zenon_TA_bl)) -> False).
% 0.50/0.70  do 1 intro. intros zenon_H23 zenon_H24.
% 0.50/0.70  generalize (wolf_is_animal zenon_TA_bl). zenon_intro zenon_H26.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H26); [ zenon_intro zenon_H28 | zenon_intro zenon_H27 ].
% 0.50/0.70  exact (zenon_H28 zenon_H23).
% 0.50/0.70  exact (zenon_H24 zenon_H27).
% 0.50/0.70  (* end of lemma zenon_L2_ *)
% 0.50/0.70  assert (zenon_L3_ : forall (zenon_TA_br : zenon_U) (zenon_TA_bl : zenon_U), (wolf zenon_TA_bl) -> (forall Y : zenon_U, ((plant Y)->(eats zenon_TA_bl Y))) -> (grain zenon_TA_br) -> False).
% 0.50/0.70  do 2 intro. intros zenon_H23 zenon_H29 zenon_H2a.
% 0.50/0.70  generalize (pel47_11a zenon_TA_bl). zenon_intro zenon_H2c.
% 0.50/0.70  generalize (grain_is_plant zenon_TA_br). zenon_intro zenon_H2d.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H2d); [ zenon_intro zenon_H2f | zenon_intro zenon_H2e ].
% 0.50/0.70  exact (zenon_H2f zenon_H2a).
% 0.50/0.70  generalize (zenon_H29 zenon_TA_br). zenon_intro zenon_H30.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H30); [ zenon_intro zenon_H32 | zenon_intro zenon_H31 ].
% 0.50/0.70  exact (zenon_H32 zenon_H2e).
% 0.50/0.70  generalize (zenon_H2c zenon_TA_br). zenon_intro zenon_H33.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H33); [ zenon_intro zenon_H35 | zenon_intro zenon_H34 ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H35); [ zenon_intro zenon_H28 | zenon_intro zenon_H2f ].
% 0.50/0.70  exact (zenon_H28 zenon_H23).
% 0.50/0.70  exact (zenon_H2f zenon_H2a).
% 0.50/0.70  exact (zenon_H34 zenon_H31).
% 0.50/0.70  (* end of lemma zenon_L3_ *)
% 0.50/0.70  assert (zenon_L4_ : forall (zenon_TA_ce : zenon_U), (fox zenon_TA_ce) -> (~(animal zenon_TA_ce)) -> False).
% 0.50/0.70  do 1 intro. intros zenon_H36 zenon_H37.
% 0.50/0.70  generalize (fox_is_animal zenon_TA_ce). zenon_intro zenon_H39.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H39); [ zenon_intro zenon_H3b | zenon_intro zenon_H3a ].
% 0.50/0.70  exact (zenon_H3b zenon_H36).
% 0.50/0.70  exact (zenon_H37 zenon_H3a).
% 0.50/0.70  (* end of lemma zenon_L4_ *)
% 0.50/0.70  assert (zenon_L5_ : forall (zenon_TA_ce : zenon_U) (zenon_TA_bl : zenon_U), (forall Y : zenon_U, (((wolf zenon_TA_bl)/\(fox Y))->(~(eats zenon_TA_bl Y)))) -> (wolf zenon_TA_bl) -> (fox zenon_TA_ce) -> (eats zenon_TA_bl zenon_TA_ce) -> False).
% 0.50/0.70  do 2 intro. intros zenon_H3c zenon_H23 zenon_H36 zenon_H3d.
% 0.50/0.70  generalize (zenon_H3c zenon_TA_ce). zenon_intro zenon_H3e.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H3e); [ zenon_intro zenon_H40 | zenon_intro zenon_H3f ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H40); [ zenon_intro zenon_H28 | zenon_intro zenon_H3b ].
% 0.50/0.70  exact (zenon_H28 zenon_H23).
% 0.50/0.70  exact (zenon_H3b zenon_H36).
% 0.50/0.70  exact (zenon_H3f zenon_H3d).
% 0.50/0.70  (* end of lemma zenon_L5_ *)
% 0.50/0.70  assert (zenon_L6_ : forall (zenon_TA_cr : zenon_U) (zenon_TA_ce : zenon_U) (zenon_TA_bl : zenon_U), (forall Y1 : zenon_U, ((animal Y1)->(((much_smaller Y1 zenon_TA_bl)/\(exists Z : zenon_U, ((plant Z)/\(eats Y1 Z))))->(eats zenon_TA_bl Y1)))) -> (animal zenon_TA_ce) -> (much_smaller zenon_TA_ce zenon_TA_bl) -> (plant zenon_TA_cr) -> (eats zenon_TA_ce zenon_TA_cr) -> (forall Y : zenon_U, (((wolf zenon_TA_bl)/\(fox Y))->(~(eats zenon_TA_bl Y)))) -> (wolf zenon_TA_bl) -> (fox zenon_TA_ce) -> False).
% 0.50/0.70  do 3 intro. intros zenon_H41 zenon_H3a zenon_H42 zenon_H43 zenon_H44 zenon_H3c zenon_H23 zenon_H36.
% 0.50/0.70  generalize (zenon_H41 zenon_TA_ce). zenon_intro zenon_H46.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H46); [ zenon_intro zenon_H37 | zenon_intro zenon_H47 ].
% 0.50/0.70  exact (zenon_H37 zenon_H3a).
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H47); [ zenon_intro zenon_H48 | zenon_intro zenon_H3d ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H48); [ zenon_intro zenon_H4a | zenon_intro zenon_H49 ].
% 0.50/0.70  exact (zenon_H4a zenon_H42).
% 0.50/0.70  apply zenon_H49. exists zenon_TA_cr. apply NNPP. zenon_intro zenon_H4b.
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H4b); [ zenon_intro zenon_H4d | zenon_intro zenon_H4c ].
% 0.50/0.70  exact (zenon_H4d zenon_H43).
% 0.50/0.70  exact (zenon_H4c zenon_H44).
% 0.50/0.70  apply (zenon_L5_ zenon_TA_ce zenon_TA_bl); trivial.
% 0.50/0.70  (* end of lemma zenon_L6_ *)
% 0.50/0.70  assert (zenon_L7_ : forall (zenon_TA_br : zenon_U), (grain zenon_TA_br) -> (~(plant zenon_TA_br)) -> False).
% 0.50/0.70  do 1 intro. intros zenon_H2a zenon_H32.
% 0.50/0.70  generalize (grain_is_plant zenon_TA_br). zenon_intro zenon_H2d.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H2d); [ zenon_intro zenon_H2f | zenon_intro zenon_H2e ].
% 0.50/0.70  exact (zenon_H2f zenon_H2a).
% 0.50/0.70  exact (zenon_H32 zenon_H2e).
% 0.50/0.70  (* end of lemma zenon_L7_ *)
% 0.50/0.70  assert (zenon_L8_ : forall (zenon_TA_br : zenon_U) (zenon_TA_bf : zenon_U) (zenon_TA_ce : zenon_U), (~(exists Y : zenon_U, (exists Z : zenon_U, ((animal zenon_TA_ce)/\((animal Y)/\((grain Z)/\((eats Y Z)/\(eats zenon_TA_ce Y)))))))) -> (eats zenon_TA_ce zenon_TA_bf) -> (eats zenon_TA_bf zenon_TA_br) -> (grain zenon_TA_br) -> (animal zenon_TA_bf) -> (fox zenon_TA_ce) -> False).
% 0.50/0.70  do 3 intro. intros zenon_H4e zenon_H4f zenon_H50 zenon_H2a zenon_H21 zenon_H36.
% 0.50/0.70  apply zenon_H4e. exists zenon_TA_bf. apply NNPP. zenon_intro zenon_H51.
% 0.50/0.70  apply zenon_H51. exists zenon_TA_br. apply NNPP. zenon_intro zenon_H52.
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H52); [ zenon_intro zenon_H37 | zenon_intro zenon_H53 ].
% 0.50/0.70  apply (zenon_L4_ zenon_TA_ce); trivial.
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H53); [ zenon_intro zenon_H1e | zenon_intro zenon_H54 ].
% 0.50/0.70  exact (zenon_H1e zenon_H21).
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H54); [ zenon_intro zenon_H2f | zenon_intro zenon_H55 ].
% 0.50/0.70  exact (zenon_H2f zenon_H2a).
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H55); [ zenon_intro zenon_H57 | zenon_intro zenon_H56 ].
% 0.50/0.70  exact (zenon_H57 zenon_H50).
% 0.50/0.70  exact (zenon_H56 zenon_H4f).
% 0.50/0.70  (* end of lemma zenon_L8_ *)
% 0.50/0.70  assert (zenon_L9_ : forall (zenon_TA_br : zenon_U) (zenon_TA_cr : zenon_U) (zenon_TA_bf : zenon_U) (zenon_TA_ce : zenon_U), (forall Y1 : zenon_U, ((animal Y1)->(((much_smaller Y1 zenon_TA_ce)/\(exists Z : zenon_U, ((plant Z)/\(eats Y1 Z))))->(eats zenon_TA_ce Y1)))) -> (animal zenon_TA_bf) -> (much_smaller zenon_TA_bf zenon_TA_ce) -> (plant zenon_TA_cr) -> (eats zenon_TA_bf zenon_TA_cr) -> (~(exists Y : zenon_U, (exists Z : zenon_U, ((animal zenon_TA_ce)/\((animal Y)/\((grain Z)/\((eats Y Z)/\(eats zenon_TA_ce Y)))))))) -> (eats zenon_TA_bf zenon_TA_br) -> (grain zenon_TA_br) -> (fox zenon_TA_ce) -> False).
% 0.50/0.70  do 4 intro. intros zenon_H58 zenon_H21 zenon_H59 zenon_H43 zenon_H5a zenon_H4e zenon_H50 zenon_H2a zenon_H36.
% 0.50/0.70  generalize (zenon_H58 zenon_TA_bf). zenon_intro zenon_H5b.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H5b); [ zenon_intro zenon_H1e | zenon_intro zenon_H5c ].
% 0.50/0.70  exact (zenon_H1e zenon_H21).
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H5c); [ zenon_intro zenon_H5d | zenon_intro zenon_H4f ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H5d); [ zenon_intro zenon_H5f | zenon_intro zenon_H5e ].
% 0.50/0.70  exact (zenon_H5f zenon_H59).
% 0.50/0.70  apply zenon_H5e. exists zenon_TA_cr. apply NNPP. zenon_intro zenon_H60.
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H60); [ zenon_intro zenon_H4d | zenon_intro zenon_H61 ].
% 0.50/0.70  exact (zenon_H4d zenon_H43).
% 0.50/0.70  exact (zenon_H61 zenon_H5a).
% 0.50/0.70  apply (zenon_L8_ zenon_TA_br zenon_TA_bf zenon_TA_ce); trivial.
% 0.50/0.70  (* end of lemma zenon_L9_ *)
% 0.50/0.70  assert (zenon_L10_ : forall (zenon_TA_dw : zenon_U), (snail zenon_TA_dw) -> (~(animal zenon_TA_dw)) -> False).
% 0.50/0.70  do 1 intro. intros zenon_H62 zenon_H63.
% 0.50/0.70  generalize (snail_is_animal zenon_TA_dw). zenon_intro zenon_H65.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H65); [ zenon_intro zenon_H67 | zenon_intro zenon_H66 ].
% 0.50/0.70  exact (zenon_H67 zenon_H62).
% 0.50/0.70  exact (zenon_H63 zenon_H66).
% 0.50/0.70  (* end of lemma zenon_L10_ *)
% 0.50/0.70  assert (zenon_L11_ : forall (zenon_TA_dw : zenon_U) (zenon_TA_bf : zenon_U), (forall X : zenon_U, (((bird zenon_TA_bf)/\(snail X))->(much_smaller X zenon_TA_bf))) -> (bird zenon_TA_bf) -> (snail zenon_TA_dw) -> (~(much_smaller zenon_TA_dw zenon_TA_bf)) -> False).
% 0.50/0.70  do 2 intro. intros zenon_H68 zenon_H1d zenon_H62 zenon_H69.
% 0.50/0.70  generalize (zenon_H68 zenon_TA_dw). zenon_intro zenon_H6a.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H6a); [ zenon_intro zenon_H6c | zenon_intro zenon_H6b ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H6c); [ zenon_intro zenon_H22 | zenon_intro zenon_H67 ].
% 0.50/0.70  exact (zenon_H22 zenon_H1d).
% 0.50/0.70  exact (zenon_H67 zenon_H62).
% 0.50/0.70  exact (zenon_H69 zenon_H6b).
% 0.50/0.70  (* end of lemma zenon_L11_ *)
% 0.50/0.70  assert (zenon_L12_ : forall (zenon_TA_dw : zenon_U) (zenon_TA_bf : zenon_U), (forall Y : zenon_U, (((bird zenon_TA_bf)/\(snail Y))->(~(eats zenon_TA_bf Y)))) -> (bird zenon_TA_bf) -> (snail zenon_TA_dw) -> (eats zenon_TA_bf zenon_TA_dw) -> False).
% 0.50/0.70  do 2 intro. intros zenon_H6d zenon_H1d zenon_H62 zenon_H6e.
% 0.50/0.70  generalize (zenon_H6d zenon_TA_dw). zenon_intro zenon_H6f.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H6f); [ zenon_intro zenon_H6c | zenon_intro zenon_H70 ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H6c); [ zenon_intro zenon_H22 | zenon_intro zenon_H67 ].
% 0.50/0.70  exact (zenon_H22 zenon_H1d).
% 0.50/0.70  exact (zenon_H67 zenon_H62).
% 0.50/0.70  exact (zenon_H70 zenon_H6e).
% 0.50/0.70  (* end of lemma zenon_L12_ *)
% 0.50/0.70  apply NNPP. intro zenon_G.
% 0.50/0.70  elim wolf_type. zenon_intro zenon_TA_bl. zenon_intro zenon_H23.
% 0.50/0.70  elim fox_type. zenon_intro zenon_TA_ce. zenon_intro zenon_H36.
% 0.50/0.70  elim bird_type. zenon_intro zenon_TA_bf. zenon_intro zenon_H1d.
% 0.50/0.70  elim snail_type. zenon_intro zenon_TA_dw. zenon_intro zenon_H62.
% 0.50/0.70  elim plant_type. zenon_intro zenon_TA_cr. zenon_intro zenon_H43.
% 0.50/0.70  elim grain_type. zenon_intro zenon_TA_br. zenon_intro zenon_H2a.
% 0.50/0.70  generalize (pel47_8 zenon_TA_bf). zenon_intro zenon_H68.
% 0.50/0.70  generalize (pel47_9 zenon_TA_bf). zenon_intro zenon_H71.
% 0.50/0.70  generalize (pel47_10 zenon_TA_ce). zenon_intro zenon_H72.
% 0.50/0.70  generalize (pel47_7 zenon_TA_bf). zenon_intro zenon_H73.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H73); [ zenon_intro zenon_H1e | zenon_intro zenon_H74 ].
% 0.50/0.70  apply (zenon_L1_ zenon_TA_bf); trivial.
% 0.50/0.70  apply (zenon_or_s _ _ zenon_H74); [ zenon_intro zenon_H76 | zenon_intro zenon_H75 ].
% 0.50/0.70  generalize (zenon_H71 zenon_TA_ce). zenon_intro zenon_H77.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H77); [ zenon_intro zenon_H78 | zenon_intro zenon_H59 ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H78); [ zenon_intro zenon_H22 | zenon_intro zenon_H3b ].
% 0.50/0.70  exact (zenon_H22 zenon_H1d).
% 0.50/0.70  exact (zenon_H3b zenon_H36).
% 0.50/0.70  generalize (zenon_H72 zenon_TA_bl). zenon_intro zenon_H79.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H79); [ zenon_intro zenon_H7a | zenon_intro zenon_H42 ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H7a); [ zenon_intro zenon_H3b | zenon_intro zenon_H28 ].
% 0.50/0.70  exact (zenon_H3b zenon_H36).
% 0.50/0.70  exact (zenon_H28 zenon_H23).
% 0.50/0.70  generalize (zenon_H76 zenon_TA_cr). zenon_intro zenon_H7b.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H7b); [ zenon_intro zenon_H4d | zenon_intro zenon_H5a ].
% 0.50/0.70  exact (zenon_H4d zenon_H43).
% 0.50/0.70  generalize (pel47_7 zenon_TA_bl). zenon_intro zenon_H7c.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H7c); [ zenon_intro zenon_H24 | zenon_intro zenon_H7d ].
% 0.50/0.70  apply (zenon_L2_ zenon_TA_bl); trivial.
% 0.50/0.70  apply (zenon_or_s _ _ zenon_H7d); [ zenon_intro zenon_H29 | zenon_intro zenon_H41 ].
% 0.50/0.70  apply (zenon_L3_ zenon_TA_br zenon_TA_bl); trivial.
% 0.50/0.70  generalize (pel47_7 zenon_TA_ce). zenon_intro zenon_H7e.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H7e); [ zenon_intro zenon_H37 | zenon_intro zenon_H7f ].
% 0.50/0.70  apply (zenon_L4_ zenon_TA_ce); trivial.
% 0.50/0.70  apply (zenon_or_s _ _ zenon_H7f); [ zenon_intro zenon_H80 | zenon_intro zenon_H58 ].
% 0.50/0.70  generalize (pel47_11 zenon_TA_bl). zenon_intro zenon_H3c.
% 0.50/0.70  generalize (zenon_H80 zenon_TA_cr). zenon_intro zenon_H81.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H81); [ zenon_intro zenon_H4d | zenon_intro zenon_H44 ].
% 0.50/0.70  exact (zenon_H4d zenon_H43).
% 0.50/0.70  generalize (fox_is_animal zenon_TA_ce). zenon_intro zenon_H39.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H39); [ zenon_intro zenon_H3b | zenon_intro zenon_H3a ].
% 0.50/0.70  exact (zenon_H3b zenon_H36).
% 0.50/0.70  apply (zenon_L6_ zenon_TA_cr zenon_TA_ce zenon_TA_bl); trivial.
% 0.50/0.70  apply zenon_G. exists zenon_TA_ce. apply NNPP. zenon_intro zenon_H4e.
% 0.50/0.70  generalize (zenon_H76 zenon_TA_br). zenon_intro zenon_H82.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H82); [ zenon_intro zenon_H32 | zenon_intro zenon_H50 ].
% 0.50/0.70  apply (zenon_L7_ zenon_TA_br); trivial.
% 0.50/0.70  generalize (bird_is_animal zenon_TA_bf). zenon_intro zenon_H20.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H20); [ zenon_intro zenon_H22 | zenon_intro zenon_H21 ].
% 0.50/0.70  exact (zenon_H22 zenon_H1d).
% 0.50/0.70  apply (zenon_L9_ zenon_TA_br zenon_TA_cr zenon_TA_bf zenon_TA_ce); trivial.
% 0.50/0.70  generalize (pel47_13 zenon_TA_bf). zenon_intro zenon_H6d.
% 0.50/0.70  generalize (zenon_H75 zenon_TA_dw). zenon_intro zenon_H83.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H83); [ zenon_intro zenon_H63 | zenon_intro zenon_H84 ].
% 0.50/0.70  apply (zenon_L10_ zenon_TA_dw); trivial.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H84); [ zenon_intro zenon_H85 | zenon_intro zenon_H6e ].
% 0.50/0.70  apply (zenon_notand_s _ _ zenon_H85); [ zenon_intro zenon_H69 | zenon_intro zenon_H86 ].
% 0.50/0.70  apply (zenon_L11_ zenon_TA_dw zenon_TA_bf); trivial.
% 0.50/0.70  generalize (pel47_14a zenon_TA_dw). zenon_intro zenon_H87.
% 0.50/0.70  apply (zenon_imply_s _ _ zenon_H87); [ zenon_intro zenon_H67 | zenon_intro zenon_H88 ].
% 0.50/0.70  exact (zenon_H67 zenon_H62).
% 0.50/0.70  exact (zenon_H86 zenon_H88).
% 0.50/0.70  apply (zenon_L12_ zenon_TA_dw zenon_TA_bf); trivial.
% 0.50/0.70  Qed.
% 0.50/0.70  % SZS output end Proof
% 0.50/0.70  (* END-PROOF *)
% 0.50/0.70  nodes searched: 17803
% 0.50/0.70  max branch formulas: 1821
% 0.50/0.70  proof nodes created: 1563
% 0.50/0.70  formulas created: 38905
% 0.50/0.70  
%------------------------------------------------------------------------------