↑ Up

Lash---1.13.THM-Prf.s

View TPTP
Problem
Process solution in
SystemOnTSTP
Download .tgz
%------------------------------------------------------------------------------
% File     : Lash---1.13
% Problem  : SEU680^2 : TPTP v9.2.0. Released v3.7.0.
% Transfm  : none
% Format   : tptp:raw
% Command  : lash -P picomus -M modes -p tstp -t %d %s

% Computer : n028.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  : 300s
% DateTime : Thu Oct  9 02:33:42 PM UTC 2025

% Result   : Theorem 21.27s 21.51s
% Output   : Proof 21.27s
% Verified : 
% SZS Type : ERROR: Analysing output (MakeTreeStats fails)

% Comments : 
%------------------------------------------------------------------------------
thf(ty_emptyset,type,
    emptyset: $i ).

thf(ty_cartprod,type,
    cartprod: $i > $i > $i ).

thf(ty_subset,type,
    subset: $i > $i > $o ).

thf(ty_kpair,type,
    kpair: $i > $i > $i ).

thf(ty_eigen__0,type,
    eigen__0: $i ).

thf(ty_eigen__2,type,
    eigen__2: $i > $i ).

thf(ty_funcSet,type,
    funcSet: $i > $i > $i ).

thf(ty_dpsetconstr,type,
    dpsetconstr: $i > $i > ( $i > $i > $o ) > $i ).

thf(ty_setadjoin,type,
    setadjoin: $i > $i > $i ).

thf(ty_in,type,
    in: $i > $i > $o ).

thf(ty_dsetconstr,type,
    dsetconstr: $i > ( $i > $o ) > $i ).

thf(ty_eigen__1,type,
    eigen__1: $i ).

thf(sP1,plain,
    ( sP1
  <=> ! [X1: $i] :
        ( ( in @ X1 @ eigen__0 )
       => ( in @ ( eigen__2 @ X1 ) @ eigen__1 ) ) ),
    introduced(definition,[new_symbols(definition,[sP1])]) ).

thf(sP2,plain,
    ( sP2
  <=> ! [X1: $i > $i] :
        ( ! [X2: $i] :
            ( ( in @ X2 @ eigen__0 )
           => ( in @ ( X1 @ X2 ) @ eigen__1 ) )
       => ~ ( ( subset
              @ ( dpsetconstr @ eigen__0 @ eigen__1
                @ ^ [X2: $i,X3: $i] :
                    ( ( X1 @ X2 )
                    = X3 ) )
              @ ( cartprod @ eigen__0 @ eigen__1 ) )
           => ~ ! [X2: $i] :
                  ( ( in @ X2 @ eigen__0 )
                 => ~ ! [X3: $i] :
                        ( ( in @ X3
                          @ ( dsetconstr @ eigen__1
                            @ ^ [X4: $i] :
                                ( in @ ( kpair @ X2 @ X4 )
                                @ ( dpsetconstr @ eigen__0 @ eigen__1
                                  @ ^ [X5: $i,X6: $i] :
                                      ( ( X1 @ X5 )
                                      = X6 ) ) ) ) )
                       => ( ( dsetconstr @ eigen__1
                            @ ^ [X4: $i] :
                                ( in @ ( kpair @ X2 @ X4 )
                                @ ( dpsetconstr @ eigen__0 @ eigen__1
                                  @ ^ [X5: $i,X6: $i] :
                                      ( ( X1 @ X5 )
                                      = X6 ) ) ) )
                         != ( setadjoin @ X3 @ emptyset ) ) ) ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP2])]) ).

thf(sP3,plain,
    ( sP3
  <=> ! [X1: $i,X2: $i > $i] :
        ( ! [X3: $i] :
            ( ( in @ X3 @ eigen__0 )
           => ( in @ ( X2 @ X3 ) @ X1 ) )
       => ~ ( ( subset
              @ ( dpsetconstr @ eigen__0 @ X1
                @ ^ [X3: $i,X4: $i] :
                    ( ( X2 @ X3 )
                    = X4 ) )
              @ ( cartprod @ eigen__0 @ X1 ) )
           => ~ ! [X3: $i] :
                  ( ( in @ X3 @ eigen__0 )
                 => ~ ! [X4: $i] :
                        ( ( in @ X4
                          @ ( dsetconstr @ X1
                            @ ^ [X5: $i] :
                                ( in @ ( kpair @ X3 @ X5 )
                                @ ( dpsetconstr @ eigen__0 @ X1
                                  @ ^ [X6: $i,X7: $i] :
                                      ( ( X2 @ X6 )
                                      = X7 ) ) ) ) )
                       => ( ( dsetconstr @ X1
                            @ ^ [X5: $i] :
                                ( in @ ( kpair @ X3 @ X5 )
                                @ ( dpsetconstr @ eigen__0 @ X1
                                  @ ^ [X6: $i,X7: $i] :
                                      ( ( X2 @ X6 )
                                      = X7 ) ) ) )
                         != ( setadjoin @ X4 @ emptyset ) ) ) ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP3])]) ).

thf(sP4,plain,
    ( sP4
  <=> ( ~ ( ( subset
            @ ( dpsetconstr @ eigen__0 @ eigen__1
              @ ^ [X1: $i,X2: $i] :
                  ( ( eigen__2 @ X1 )
                  = X2 ) )
            @ ( cartprod @ eigen__0 @ eigen__1 ) )
         => ~ ! [X1: $i] :
                ( ( in @ X1 @ eigen__0 )
               => ~ ! [X2: $i] :
                      ( ( in @ X2
                        @ ( dsetconstr @ eigen__1
                          @ ^ [X3: $i] :
                              ( in @ ( kpair @ X1 @ X3 )
                              @ ( dpsetconstr @ eigen__0 @ eigen__1
                                @ ^ [X4: $i,X5: $i] :
                                    ( ( eigen__2 @ X4 )
                                    = X5 ) ) ) ) )
                     => ( ( dsetconstr @ eigen__1
                          @ ^ [X3: $i] :
                              ( in @ ( kpair @ X1 @ X3 )
                              @ ( dpsetconstr @ eigen__0 @ eigen__1
                                @ ^ [X4: $i,X5: $i] :
                                    ( ( eigen__2 @ X4 )
                                    = X5 ) ) ) )
                       != ( setadjoin @ X2 @ emptyset ) ) ) ) )
     => ( in
        @ ( dpsetconstr @ eigen__0 @ eigen__1
          @ ^ [X1: $i,X2: $i] :
              ( ( eigen__2 @ X1 )
              = X2 ) )
        @ ( funcSet @ eigen__0 @ eigen__1 ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP4])]) ).

thf(sP5,plain,
    ( sP5
  <=> ( sP1
     => ~ ( ( subset
            @ ( dpsetconstr @ eigen__0 @ eigen__1
              @ ^ [X1: $i,X2: $i] :
                  ( ( eigen__2 @ X1 )
                  = X2 ) )
            @ ( cartprod @ eigen__0 @ eigen__1 ) )
         => ~ ! [X1: $i] :
                ( ( in @ X1 @ eigen__0 )
               => ~ ! [X2: $i] :
                      ( ( in @ X2
                        @ ( dsetconstr @ eigen__1
                          @ ^ [X3: $i] :
                              ( in @ ( kpair @ X1 @ X3 )
                              @ ( dpsetconstr @ eigen__0 @ eigen__1
                                @ ^ [X4: $i,X5: $i] :
                                    ( ( eigen__2 @ X4 )
                                    = X5 ) ) ) ) )
                     => ( ( dsetconstr @ eigen__1
                          @ ^ [X3: $i] :
                              ( in @ ( kpair @ X1 @ X3 )
                              @ ( dpsetconstr @ eigen__0 @ eigen__1
                                @ ^ [X4: $i,X5: $i] :
                                    ( ( eigen__2 @ X4 )
                                    = X5 ) ) ) )
                       != ( setadjoin @ X2 @ emptyset ) ) ) ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP5])]) ).

thf(sP6,plain,
    ( sP6
  <=> ! [X1: $i,X2: $i] :
        ( ~ ( ( subset @ X2 @ ( cartprod @ eigen__0 @ X1 ) )
           => ~ ! [X3: $i] :
                  ( ( in @ X3 @ eigen__0 )
                 => ~ ! [X4: $i] :
                        ( ( in @ X4
                          @ ( dsetconstr @ X1
                            @ ^ [X5: $i] : ( in @ ( kpair @ X3 @ X5 ) @ X2 ) ) )
                       => ( ( dsetconstr @ X1
                            @ ^ [X5: $i] : ( in @ ( kpair @ X3 @ X5 ) @ X2 ) )
                         != ( setadjoin @ X4 @ emptyset ) ) ) ) )
       => ( in @ X2 @ ( funcSet @ eigen__0 @ X1 ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP6])]) ).

thf(sP7,plain,
    ( sP7
  <=> ! [X1: $i,X2: $i,X3: $i > $i] :
        ( ! [X4: $i] :
            ( ( in @ X4 @ X1 )
           => ( in @ ( X3 @ X4 ) @ X2 ) )
       => ~ ( ( subset
              @ ( dpsetconstr @ X1 @ X2
                @ ^ [X4: $i,X5: $i] :
                    ( ( X3 @ X4 )
                    = X5 ) )
              @ ( cartprod @ X1 @ X2 ) )
           => ~ ! [X4: $i] :
                  ( ( in @ X4 @ X1 )
                 => ~ ! [X5: $i] :
                        ( ( in @ X5
                          @ ( dsetconstr @ X2
                            @ ^ [X6: $i] :
                                ( in @ ( kpair @ X4 @ X6 )
                                @ ( dpsetconstr @ X1 @ X2
                                  @ ^ [X7: $i,X8: $i] :
                                      ( ( X3 @ X7 )
                                      = X8 ) ) ) ) )
                       => ( ( dsetconstr @ X2
                            @ ^ [X6: $i] :
                                ( in @ ( kpair @ X4 @ X6 )
                                @ ( dpsetconstr @ X1 @ X2
                                  @ ^ [X7: $i,X8: $i] :
                                      ( ( X3 @ X7 )
                                      = X8 ) ) ) )
                         != ( setadjoin @ X5 @ emptyset ) ) ) ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP7])]) ).

thf(sP8,plain,
    ( sP8
  <=> ( in
      @ ( dpsetconstr @ eigen__0 @ eigen__1
        @ ^ [X1: $i,X2: $i] :
            ( ( eigen__2 @ X1 )
            = X2 ) )
      @ ( funcSet @ eigen__0 @ eigen__1 ) ) ),
    introduced(definition,[new_symbols(definition,[sP8])]) ).

thf(sP9,plain,
    ( sP9
  <=> ! [X1: $i] :
        ( ~ ( ( subset @ X1 @ ( cartprod @ eigen__0 @ eigen__1 ) )
           => ~ ! [X2: $i] :
                  ( ( in @ X2 @ eigen__0 )
                 => ~ ! [X3: $i] :
                        ( ( in @ X3
                          @ ( dsetconstr @ eigen__1
                            @ ^ [X4: $i] : ( in @ ( kpair @ X2 @ X4 ) @ X1 ) ) )
                       => ( ( dsetconstr @ eigen__1
                            @ ^ [X4: $i] : ( in @ ( kpair @ X2 @ X4 ) @ X1 ) )
                         != ( setadjoin @ X3 @ emptyset ) ) ) ) )
       => ( in @ X1 @ ( funcSet @ eigen__0 @ eigen__1 ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP9])]) ).

thf(sP10,plain,
    ( sP10
  <=> ! [X1: $i,X2: $i,X3: $i] :
        ( ~ ( ( subset @ X3 @ ( cartprod @ X1 @ X2 ) )
           => ~ ! [X4: $i] :
                  ( ( in @ X4 @ X1 )
                 => ~ ! [X5: $i] :
                        ( ( in @ X5
                          @ ( dsetconstr @ X2
                            @ ^ [X6: $i] : ( in @ ( kpair @ X4 @ X6 ) @ X3 ) ) )
                       => ( ( dsetconstr @ X2
                            @ ^ [X6: $i] : ( in @ ( kpair @ X4 @ X6 ) @ X3 ) )
                         != ( setadjoin @ X5 @ emptyset ) ) ) ) )
       => ( in @ X3 @ ( funcSet @ X1 @ X2 ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP10])]) ).

thf(sP11,plain,
    ( sP11
  <=> ( ( subset
        @ ( dpsetconstr @ eigen__0 @ eigen__1
          @ ^ [X1: $i,X2: $i] :
              ( ( eigen__2 @ X1 )
              = X2 ) )
        @ ( cartprod @ eigen__0 @ eigen__1 ) )
     => ~ ! [X1: $i] :
            ( ( in @ X1 @ eigen__0 )
           => ~ ! [X2: $i] :
                  ( ( in @ X2
                    @ ( dsetconstr @ eigen__1
                      @ ^ [X3: $i] :
                          ( in @ ( kpair @ X1 @ X3 )
                          @ ( dpsetconstr @ eigen__0 @ eigen__1
                            @ ^ [X4: $i,X5: $i] :
                                ( ( eigen__2 @ X4 )
                                = X5 ) ) ) ) )
                 => ( ( dsetconstr @ eigen__1
                      @ ^ [X3: $i] :
                          ( in @ ( kpair @ X1 @ X3 )
                          @ ( dpsetconstr @ eigen__0 @ eigen__1
                            @ ^ [X4: $i,X5: $i] :
                                ( ( eigen__2 @ X4 )
                                = X5 ) ) ) )
                   != ( setadjoin @ X2 @ emptyset ) ) ) ) ) ),
    introduced(definition,[new_symbols(definition,[sP11])]) ).

thf(def_singleton,definition,
    ( singleton
    = ( ^ [X1: $i] :
        ? [X2: $i] :
          ( ( in @ X2 @ X1 )
          & ( X1
            = ( setadjoin @ X2 @ emptyset ) ) ) ) ) ).

thf(def_ex1,definition,
    ( ex1
    = ( ^ [X1: $i,X2: $i > $o] :
          ( singleton
          @ ( dsetconstr @ X1
            @ ^ [X3: $i] : ( X2 @ X3 ) ) ) ) ) ).

thf(def_breln,definition,
    ( breln
    = ( ^ [X1: $i,X2: $i,X3: $i] : ( subset @ X3 @ ( cartprod @ X1 @ X2 ) ) ) ) ).

thf(def_func,definition,
    ( func
    = ( ^ [X1: $i,X2: $i,X3: $i] :
          ( ( breln @ X1 @ X2 @ X3 )
          & ! [X4: $i] :
              ( ^ [X5: $o,X6: $o] :
                  ( X5
                 => X6 )
              @ ( in @ X4 @ X1 )
              @ ( ex1 @ X2
                @ ^ [X5: $i] : ( in @ ( kpair @ X4 @ X5 ) @ X3 ) ) ) ) ) ) ).

thf(def_funcinfuncset,definition,
    ( funcinfuncset
    = ( ! [X1: $i,X2: $i,X3: $i] :
          ( ^ [X4: $o,X5: $o] :
              ( X4
             => X5 )
          @ ( func @ X1 @ X2 @ X3 )
          @ ( in @ X3 @ ( funcSet @ X1 @ X2 ) ) ) ) ) ).

thf(def_lam,definition,
    ( lam
    = ( ^ [X1: $i,X2: $i,X3: $i > $i] :
          ( dpsetconstr @ X1 @ X2
          @ ^ [X4: $i,X5: $i] :
              ( ( X3 @ X4 )
              = X5 ) ) ) ) ).

thf(def_lamp,definition,
    ( lamp
    = ( ! [X1: $i,X2: $i,X3: $i > $i] :
          ( ^ [X4: $o,X5: $o] :
              ( X4
             => X5 )
          @ ! [X4: $i] :
              ( ^ [X5: $o,X6: $o] :
                  ( X5
                 => X6 )
              @ ( in @ X4 @ X1 )
              @ ( in @ ( X3 @ X4 ) @ X2 ) )
          @ ( func @ X1 @ X2
            @ ( lam @ X1 @ X2
              @ ^ [X4: $i] : ( X3 @ X4 ) ) ) ) ) ) ).

thf(lam2p,conjecture,
    ( sP10
   => ( sP7
     => ! [X1: $i,X2: $i,X3: $i > $i] :
          ( ! [X4: $i] :
              ( ( in @ X4 @ X1 )
             => ( in @ ( X3 @ X4 ) @ X2 ) )
         => ( in
            @ ( dpsetconstr @ X1 @ X2
              @ ^ [X4: $i,X5: $i] :
                  ( ( X3 @ X4 )
                  = X5 ) )
            @ ( funcSet @ X1 @ X2 ) ) ) ) ) ).

thf(h0,negated_conjecture,
    ~ ( sP10
     => ( sP7
       => ! [X1: $i,X2: $i,X3: $i > $i] :
            ( ! [X4: $i] :
                ( ( in @ X4 @ X1 )
               => ( in @ ( X3 @ X4 ) @ X2 ) )
           => ( in
              @ ( dpsetconstr @ X1 @ X2
                @ ^ [X4: $i,X5: $i] :
                    ( ( X3 @ X4 )
                    = X5 ) )
              @ ( funcSet @ X1 @ X2 ) ) ) ) ),
    inference(assume_negation,[status(cth)],[lam2p]) ).

thf(h1,assumption,
    sP10,
    introduced(assumption,[]) ).

thf(h2,assumption,
    ~ ( sP7
     => ! [X1: $i,X2: $i,X3: $i > $i] :
          ( ! [X4: $i] :
              ( ( in @ X4 @ X1 )
             => ( in @ ( X3 @ X4 ) @ X2 ) )
         => ( in
            @ ( dpsetconstr @ X1 @ X2
              @ ^ [X4: $i,X5: $i] :
                  ( ( X3 @ X4 )
                  = X5 ) )
            @ ( funcSet @ X1 @ X2 ) ) ) ),
    introduced(assumption,[]) ).

thf(h3,assumption,
    sP7,
    introduced(assumption,[]) ).

thf(h4,assumption,
    ~ ! [X1: $i,X2: $i,X3: $i > $i] :
        ( ! [X4: $i] :
            ( ( in @ X4 @ X1 )
           => ( in @ ( X3 @ X4 ) @ X2 ) )
       => ( in
          @ ( dpsetconstr @ X1 @ X2
            @ ^ [X4: $i,X5: $i] :
                ( ( X3 @ X4 )
                = X5 ) )
          @ ( funcSet @ X1 @ X2 ) ) ),
    introduced(assumption,[]) ).

thf(h5,assumption,
    ~ ! [X1: $i,X2: $i > $i] :
        ( ! [X3: $i] :
            ( ( in @ X3 @ eigen__0 )
           => ( in @ ( X2 @ X3 ) @ X1 ) )
       => ( in
          @ ( dpsetconstr @ eigen__0 @ X1
            @ ^ [X3: $i] : ( (=) @ ( X2 @ X3 ) ) )
          @ ( funcSet @ eigen__0 @ X1 ) ) ),
    introduced(assumption,[]) ).

thf(h6,assumption,
    ~ ! [X1: $i > $i] :
        ( ! [X2: $i] :
            ( ( in @ X2 @ eigen__0 )
           => ( in @ ( X1 @ X2 ) @ eigen__1 ) )
       => ( in
          @ ( dpsetconstr @ eigen__0 @ eigen__1
            @ ^ [X2: $i] : ( (=) @ ( X1 @ X2 ) ) )
          @ ( funcSet @ eigen__0 @ eigen__1 ) ) ),
    introduced(assumption,[]) ).

thf(h7,assumption,
    ~ ( sP1
     => ( in
        @ ( dpsetconstr @ eigen__0 @ eigen__1
          @ ^ [X1: $i] : ( (=) @ ( eigen__2 @ X1 ) ) )
        @ ( funcSet @ eigen__0 @ eigen__1 ) ) ),
    introduced(assumption,[]) ).

thf(h8,assumption,
    sP1,
    introduced(assumption,[]) ).

thf(h9,assumption,
    ~ sP8,
    introduced(assumption,[]) ).

thf(1,plain,
    ( ~ sP4
    | sP11
    | sP8 ),
    inference(prop_rule,[status(thm)],[]) ).

thf(2,plain,
    ( ~ sP5
    | ~ sP1
    | ~ sP11 ),
    inference(prop_rule,[status(thm)],[]) ).

thf(3,plain,
    ( ~ sP9
    | sP4 ),
    inference(all_rule,[status(thm)],[]) ).

thf(4,plain,
    ( ~ sP2
    | sP5 ),
    inference(all_rule,[status(thm)],[]) ).

thf(5,plain,
    ( ~ sP6
    | sP9 ),
    inference(all_rule,[status(thm)],[]) ).

thf(6,plain,
    ( ~ sP3
    | sP2 ),
    inference(all_rule,[status(thm)],[]) ).

thf(7,plain,
    ( ~ sP10
    | sP6 ),
    inference(all_rule,[status(thm)],[]) ).

thf(8,plain,
    ( ~ sP7
    | sP3 ),
    inference(all_rule,[status(thm)],[]) ).

thf(9,plain,
    $false,
    inference(prop_unsat,[status(thm),assumptions([h8,h9,h7,h6,h5,h3,h4,h1,h2,h0])],[1,2,3,4,5,6,7,8,h1,h3,h8,h9]) ).

thf(10,plain,
    $false,
    inference(tab_negimp,[status(thm),assumptions([h7,h6,h5,h3,h4,h1,h2,h0]),tab_negimp(discharge,[h8,h9])],[h7,9,h8,h9]) ).

thf(11,plain,
    $false,
    inference(tab_negall,[status(thm),assumptions([h6,h5,h3,h4,h1,h2,h0]),tab_negall(discharge,[h7]),tab_negall(eigenvar,eigen__2)],[h6,10,h7]) ).

thf(12,plain,
    $false,
    inference(tab_negall,[status(thm),assumptions([h5,h3,h4,h1,h2,h0]),tab_negall(discharge,[h6]),tab_negall(eigenvar,eigen__1)],[h5,11,h6]) ).

thf(13,plain,
    $false,
    inference(tab_negall,[status(thm),assumptions([h3,h4,h1,h2,h0]),tab_negall(discharge,[h5]),tab_negall(eigenvar,eigen__0)],[h4,12,h5]) ).

thf(14,plain,
    $false,
    inference(tab_negimp,[status(thm),assumptions([h1,h2,h0]),tab_negimp(discharge,[h3,h4])],[h2,13,h3,h4]) ).

thf(15,plain,
    $false,
    inference(tab_negimp,[status(thm),assumptions([h0]),tab_negimp(discharge,[h1,h2])],[h0,14,h1,h2]) ).

thf(0,theorem,
    ( sP10
   => ( sP7
     => ! [X1: $i,X2: $i,X3: $i > $i] :
          ( ! [X4: $i] :
              ( ( in @ X4 @ X1 )
             => ( in @ ( X3 @ X4 ) @ X2 ) )
         => ( in
            @ ( dpsetconstr @ X1 @ X2
              @ ^ [X4: $i,X5: $i] :
                  ( ( X3 @ X4 )
                  = X5 ) )
            @ ( funcSet @ X1 @ X2 ) ) ) ) ),
    inference(contra,[status(thm),contra(discharge,[h0])],[15,h0]) ).

%------------------------------------------------------------------------------
%----ORIGINAL SYSTEM OUTPUT
% 0.07/0.13  % Problem  : SEU680^2 : TPTP v9.2.0. Released v3.7.0.
% 0.07/0.14  % Command  : lash -P picomus -M modes -p tstp -t %d %s
% 0.13/0.35  % Computer : n028.cluster.edu
% 0.13/0.35  % Model    : x86_64 x86_64
% 0.13/0.35  % CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 @ 2.10GHz
% 0.13/0.35  % Memory   : 8042.1875MB
% 0.13/0.35  % OS       : Linux 3.10.0-693.el7.x86_64
% 0.13/0.35  % CPULimit : 300
% 0.13/0.35  % WCLimit  : 300
% 0.13/0.35  % DateTime : Wed Oct  8 21:57:53 EDT 2025
% 0.13/0.35  % CPUTime  : 
% 21.27/21.51  % SZS status Theorem
% 21.27/21.51  % Mode: cade22grackle2x798d
% 21.27/21.51  % Steps: 205
% 21.27/21.51  % SZS output start Proof
% See solution above
%------------------------------------------------------------------------------