TSTP Solution File: PUZ005+1 by Zenon---0.7.1

View Problem - Process Solution

%------------------------------------------------------------------------------
% File     : Zenon---0.7.1
% Problem  : PUZ005+1 : TPTP v8.1.0. Released v2.2.0.
% Transfm  : none
% Format   : tptp:raw
% Command  : run_zenon %s %d

% Computer : n026.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:35 EDT 2022

% Result   : Theorem 151.99s 152.22s
% Output   : Proof 151.99s
% Verified : 
% SZS Type : -

% Comments : 
%------------------------------------------------------------------------------
%----WARNING: Could not form TPTP format derivation
%------------------------------------------------------------------------------
%----ORIGINAL SYSTEM OUTPUT
% 0.03/0.12  % Problem  : PUZ005+1 : TPTP v8.1.0. Released v2.2.0.
% 0.03/0.13  % Command  : run_zenon %s %d
% 0.13/0.34  % Computer : n026.cluster.edu
% 0.13/0.34  % Model    : x86_64 x86_64
% 0.13/0.34  % CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 @ 2.10GHz
% 0.13/0.34  % Memory   : 8042.1875MB
% 0.13/0.34  % OS       : Linux 3.10.0-693.el7.x86_64
% 0.13/0.34  % CPULimit : 300
% 0.13/0.35  % WCLimit  : 600
% 0.13/0.35  % DateTime : Sat May 28 22:16:24 EDT 2022
% 0.13/0.35  % CPUTime  : 
% 151.99/152.22  (* PROOF-FOUND *)
% 151.99/152.22  % SZS status Theorem
% 151.99/152.22  (* BEGIN-PROOF *)
% 151.99/152.22  % SZS output start Proof
% 151.99/152.22  Theorem prove_there_are_close_lying_days : (exists X : zenon_U, ((day X)/\((lies_on_one_of (a_lion) X (yesterday X))/\(lies_on_one_of (a_unicorn) X (yesterday X))))).
% 151.99/152.22  Proof.
% 151.99/152.22  assert (zenon_L1_ : (~(day (a_thursday))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H2e.
% 151.99/152.22  generalize (thursday_is_a_day (a_thursday)). zenon_intro zenon_H2f.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H2f); [ zenon_intro zenon_H31 | zenon_intro zenon_H30 ].
% 151.99/152.22  exact (zenon_H31 thursday).
% 151.99/152.22  exact (zenon_H2e zenon_H30).
% 151.99/152.22  (* end of lemma zenon_L1_ *)
% 151.99/152.22  assert (zenon_L2_ : (~(friday (yesterday (a_saturday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H32.
% 151.99/152.22  generalize (saturday_follows_friday (a_saturday)). zenon_intro zenon_H33.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H33); [ zenon_intro zenon_H35 | zenon_intro zenon_H34 ].
% 151.99/152.22  exact (zenon_H35 saturday).
% 151.99/152.22  exact (zenon_H32 zenon_H34).
% 151.99/152.22  (* end of lemma zenon_L2_ *)
% 151.99/152.22  assert (zenon_L3_ : (~(day (yesterday (a_saturday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H36.
% 151.99/152.22  generalize (friday_is_a_day (yesterday (a_saturday))). zenon_intro zenon_H37.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H37); [ zenon_intro zenon_H32 | zenon_intro zenon_H38 ].
% 151.99/152.22  apply (zenon_L2_); trivial.
% 151.99/152.22  exact (zenon_H36 zenon_H38).
% 151.99/152.22  (* end of lemma zenon_L3_ *)
% 151.99/152.22  assert (zenon_L4_ : (~(wednesday (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H39.
% 151.99/152.22  generalize (thursday_follows_wednesday (a_thursday)). zenon_intro zenon_H3a.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H3a); [ zenon_intro zenon_H31 | zenon_intro zenon_H3b ].
% 151.99/152.22  exact (zenon_H31 thursday).
% 151.99/152.22  exact (zenon_H39 zenon_H3b).
% 151.99/152.22  (* end of lemma zenon_L4_ *)
% 151.99/152.22  assert (zenon_L5_ : (~(day (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H3c.
% 151.99/152.22  generalize (wednesday_is_a_day (yesterday (a_thursday))). zenon_intro zenon_H3d.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H3d); [ zenon_intro zenon_H39 | zenon_intro zenon_H3e ].
% 151.99/152.22  apply (zenon_L4_); trivial.
% 151.99/152.22  exact (zenon_H3c zenon_H3e).
% 151.99/152.22  (* end of lemma zenon_L5_ *)
% 151.99/152.22  assert (zenon_L6_ : (wednesday (yesterday (a_thursday))) -> (~(lion_lies (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H3b zenon_H3f.
% 151.99/152.22  generalize (lion_lies_wednesday (yesterday (a_thursday))). zenon_intro zenon_H40.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H40); [ zenon_intro zenon_H39 | zenon_intro zenon_H41 ].
% 151.99/152.22  exact (zenon_H39 zenon_H3b).
% 151.99/152.22  exact (zenon_H3f zenon_H41).
% 151.99/152.22  (* end of lemma zenon_L6_ *)
% 151.99/152.22  assert (zenon_L7_ : (forall Y : zenon_U, ((day Y)->(((~(lion_lies (a_thursday)))/\(~(lies_on_one_of (a_lion) (a_thursday) Y)))->(~(lion_lies Y))))) -> (~(lion_lies (a_thursday))) -> (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> (lion_lies (yesterday (a_thursday))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H42 zenon_H43 zenon_H44 zenon_H41.
% 151.99/152.22  generalize (zenon_H42 (yesterday (a_thursday))). zenon_intro zenon_H45.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H45); [ zenon_intro zenon_H3c | zenon_intro zenon_H46 ].
% 151.99/152.22  apply (zenon_L5_); trivial.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H46); [ zenon_intro zenon_H47 | zenon_intro zenon_H3f ].
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H47); [ zenon_intro zenon_H49 | zenon_intro zenon_H48 ].
% 151.99/152.22  exact (zenon_H49 zenon_H43).
% 151.99/152.22  exact (zenon_H48 zenon_H44).
% 151.99/152.22  exact (zenon_H3f zenon_H41).
% 151.99/152.22  (* end of lemma zenon_L7_ *)
% 151.99/152.22  assert (zenon_L8_ : (forall Y : zenon_U, ((day Y)->(((~(lion_lies (yesterday (a_saturday))))/\(lies_on_one_of (a_lion) (yesterday (a_saturday)) Y))->(lion_lies Y)))) -> (~(lion_lies (yesterday (a_saturday)))) -> (forall Y : zenon_U, ((day Y)->(((~(lion_lies (yesterday (a_saturday))))/\(~(lies_on_one_of (a_lion) (yesterday (a_saturday)) Y)))->(~(lion_lies Y))))) -> (forall Y : zenon_U, ((day Y)->(((~(lion_lies (a_thursday)))/\(~(lies_on_one_of (a_lion) (a_thursday) Y)))->(~(lion_lies Y))))) -> (~(lion_lies (a_thursday))) -> (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H4a zenon_H4b zenon_H4c zenon_H42 zenon_H43 zenon_H44.
% 151.99/152.22  generalize (zenon_H4a (yesterday (a_thursday))). zenon_intro zenon_H4d.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H4d); [ zenon_intro zenon_H3c | zenon_intro zenon_H4e ].
% 151.99/152.22  apply (zenon_L5_); trivial.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H4e); [ zenon_intro zenon_H4f | zenon_intro zenon_H41 ].
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H4f); [ zenon_intro zenon_H51 | zenon_intro zenon_H50 ].
% 151.99/152.22  exact (zenon_H51 zenon_H4b).
% 151.99/152.22  generalize (thursday_follows_wednesday (a_thursday)). zenon_intro zenon_H3a.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H3a); [ zenon_intro zenon_H31 | zenon_intro zenon_H3b ].
% 151.99/152.22  exact (zenon_H31 thursday).
% 151.99/152.22  generalize (zenon_H4c (yesterday (a_thursday))). zenon_intro zenon_H52.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H52); [ zenon_intro zenon_H3c | zenon_intro zenon_H53 ].
% 151.99/152.22  apply (zenon_L5_); trivial.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H53); [ zenon_intro zenon_H54 | zenon_intro zenon_H3f ].
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H54); [ zenon_intro zenon_H51 | zenon_intro zenon_H55 ].
% 151.99/152.22  exact (zenon_H51 zenon_H4b).
% 151.99/152.22  exact (zenon_H55 zenon_H50).
% 151.99/152.22  apply (zenon_L6_); trivial.
% 151.99/152.22  apply (zenon_L7_); trivial.
% 151.99/152.22  (* end of lemma zenon_L8_ *)
% 151.99/152.22  assert (zenon_L9_ : (friday (yesterday (a_saturday))) -> (lion_lies (yesterday (a_saturday))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H34 zenon_H56.
% 151.99/152.22  generalize (lion_does_not_lie_friday (yesterday (a_saturday))). zenon_intro zenon_H57.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H57); [ zenon_intro zenon_H32 | zenon_intro zenon_H4b ].
% 151.99/152.22  exact (zenon_H32 zenon_H34).
% 151.99/152.22  exact (zenon_H4b zenon_H56).
% 151.99/152.22  (* end of lemma zenon_L9_ *)
% 151.99/152.22  assert (zenon_L10_ : (day (yesterday (a_saturday))) -> (~(lion_lies (yesterday (a_saturday)))) -> (forall Y : zenon_U, ((day Y)->(((~(lion_lies (a_thursday)))/\(~(lies_on_one_of (a_lion) (a_thursday) Y)))->(~(lion_lies Y))))) -> (~(lion_lies (a_thursday))) -> (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H38 zenon_H4b zenon_H42 zenon_H43 zenon_H44.
% 151.99/152.22  generalize (lion_lies_on_neither (yesterday (a_saturday))). zenon_intro zenon_H58.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H58); [ zenon_intro zenon_H36 | zenon_intro zenon_H4c ].
% 151.99/152.22  exact (zenon_H36 zenon_H38).
% 151.99/152.22  generalize (lion_lies_on_other_day (yesterday (a_saturday))). zenon_intro zenon_H59.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H59); [ zenon_intro zenon_H36 | zenon_intro zenon_H4a ].
% 151.99/152.22  exact (zenon_H36 zenon_H38).
% 151.99/152.22  apply (zenon_L8_); trivial.
% 151.99/152.22  (* end of lemma zenon_L10_ *)
% 151.99/152.22  assert (zenon_L11_ : (forall Y : zenon_U, ((day Y)->(((~(lion_lies (a_thursday)))/\(~(lies_on_one_of (a_lion) (a_thursday) Y)))->(~(lion_lies Y))))) -> (~(lion_lies (a_thursday))) -> (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> (day (a_saturday)) -> (~(lion_lies (a_saturday))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H42 zenon_H43 zenon_H44 zenon_H5a zenon_H5b.
% 151.99/152.22  generalize (lion_lies_on_a_day (yesterday (a_saturday))). zenon_intro zenon_H5c.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H5c); [ zenon_intro zenon_H4b | zenon_intro zenon_H38 ].
% 151.99/152.22  generalize (lion_lies_on_other_day (yesterday (a_saturday))). zenon_intro zenon_H59.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H59); [ zenon_intro zenon_H36 | zenon_intro zenon_H4a ].
% 151.99/152.22  apply (zenon_L3_); trivial.
% 151.99/152.22  generalize (lion_lies_on_neither (yesterday (a_saturday))). zenon_intro zenon_H58.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H58); [ zenon_intro zenon_H36 | zenon_intro zenon_H4c ].
% 151.99/152.22  apply (zenon_L3_); trivial.
% 151.99/152.22  apply (zenon_L8_); trivial.
% 151.99/152.22  generalize (saturday_follows_friday (a_saturday)). zenon_intro zenon_H33.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H33); [ zenon_intro zenon_H35 | zenon_intro zenon_H34 ].
% 151.99/152.22  exact (zenon_H35 saturday).
% 151.99/152.22  generalize (lion_lies_on_other_day (yesterday (a_saturday))). zenon_intro zenon_H59.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H59); [ zenon_intro zenon_H36 | zenon_intro zenon_H4a ].
% 151.99/152.22  exact (zenon_H36 zenon_H38).
% 151.99/152.22  generalize (zenon_H4a (a_saturday)). zenon_intro zenon_H5d.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H5d); [ zenon_intro zenon_H5f | zenon_intro zenon_H5e ].
% 151.99/152.22  exact (zenon_H5f zenon_H5a).
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H5e); [ zenon_intro zenon_H61 | zenon_intro zenon_H60 ].
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H61); [ zenon_intro zenon_H51 | zenon_intro zenon_H62 ].
% 151.99/152.22  apply zenon_H51. zenon_intro zenon_H56.
% 151.99/152.22  apply (zenon_L9_); trivial.
% 151.99/152.22  generalize (lion_lies_on_both (yesterday (a_saturday))). zenon_intro zenon_H63.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H63); [ zenon_intro zenon_H36 | zenon_intro zenon_H64 ].
% 151.99/152.22  exact (zenon_H36 zenon_H38).
% 151.99/152.22  generalize (zenon_H64 (a_saturday)). zenon_intro zenon_H65.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H65); [ zenon_intro zenon_H5f | zenon_intro zenon_H66 ].
% 151.99/152.22  exact (zenon_H5f zenon_H5a).
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H66); [ zenon_intro zenon_H67 | zenon_intro zenon_H60 ].
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H67); [ zenon_intro zenon_H4b | zenon_intro zenon_H68 ].
% 151.99/152.22  apply (zenon_L10_); trivial.
% 151.99/152.22  exact (zenon_H68 zenon_H62).
% 151.99/152.22  exact (zenon_H5b zenon_H60).
% 151.99/152.22  exact (zenon_H5b zenon_H60).
% 151.99/152.22  (* end of lemma zenon_L11_ *)
% 151.99/152.22  assert (zenon_L12_ : ((day (a_thursday))->(forall Y : zenon_U, ((day Y)->(((~(lion_lies (a_thursday)))/\(~(lies_on_one_of (a_lion) (a_thursday) Y)))->(~(lion_lies Y)))))) -> (~(lion_lies (a_saturday))) -> (day (a_saturday)) -> (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> (~(lion_lies (a_thursday))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H69 zenon_H5b zenon_H5a zenon_H44 zenon_H43.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H69); [ zenon_intro zenon_H2e | zenon_intro zenon_H42 ].
% 151.99/152.22  apply (zenon_L1_); trivial.
% 151.99/152.22  apply (zenon_L11_); trivial.
% 151.99/152.22  (* end of lemma zenon_L12_ *)
% 151.99/152.22  assert (zenon_L13_ : (day (a_thursday)) -> (~(lion_lies (a_thursday))) -> (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> (day (a_saturday)) -> (~(lion_lies (a_saturday))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H30 zenon_H43 zenon_H44 zenon_H5a zenon_H5b.
% 151.99/152.22  generalize (lion_lies_on_neither (a_thursday)). zenon_intro zenon_H69.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H69); [ zenon_intro zenon_H2e | zenon_intro zenon_H42 ].
% 151.99/152.22  exact (zenon_H2e zenon_H30).
% 151.99/152.22  apply (zenon_L11_); trivial.
% 151.99/152.22  (* end of lemma zenon_L13_ *)
% 151.99/152.22  assert (zenon_L14_ : (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> (day (a_saturday)) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H44 zenon_H5a.
% 151.99/152.22  generalize (lion_lies_on_a_day (a_thursday)). zenon_intro zenon_H6a.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H6a); [ zenon_intro zenon_H43 | zenon_intro zenon_H30 ].
% 151.99/152.22  generalize (lion_does_not_lie_saturday (a_saturday)). zenon_intro zenon_H6b.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H6b); [ zenon_intro zenon_H35 | zenon_intro zenon_H5b ].
% 151.99/152.22  exact (zenon_H35 saturday).
% 151.99/152.22  generalize (lion_lies_on_neither (a_thursday)). zenon_intro zenon_H69.
% 151.99/152.22  apply (zenon_L12_); trivial.
% 151.99/152.22  generalize (lion_does_not_lie_saturday (a_saturday)). zenon_intro zenon_H6b.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H6b); [ zenon_intro zenon_H35 | zenon_intro zenon_H5b ].
% 151.99/152.22  exact (zenon_H35 saturday).
% 151.99/152.22  generalize (lion_does_not_lie_thursday (a_thursday)). zenon_intro zenon_H6c.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H6c); [ zenon_intro zenon_H31 | zenon_intro zenon_H43 ].
% 151.99/152.22  exact (zenon_H31 thursday).
% 151.99/152.22  apply (zenon_L13_); trivial.
% 151.99/152.22  (* end of lemma zenon_L14_ *)
% 151.99/152.22  assert (zenon_L15_ : (unicorn_lies (a_saturday)) -> (~(lies_on_one_of (a_lion) (a_thursday) (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H6d zenon_H44.
% 151.99/152.22  generalize (unicorn_lies_on_a_day (a_saturday)). zenon_intro zenon_H6e.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H6e); [ zenon_intro zenon_H6f | zenon_intro zenon_H5a ].
% 151.99/152.22  exact (zenon_H6f zenon_H6d).
% 151.99/152.22  apply (zenon_L14_); trivial.
% 151.99/152.22  (* end of lemma zenon_L15_ *)
% 151.99/152.22  assert (zenon_L16_ : (forall Y : zenon_U, ((day Y)->(((unicorn_lies (a_thursday))/\(~(lies_on_one_of (a_unicorn) (a_thursday) Y)))->(unicorn_lies Y)))) -> (unicorn_lies (a_thursday)) -> (~(lies_on_one_of (a_unicorn) (a_thursday) (yesterday (a_thursday)))) -> (~(unicorn_lies (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H70 zenon_H71 zenon_H72 zenon_H73.
% 151.99/152.22  generalize (zenon_H70 (yesterday (a_thursday))). zenon_intro zenon_H74.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H74); [ zenon_intro zenon_H3c | zenon_intro zenon_H75 ].
% 151.99/152.22  apply (zenon_L5_); trivial.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H75); [ zenon_intro zenon_H77 | zenon_intro zenon_H76 ].
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H77); [ zenon_intro zenon_H79 | zenon_intro zenon_H78 ].
% 151.99/152.22  exact (zenon_H79 zenon_H71).
% 151.99/152.22  exact (zenon_H78 zenon_H72).
% 151.99/152.22  exact (zenon_H73 zenon_H76).
% 151.99/152.22  (* end of lemma zenon_L16_ *)
% 151.99/152.22  assert (zenon_L17_ : (forall Y : zenon_U, ((day Y)->(((unicorn_lies (a_thursday))/\(~(lies_on_one_of (a_unicorn) (a_thursday) Y)))->(unicorn_lies Y)))) -> (unicorn_lies (a_thursday)) -> (~(lies_on_one_of (a_unicorn) (a_thursday) (yesterday (a_thursday)))) -> False).
% 151.99/152.22  do 0 intro. intros zenon_H70 zenon_H71 zenon_H72.
% 151.99/152.22  generalize (unicorn_does_not_lie_wednesday (yesterday (a_thursday))). zenon_intro zenon_H7a.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H7a); [ zenon_intro zenon_H39 | zenon_intro zenon_H73 ].
% 151.99/152.22  apply (zenon_L4_); trivial.
% 151.99/152.22  apply (zenon_L16_); trivial.
% 151.99/152.22  (* end of lemma zenon_L17_ *)
% 151.99/152.22  apply NNPP. intro zenon_G.
% 151.99/152.22  generalize (unicorn_lies_on_both (a_thursday)). zenon_intro zenon_H7b.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H7b); [ zenon_intro zenon_H2e | zenon_intro zenon_H70 ].
% 151.99/152.22  apply (zenon_L1_); trivial.
% 151.99/152.22  apply zenon_G. exists (a_thursday). apply NNPP. zenon_intro zenon_H7c.
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H7c); [ zenon_intro zenon_H2e | zenon_intro zenon_H7d ].
% 151.99/152.22  apply (zenon_L1_); trivial.
% 151.99/152.22  apply (zenon_notand_s _ _ zenon_H7d); [ zenon_intro zenon_H44 | zenon_intro zenon_H72 ].
% 151.99/152.22  generalize (unicorn_lies_saturday (a_saturday)). zenon_intro zenon_H7e.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H7e); [ zenon_intro zenon_H35 | zenon_intro zenon_H6d ].
% 151.99/152.22  exact (zenon_H35 saturday).
% 151.99/152.22  apply (zenon_L15_); trivial.
% 151.99/152.22  generalize (unicorn_lies_thursday (a_thursday)). zenon_intro zenon_H7f.
% 151.99/152.22  apply (zenon_imply_s _ _ zenon_H7f); [ zenon_intro zenon_H31 | zenon_intro zenon_H71 ].
% 151.99/152.22  exact (zenon_H31 thursday).
% 151.99/152.22  apply (zenon_L17_); trivial.
% 151.99/152.22  Qed.
% 151.99/152.22  % SZS output end Proof
% 151.99/152.22  (* END-PROOF *)
% 151.99/152.22  nodes searched: 15459935
% 151.99/152.22  max branch formulas: 40758
% 151.99/152.22  proof nodes created: 86007
% 151.99/152.22  formulas created: 5885856
% 151.99/152.22  
%------------------------------------------------------------------------------