%------------------------------------------------------------------------------
% File : Lash---1.13
% Problem : SEU664^1 : 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 : n031.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:19 PM UTC 2025
% Result : Theorem 0.50s 0.70s
% Output : Proof 0.73s
% Verified :
% SZS Type : ERROR: Analysing output (MakeTreeStats fails)
% Comments :
%------------------------------------------------------------------------------
thf(ty_subset,type,
subset: $i > $i > $o ).
thf(ty_iskpair,type,
iskpair: $i > $o ).
thf(ty_setminus,type,
setminus: $i > $i > $i ).
thf(ty_setunion,type,
setunion: $i > $i ).
thf(ty_binunion,type,
binunion: $i > $i > $i ).
thf(ty_kfst,type,
kfst: $i > $i ).
thf(ty_symdiff,type,
symdiff: $i > $i > $i ).
thf(ty_eigen__0,type,
eigen__0: $i ).
thf(ty_kpair,type,
kpair: $i > $i > $i ).
thf(ty_setadjoin,type,
setadjoin: $i > $i > $i ).
thf(ty_descr,type,
descr: ( $i > $o ) > $i ).
thf(ty_eigen__2,type,
eigen__2: $i ).
thf(ty_prop2set,type,
prop2set: $o > $i ).
thf(ty_binintersect,type,
binintersect: $i > $i > $i ).
thf(ty_eigen__1,type,
eigen__1: $i ).
thf(ty_dsetconstr,type,
dsetconstr: $i > ( $i > $o ) > $i ).
thf(ty_in,type,
in: $i > $i > $o ).
thf(ty_ksnd,type,
ksnd: $i > $i ).
thf(ty_powerset,type,
powerset: $i > $i ).
thf(ty_cartprod,type,
cartprod: $i > $i > $i ).
thf(ty_set2prop,type,
set2prop: $i > $o ).
thf(ty_omega,type,
omega: $i ).
thf(ty_emptyset,type,
emptyset: $i ).
thf(sP1,plain,
( sP1
<=> ( in @ eigen__2 @ ( cartprod @ eigen__0 @ eigen__1 ) ) ),
introduced(definition,[new_symbols(definition,[sP1])]) ).
thf(sP2,plain,
( sP2
<=> ( iskpair @ eigen__2 ) ),
introduced(definition,[new_symbols(definition,[sP2])]) ).
thf(sP3,plain,
( sP3
<=> ! [X1: $i] :
( ( in @ X1 @ ( cartprod @ eigen__0 @ eigen__1 ) )
=> ( iskpair @ X1 ) ) ),
introduced(definition,[new_symbols(definition,[sP3])]) ).
thf(sP4,plain,
( sP4
<=> ( sP1
=> sP2 ) ),
introduced(definition,[new_symbols(definition,[sP4])]) ).
thf(sP5,plain,
( sP5
<=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( iskpair @ X3 ) ) ),
introduced(definition,[new_symbols(definition,[sP5])]) ).
thf(sP6,plain,
( sP6
<=> ( sP2
=> ( ( kpair @ ( kfst @ eigen__2 ) @ ( ksnd @ eigen__2 ) )
= eigen__2 ) ) ),
introduced(definition,[new_symbols(definition,[sP6])]) ).
thf(sP7,plain,
( sP7
<=> ( ( kpair @ ( kfst @ eigen__2 ) @ ( ksnd @ eigen__2 ) )
= eigen__2 ) ),
introduced(definition,[new_symbols(definition,[sP7])]) ).
thf(sP8,plain,
( sP8
<=> ! [X1: $i] :
( ( iskpair @ X1 )
=> ( ( kpair @ ( kfst @ X1 ) @ ( ksnd @ X1 ) )
= X1 ) ) ),
introduced(definition,[new_symbols(definition,[sP8])]) ).
thf(sP9,plain,
( sP9
<=> ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( cartprod @ eigen__0 @ X1 ) )
=> ( iskpair @ X2 ) ) ),
introduced(definition,[new_symbols(definition,[sP9])]) ).
thf(def_exu,definition,
( exu
= ( ^ [X1: $i > $o] :
? [X2: $i] :
( ( X1 @ X2 )
& ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X3 )
@ ( X2 = X3 ) ) ) ) ) ).
thf(def_setextAx,definition,
( setextAx
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ( in @ X3 @ X1 )
<=> ( in @ X3 @ X2 ) )
@ ( X1 = X2 ) ) ) ) ).
thf(def_emptysetAx,definition,
( emptysetAx
= ( ! [X1: $i] : ( (~) @ ( in @ X1 @ emptyset ) ) ) ) ).
thf(def_setadjoinAx,definition,
( setadjoinAx
= ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
<=> ( ( X3 = X1 )
| ( in @ X3 @ X2 ) ) ) ) ) ).
thf(def_powersetAx,definition,
( powersetAx
= ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
<=> ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ X1 ) ) ) ) ) ).
thf(def_setunionAx,definition,
( setunionAx
= ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
<=> ? [X3: $i] :
( ( in @ X2 @ X3 )
& ( in @ X3 @ X1 ) ) ) ) ) ).
thf(def_omega0Ax,definition,
( omega0Ax
= ( in @ emptyset @ omega ) ) ).
thf(def_omegaSAx,definition,
( omegaSAx
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( in @ X1 @ omega )
@ ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) ) ) ) ).
thf(def_omegaIndAx,definition,
( omegaIndAx
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( ( in @ emptyset @ X1 )
& ! [X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( ( in @ X2 @ omega )
& ( in @ X2 @ X1 ) )
@ ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
@ ! [X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ omega )
@ ( in @ X2 @ X1 ) ) ) ) ) ).
thf(def_replAx,definition,
( replAx
= ( ! [X1: $i > $i > $o,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( exu
@ ^ [X4: $i] : ( X1 @ X3 @ X4 ) ) )
@ ? [X3: $i] :
! [X4: $i] :
( ( in @ X4 @ X3 )
<=> ? [X5: $i] :
( ( in @ X5 @ X2 )
& ( X1 @ X5 @ X4 ) ) ) ) ) ) ).
thf(def_foundationAx,definition,
( foundationAx
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ? [X2: $i] : ( in @ X2 @ X1 )
@ ? [X2: $i] :
( ( in @ X2 @ X1 )
& ( (~)
@ ? [X3: $i] :
( ( in @ X3 @ X2 )
& ( in @ X3 @ X1 ) ) ) ) ) ) ) ).
thf(def_wellorderingAx,definition,
( wellorderingAx
= ( ! [X1: $i] :
? [X2: $i] :
( ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X3 )
@ ( in @ X4 @ X1 ) ) )
& ! [X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ( in @ X3 @ X1 )
& ( in @ X4 @ X1 ) )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ! [X5: $i] :
( ^ [X6: $o,X7: $o] :
( X6
=> X7 )
@ ( in @ X5 @ X2 )
@ ( ( in @ X3 @ X5 )
<=> ( in @ X4 @ X5 ) ) )
@ ( X3 = X4 ) ) )
& ! [X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ( in @ X3 @ X2 )
& ( in @ X4 @ X2 ) )
@ ( ! [X5: $i] :
( ^ [X6: $o,X7: $o] :
( X6
=> X7 )
@ ( in @ X5 @ X3 )
@ ( in @ X5 @ X4 ) )
| ! [X5: $i] :
( ^ [X6: $o,X7: $o] :
( X6
=> X7 )
@ ( in @ X5 @ X4 )
@ ( in @ X5 @ X3 ) ) ) )
& ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X3 )
@ ( in @ X4 @ X1 ) )
& ? [X4: $i] : ( in @ X4 @ X3 ) )
@ ? [X4: $i,X5: $i] :
( ( in @ X4 @ X2 )
& ( in @ X5 @ X3 )
& ( (~)
@ ? [X6: $i] :
( ( in @ X6 @ X4 )
& ( in @ X6 @ X3 ) ) )
& ! [X6: $i] :
( ^ [X7: $o,X8: $o] :
( X7
=> X8 )
@ ( in @ X6 @ X2 )
@ ( ! [X7: $i] :
( ^ [X8: $o,X9: $o] :
( X8
=> X9 )
@ ( in @ X7 @ X6 )
@ ( in @ X7 @ X4 ) )
| ( in @ X5 @ X6 ) ) ) ) ) ) ) ) ).
thf(def_descrp,definition,
( descrp
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) )
@ ( X1
@ ( descr
@ ^ [X2: $i] : ( X1 @ X2 ) ) ) ) ) ) ).
thf(def_dsetconstrI,definition,
( dsetconstrI
= ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X2 @ X3 )
@ ( in @ X3
@ ( dsetconstr @ X1
@ ^ [X4: $i] : ( X2 @ X4 ) ) ) ) ) ) ) ).
thf(def_dsetconstrEL,definition,
( dsetconstrEL
= ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3
@ ( dsetconstr @ X1
@ ^ [X4: $i] : ( X2 @ X4 ) ) )
@ ( in @ X3 @ X1 ) ) ) ) ).
thf(def_dsetconstrER,definition,
( dsetconstrER
= ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3
@ ( dsetconstr @ X1
@ ^ [X4: $i] : ( X2 @ X4 ) ) )
@ ( X2 @ X3 ) ) ) ) ).
thf(def_exuE1,definition,
( exuE1
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) )
@ ? [X2: $i] :
( ( X1 @ X2 )
& ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X3 )
@ ( X2 = X3 ) ) ) ) ) ) ).
thf(def_prop2setE,definition,
( prop2setE
= ( ! [X1: $o,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ ( prop2set @ X1 ) )
@ X1 ) ) ) ).
thf(def_emptysetE,definition,
( emptysetE
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( in @ X1 @ emptyset )
@ ! [X2: $o] : X2 ) ) ) ).
thf(def_emptysetimpfalse,definition,
( emptysetimpfalse
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( in @ X1 @ emptyset )
@ $false ) ) ) ).
thf(def_notinemptyset,definition,
( notinemptyset
= ( ! [X1: $i] : ( (~) @ ( in @ X1 @ emptyset ) ) ) ) ).
thf(def_exuE3e,definition,
( exuE3e
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) )
@ ? [X2: $i] : ( X1 @ X2 ) ) ) ) ).
thf(def_setext,definition,
( setext
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ X3 @ X2 ) )
@ ( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ X1 ) )
@ ( X1 = X2 ) ) ) ) ) ).
thf(def_emptyI,definition,
( emptyI
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ! [X2: $i] : ( (~) @ ( in @ X2 @ X1 ) )
@ ( X1 = emptyset ) ) ) ) ).
thf(def_noeltsimpempty,definition,
( noeltsimpempty
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ! [X2: $i] : ( (~) @ ( in @ X2 @ X1 ) )
@ ( X1 = emptyset ) ) ) ) ).
thf(def_setbeta,definition,
( setbeta
= ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ( in @ X3
@ ( dsetconstr @ X1
@ ^ [X4: $i] : ( X2 @ X4 ) ) )
<=> ( X2 @ X3 ) ) ) ) ) ).
thf(def_nonempty,definition,
( nonempty
= ( ^ [X1: $i] : ( (~) @ ( X1 = emptyset ) ) ) ) ).
thf(def_nonemptyE1,definition,
( nonemptyE1
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( nonempty @ X1 )
@ ? [X2: $i] : ( in @ X2 @ X1 ) ) ) ) ).
thf(def_nonemptyI,definition,
( nonemptyI
= ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X2 @ X3 )
@ ( nonempty
@ ( dsetconstr @ X1
@ ^ [X4: $i] : ( X2 @ X4 ) ) ) ) ) ) ) ).
thf(def_nonemptyI1,definition,
( nonemptyI1
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ? [X2: $i] : ( in @ X2 @ X1 )
@ ( nonempty @ X1 ) ) ) ) ).
thf(def_setadjoinIL,definition,
( setadjoinIL
= ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) ) ) ) ).
thf(def_emptyinunitempty,definition,
( emptyinunitempty
= ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) ) ) ).
thf(def_setadjoinIR,definition,
( setadjoinIR
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) ) ) ) ).
thf(def_setadjoinE,definition,
( setadjoinE
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
@ ! [X4: $o] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X3 = X1 )
@ X4 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X3 @ X2 )
@ X4 )
@ X4 ) ) ) ) ) ).
thf(def_setadjoinOr,definition,
( setadjoinOr
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
@ ( ( X3 = X1 )
| ( in @ X3 @ X2 ) ) ) ) ) ).
thf(def_setoftrueEq,definition,
( setoftrueEq
= ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : $true )
= X1 ) ) ) ).
thf(def_powersetI,definition,
( powersetI
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ X1 ) )
@ ( in @ X2 @ ( powerset @ X1 ) ) ) ) ) ).
thf(def_emptyinPowerset,definition,
( emptyinPowerset
= ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) ) ) ) ).
thf(def_emptyInPowerset,definition,
( emptyInPowerset
= ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) ) ) ) ).
thf(def_powersetE,definition,
( powersetE
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X2 @ ( powerset @ X1 ) )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ X1 ) ) ) ) ) ).
thf(def_setunionI,definition,
( setunionI
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X2 @ X3 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ X2 @ ( setunion @ X1 ) ) ) ) ) ) ).
thf(def_setunionE,definition,
( setunionE
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ ( setunion @ X1 ) )
@ ! [X3: $o] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X2 @ X4 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X1 )
@ X3 ) )
@ X3 ) ) ) ) ).
thf(def_subPowSU,definition,
( subPowSU
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ X1 )
@ ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) ) ) ) ).
thf(def_exuE2,definition,
( exuE2
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) )
@ ? [X2: $i] :
! [X3: $i] :
( ( X1 @ X3 )
<=> ( X3 = X2 ) ) ) ) ) ).
thf(def_nonemptyImpWitness,definition,
( nonemptyImpWitness
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( nonempty @ X1 )
@ ? [X2: $i] :
( ( in @ X2 @ X1 )
& $true ) ) ) ) ).
thf(def_uniqinunit,definition,
( uniqinunit
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
@ ( X1 = X2 ) ) ) ) ).
thf(def_notinsingleton,definition,
( notinsingleton
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( (~) @ ( X1 = X2 ) )
@ ( (~) @ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) ) ) ) ) ).
thf(def_eqinunit,definition,
( eqinunit
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ) ) ) ).
thf(def_singletonsswitch,definition,
( singletonsswitch
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
@ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) ) ) ) ).
thf(def_upairsetE,definition,
( upairsetE
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
@ ( ( X3 = X1 )
| ( X3 = X2 ) ) ) ) ) ).
thf(def_upairsetIL,definition,
( upairsetIL
= ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ) ) ) ).
thf(def_upairsetIR,definition,
( upairsetIR
= ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ) ) ) ).
thf(def_emptyE1,definition,
( emptyE1
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( X2 @ X3 ) )
@ ( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( ( dsetconstr @ X1
@ ^ [X3: $i] : ( X2 @ X3 ) )
= emptyset )
@ $false ) ) ) ) ).
thf(def_vacuousDall,definition,
( vacuousDall
= ( ! [X1: $i > $o,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ emptyset )
@ ( X1 @ X2 ) ) ) ) ).
thf(def_quantDeMorgan1,definition,
( quantDeMorgan1
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( (~)
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( X2 @ X3 ) ) )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( (~) @ ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_quantDeMorgan2,definition,
( quantDeMorgan2
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( (~) @ ( X2 @ X3 ) ) )
@ ( (~)
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_quantDeMorgan3,definition,
( quantDeMorgan3
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( (~)
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( X2 @ X3 ) ) )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( (~) @ ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_quantDeMorgan4,definition,
( quantDeMorgan4
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( (~) @ ( X2 @ X3 ) ) )
@ ( (~)
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_prop2setI,definition,
( prop2setI
= ( ! [X1: $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ X1
@ ( in @ emptyset @ ( prop2set @ X1 ) ) ) ) ) ).
thf(def_prop2set2propI,definition,
( prop2set2propI
= ( ! [X1: $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ X1
@ ( set2prop @ ( prop2set @ X1 ) ) ) ) ) ).
thf(def_notdexE,definition,
( notdexE
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( (~)
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( X2 @ X3 ) ) )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( (~) @ ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_notdallE,definition,
( notdallE
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( (~)
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( X2 @ X3 ) ) )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( (~) @ ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_exuI1,definition,
( exuI1
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ? [X2: $i] :
( ( X1 @ X2 )
& ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X3 )
@ ( X2 = X3 ) ) )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) ) ) ) ) ).
thf(def_exuI3,definition,
( exuI3
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ? [X2: $i] : ( X1 @ X2 )
@ ( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ! [X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X2 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X3 )
@ ( X2 = X3 ) ) )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) ) ) ) ) ) ).
thf(def_exuI2,definition,
( exuI2
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ? [X2: $i] :
! [X3: $i] :
( ( X1 @ X3 )
<=> ( X3 = X2 ) )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) ) ) ) ) ).
thf(def_inCongP,definition,
( inCongP
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ! [X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X3 = X4 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X3 @ X1 )
@ ( in @ X4 @ X2 ) ) ) ) ) ) ).
thf(def_in__Cong,definition,
( in__Cong
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ! [X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X3 = X4 )
@ ( ( in @ X3 @ X1 )
<=> ( in @ X4 @ X2 ) ) ) ) ) ) ).
thf(def_exuE3u,definition,
( exuE3u
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) )
@ ! [X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X2 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X3 )
@ ( X2 = X3 ) ) ) ) ) ) ).
thf(def_exu__Cong,definition,
( exu__Cong
= ( ! [X1: $i > $o,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X3 = X4 )
@ ( ( X1 @ X3 )
<=> ( X2 @ X4 ) ) )
@ ( ( exu
@ ^ [X3: $i] : ( X1 @ X3 ) )
<=> ( exu
@ ^ [X3: $i] : ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_emptyset__Cong,definition,
( emptyset__Cong
= ( emptyset = emptyset ) ) ).
thf(def_setadjoin__Cong,definition,
( setadjoin__Cong
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ! [X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X3 = X4 )
@ ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) ) ) ) ).
thf(def_powerset__Cong,definition,
( powerset__Cong
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ( ( powerset @ X1 )
= ( powerset @ X2 ) ) ) ) ) ).
thf(def_setunion__Cong,definition,
( setunion__Cong
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ( ( setunion @ X1 )
= ( setunion @ X2 ) ) ) ) ) ).
thf(def_omega__Cong,definition,
( omega__Cong
= ( omega = omega ) ) ).
thf(def_exuEu,definition,
( exuEu
= ( ! [X1: $i > $o] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( exu
@ ^ [X2: $i] : ( X1 @ X2 ) )
@ ! [X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X2 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X1 @ X3 )
@ ( X2 = X3 ) ) ) ) ) ) ).
thf(def_descr__Cong,definition,
( descr__Cong
= ( ! [X1: $i > $o,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X3 = X4 )
@ ( ( X1 @ X3 )
<=> ( X2 @ X4 ) ) )
@ ( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( exu
@ ^ [X3: $i] : ( X1 @ X3 ) )
@ ( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( exu
@ ^ [X3: $i] : ( X2 @ X3 ) )
@ ( ( descr
@ ^ [X3: $i] : ( X1 @ X3 ) )
= ( descr
@ ^ [X3: $i] : ( X2 @ X3 ) ) ) ) ) ) ) ) ).
thf(def_dsetconstr__Cong,definition,
( dsetconstr__Cong
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ! [X3: $i > $o,X4: $i > $o] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ! [X5: $i] :
( ^ [X6: $o,X7: $o] :
( X6
=> X7 )
@ ( in @ X5 @ X1 )
@ ! [X6: $i] :
( ^ [X7: $o,X8: $o] :
( X7
=> X8 )
@ ( in @ X6 @ X2 )
@ ( ^ [X7: $o,X8: $o] :
( X7
=> X8 )
@ ( X5 = X6 )
@ ( ( X3 @ X5 )
<=> ( X4 @ X6 ) ) ) ) )
@ ( ( dsetconstr @ X1
@ ^ [X5: $i] : ( X3 @ X5 ) )
= ( dsetconstr @ X2
@ ^ [X5: $i] : ( X4 @ X5 ) ) ) ) ) ) ) ).
thf(def_subsetI1,definition,
( subsetI1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ X3 @ X2 ) )
@ ( subset @ X1 @ X2 ) ) ) ) ).
thf(def_eqimpsubset2,definition,
( eqimpsubset2
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ( subset @ X2 @ X1 ) ) ) ) ).
thf(def_eqimpsubset1,definition,
( eqimpsubset1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ( subset @ X1 @ X2 ) ) ) ) ).
thf(def_subsetI2,definition,
( subsetI2
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ X3 @ X2 ) )
@ ( subset @ X1 @ X2 ) ) ) ) ).
thf(def_emptysetsubset,definition,
( emptysetsubset
= ( ! [X1: $i] : ( subset @ emptyset @ X1 ) ) ) ).
thf(def_subsetE,definition,
( subsetE
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( subset @ X1 @ X2 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ X3 @ X2 ) ) ) ) ) ).
thf(def_subsetE2,definition,
( subsetE2
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( subset @ X1 @ X2 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ ( (~) @ ( in @ X3 @ X1 ) ) ) ) ) ) ).
thf(def_notsubsetI,definition,
( notsubsetI
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ ( (~) @ ( subset @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_notequalI1,definition,
( notequalI1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( (~) @ ( subset @ X1 @ X2 ) )
@ ( (~) @ ( X1 = X2 ) ) ) ) ) ).
thf(def_notequalI2,definition,
( notequalI2
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ ( (~) @ ( X1 = X2 ) ) ) ) ) ) ).
thf(def_subsetRefl,definition,
( subsetRefl
= ( ! [X1: $i] : ( subset @ X1 @ X1 ) ) ) ).
thf(def_subsetTrans,definition,
( subsetTrans
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( subset @ X1 @ X2 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( subset @ X2 @ X3 )
@ ( subset @ X1 @ X3 ) ) ) ) ) ).
thf(def_setadjoinSub,definition,
( setadjoinSub
= ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) ) ) ) ).
thf(def_setadjoinSub2,definition,
( setadjoinSub2
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( subset @ X1 @ X3 )
@ ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) ) ) ) ).
thf(def_subset2powerset,definition,
( subset2powerset
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X1 @ X2 )
@ ( in @ X1 @ ( powerset @ X2 ) ) ) ) ) ).
thf(def_setextsub,definition,
( setextsub
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X1 @ X2 )
@ ( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X2 @ X1 )
@ ( X1 = X2 ) ) ) ) ) ).
thf(def_subsetemptysetimpeq,definition,
( subsetemptysetimpeq
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( subset @ X1 @ emptyset )
@ ( X1 = emptyset ) ) ) ) ).
thf(def_powersetI1,definition,
( powersetI1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X2 @ X1 )
@ ( in @ X2 @ ( powerset @ X1 ) ) ) ) ) ).
thf(def_powersetE1,definition,
( powersetE1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ ( powerset @ X1 ) )
@ ( subset @ X2 @ X1 ) ) ) ) ).
thf(def_inPowerset,definition,
( inPowerset
= ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) ) ) ) ).
thf(def_powersetsubset,definition,
( powersetsubset
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X1 @ X2 )
@ ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) ) ) ) ).
thf(def_sepInPowerset,definition,
( sepInPowerset
= ( ! [X1: $i,X2: $i > $o] :
( in
@ ( dsetconstr @ X1
@ ^ [X3: $i] : ( X2 @ X3 ) )
@ ( powerset @ X1 ) ) ) ) ).
thf(def_sepSubset,definition,
( sepSubset
= ( ! [X1: $i,X2: $i > $o] :
( subset
@ ( dsetconstr @ X1
@ ^ [X3: $i] : ( X2 @ X3 ) )
@ X1 ) ) ) ).
thf(def_binunionIL,definition,
( binunionIL
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ X3 @ ( binunion @ X1 @ X2 ) ) ) ) ) ).
thf(def_upairset2IR,definition,
( upairset2IR
= ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ) ) ) ).
thf(def_binunionIR,definition,
( binunionIR
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ ( binunion @ X1 @ X2 ) ) ) ) ) ).
thf(def_binunionEcases,definition,
( binunionEcases
= ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X3 @ ( binunion @ X1 @ X2 ) )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X3 @ X1 )
@ X4 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X3 @ X2 )
@ X4 )
@ X4 ) ) ) ) ) ).
thf(def_binunionE,definition,
( binunionE
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( binunion @ X1 @ X2 ) )
@ ( ( in @ X3 @ X1 )
| ( in @ X3 @ X2 ) ) ) ) ) ).
thf(def_binunionLsub,definition,
( binunionLsub
= ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) ) ) ) ).
thf(def_binunionRsub,definition,
( binunionRsub
= ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) ) ) ) ).
thf(def_binintersectI,definition,
( binintersectI
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_binintersectSubset5,definition,
( binintersectSubset5
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( subset @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( subset @ X3 @ X2 )
@ ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_binintersectEL,definition,
( binintersectEL
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
@ ( in @ X3 @ X1 ) ) ) ) ).
thf(def_binintersectLsub,definition,
( binintersectLsub
= ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 ) ) ) ).
thf(def_binintersectSubset2,definition,
( binintersectSubset2
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X1 @ X2 )
@ ( ( binintersect @ X1 @ X2 )
= X1 ) ) ) ) ).
thf(def_binintersectSubset3,definition,
( binintersectSubset3
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( ( binintersect @ X1 @ X2 )
= X2 )
@ ( subset @ X2 @ X1 ) ) ) ) ).
thf(def_binintersectER,definition,
( binintersectER
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
@ ( in @ X3 @ X2 ) ) ) ) ).
thf(def_disjointsetsI1,definition,
( disjointsetsI1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( (~)
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( in @ X3 @ X2 ) ) )
@ ( ( binintersect @ X1 @ X2 )
= emptyset ) ) ) ) ).
thf(def_binintersectRsub,definition,
( binintersectRsub
= ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 ) ) ) ).
thf(def_binintersectSubset4,definition,
( binintersectSubset4
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X2 @ X1 )
@ ( ( binintersect @ X1 @ X2 )
= X2 ) ) ) ) ).
thf(def_binintersectSubset1,definition,
( binintersectSubset1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( ( binintersect @ X1 @ X2 )
= X1 )
@ ( subset @ X1 @ X2 ) ) ) ) ).
thf(def_bs114d,definition,
( bs114d
= ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) ) ) ) ).
thf(def_setminusI,definition,
( setminusI
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_setminusEL,definition,
( setminusEL
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
@ ( in @ X3 @ X1 ) ) ) ) ).
thf(def_setminusER,definition,
( setminusER
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
@ ( (~) @ ( in @ X3 @ X2 ) ) ) ) ) ).
thf(def_setminusSubset2,definition,
( setminusSubset2
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( subset @ X1 @ X2 )
@ ( ( setminus @ X1 @ X2 )
= emptyset ) ) ) ) ).
thf(def_setminusERneg,definition,
( setminusERneg
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ X3 @ X2 ) ) ) ) ) ).
thf(def_setminusELneg,definition,
( setminusELneg
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ ( (~) @ ( in @ X3 @ X1 ) ) ) ) ) ) ).
thf(def_setminusILneg,definition,
( setminusILneg
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X1 ) )
@ ( (~) @ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_setminusIRneg,definition,
( setminusIRneg
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( (~) @ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_setminusLsub,definition,
( setminusLsub
= ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 ) ) ) ).
thf(def_setminusSubset1,definition,
( setminusSubset1
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( ( setminus @ X1 @ X2 )
= emptyset )
@ ( subset @ X1 @ X2 ) ) ) ) ).
thf(def_symdiffE,definition,
( symdiffE
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
@ ! [X4: $o] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X3 @ X1 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ X4 ) )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( (~) @ ( in @ X3 @ X1 ) )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X3 @ X2 )
@ X4 ) )
@ X4 ) ) ) ) ) ).
thf(def_symdiffI1,definition,
( symdiffI1
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_symdiffI2,definition,
( symdiffI2
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X1 ) )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_symdiffIneg1,definition,
( symdiffIneg1
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X2 )
@ ( (~) @ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ) ) ) ) ).
thf(def_symdiffIneg2,definition,
( symdiffIneg2
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X1 ) )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( (~) @ ( in @ X3 @ X2 ) )
@ ( (~) @ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ) ) ) ) ).
thf(def_secondinupair,definition,
( secondinupair
= ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ) ) ) ).
thf(def_setukpairIL,definition,
( setukpairIL
= ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) ) ) ) ).
thf(def_setukpairIR,definition,
( setukpairIR
= ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) ) ) ) ).
thf(def_kpairiskpair,definition,
( kpairiskpair
= ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) ) ) ).
thf(def_kpairp,definition,
( kpairp
= ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) ) ) ) ).
thf(def_singletonsubset,definition,
( singletonsubset
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ X1 )
@ ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) ) ) ) ).
thf(def_singletoninpowerset,definition,
( singletoninpowerset
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ X1 )
@ ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) ) ) ) ).
thf(def_singletoninpowunion,definition,
( singletoninpowunion
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_upairset2E,definition,
( upairset2E
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
@ ( ( X3 = X1 )
| ( X3 = X2 ) ) ) ) ) ).
thf(def_upairsubunion,definition,
( upairsubunion
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_upairinpowunion,definition,
( upairinpowunion
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) ) ) ).
thf(def_ubforcartprodlem1,definition,
( ubforcartprodlem1
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) ) ) ).
thf(def_ubforcartprodlem2,definition,
( ubforcartprodlem2
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) ) ) ) ).
thf(def_ubforcartprodlem3,definition,
( ubforcartprodlem3
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) ) ) ) ).
thf(def_cartprodpairin,definition,
( cartprodpairin
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) ) ) ) ).
thf(def_cartprodmempair1,definition,
( cartprodmempair1
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
@ ? [X4: $i] :
( ( in @ X4 @ X1 )
& ? [X5: $i] :
( ( in @ X5 @ X2 )
& ( X3
= ( kpair @ X4 @ X5 ) ) ) ) ) ) ) ).
thf(def_cartprodmempair,definition,
( cartprodmempair
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
@ ( iskpair @ X3 ) ) ) ) ).
thf(def_setunionE2,definition,
( setunionE2
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( in @ X2 @ ( setunion @ X1 ) )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( in @ X2 @ X3 ) ) ) ) ) ).
thf(def_setunionsingleton1,definition,
( setunionsingleton1
= ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 ) ) ) ).
thf(def_setunionsingleton2,definition,
( setunionsingleton2
= ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) ) ) ) ).
thf(def_setunionsingleton,definition,
( setunionsingleton
= ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 ) ) ) ).
thf(def_singleton,definition,
( singleton
= ( ^ [X1: $i] :
? [X2: $i] :
( ( in @ X2 @ X1 )
& ( X1
= ( setadjoin @ X2 @ emptyset ) ) ) ) ) ).
thf(def_singletonprop,definition,
( singletonprop
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X1 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X2 @ X3 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X2 @ X4 )
@ ( X3 = X4 ) ) ) ) )
@ ( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( X2 @ X3 ) )
@ ( singleton
@ ( dsetconstr @ X1
@ ^ [X3: $i] : ( X2 @ X3 ) ) ) ) ) ) ) ).
thf(def_ex1,definition,
( ex1
= ( ^ [X1: $i,X2: $i > $o] :
( singleton
@ ( dsetconstr @ X1
@ ^ [X3: $i] : ( X2 @ X3 ) ) ) ) ) ).
thf(def_ex1E1,definition,
( ex1E1
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( ex1 @ X1
@ ^ [X3: $i] : ( X2 @ X3 ) )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( X2 @ X3 ) ) ) ) ) ).
thf(def_ex1I,definition,
( ex1I
= ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( X2 @ X3 )
@ ( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X1 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X2 @ X4 )
@ ( X4 = X3 ) ) )
@ ( ex1 @ X1
@ ^ [X4: $i] : ( X2 @ X4 ) ) ) ) ) ) ) ).
thf(def_ex1I2,definition,
( ex1I2
= ( ! [X1: $i,X2: $i > $o] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ! [X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X1 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X2 @ X3 )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X2 @ X4 )
@ ( X3 = X4 ) ) ) ) )
@ ( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ? [X3: $i] :
( ( in @ X3 @ X1 )
& ( X2 @ X3 ) )
@ ( ex1 @ X1
@ ^ [X3: $i] : ( X2 @ X3 ) ) ) ) ) ) ).
thf(def_singletonsuniq,definition,
( singletonsuniq
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
@ ( X1 = X2 ) ) ) ) ).
thf(def_setukpairinjL1,definition,
( setukpairinjL1
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
@ ( X1 = X3 ) ) ) ) ).
thf(def_kfstsingleton,definition,
( kfstsingleton
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( iskpair @ X1 )
@ ( singleton
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X2: $i] : ( in @ ( setadjoin @ X2 @ emptyset ) @ X1 ) ) ) ) ) ) ).
thf(def_theprop,definition,
( theprop
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( singleton @ X1 )
@ ( in @ ( setunion @ X1 ) @ X1 ) ) ) ) ).
thf(def_kfstpairEq,definition,
( kfstpairEq
= ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 ) ) ) ).
thf(def_cartprodfstin,definition,
( cartprodfstin
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
@ ( in @ ( kfst @ X3 ) @ X1 ) ) ) ) ).
thf(def_setukpairinjL2,definition,
( setukpairinjL2
= ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
@ ( X1 = X3 ) ) ) ) ).
thf(def_setukpairinjL,definition,
( setukpairinjL
= ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
@ ( X1 = X3 ) ) ) ) ).
thf(def_setukpairinjR11,definition,
( setukpairinjR11
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) ) ) ) ).
thf(def_setukpairinjR12,definition,
( setukpairinjR12
= ( ! [X1: $i,X2: $i] :
( ^ [X3: $o,X4: $o] :
( X3
=> X4 )
@ ( X1 = X2 )
@ ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) ) ) ) ).
thf(def_setukpairinjR1,definition,
( setukpairinjR1
= ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
@ ( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( X3 = X4 )
@ ( X2 = X4 ) ) ) ) ) ).
thf(def_upairequniteq,definition,
( upairequniteq
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
@ ( X1 = X2 ) ) ) ) ).
thf(def_setukpairinjR2,definition,
( setukpairinjR2
= ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
@ ( X2 = X4 ) ) ) ) ).
thf(def_setukpairinjR,definition,
( setukpairinjR
= ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
@ ( X2 = X4 ) ) ) ) ).
thf(def_ksndsingleton,definition,
( ksndsingleton
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( iskpair @ X1 )
@ ( singleton
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X2: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X2 ) ) ) ) ) ) ) ).
thf(def_ksndpairEq,definition,
( ksndpairEq
= ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 ) ) ) ).
thf(def_kpairsurjEq,definition,
( kpairsurjEq
= ( ! [X1: $i] :
( ^ [X2: $o,X3: $o] :
( X2
=> X3 )
@ ( iskpair @ X1 )
@ ( ( kpair @ ( kfst @ X1 ) @ ( ksnd @ X1 ) )
= X1 ) ) ) ) ).
thf(def_cartprodsndin,definition,
( cartprodsndin
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
@ ( in @ ( ksnd @ X3 ) @ X2 ) ) ) ) ).
thf(def_cartprodpairmemEL,definition,
( cartprodpairmemEL
= ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
@ ( in @ X3 @ X1 ) ) ) ) ).
thf(def_cartprodpairmemER,definition,
( cartprodpairmemER
= ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
@ ( in @ X4 @ X2 ) ) ) ) ).
thf(def_cartprodmempaircEq,definition,
( cartprodmempaircEq
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( ( kpair @ X3 @ X4 )
= ( kpair @ X3 @ X4 ) ) ) ) ) ) ).
thf(def_cartprodfstpairEq,definition,
( cartprodfstpairEq
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) ) ) ) ).
thf(def_cartprodsndpairEq,definition,
( cartprodsndpairEq
= ( ! [X1: $i,X2: $i,X3: $i] :
( ^ [X4: $o,X5: $o] :
( X4
=> X5 )
@ ( in @ X3 @ X1 )
@ ! [X4: $i] :
( ^ [X5: $o,X6: $o] :
( X5
=> X6 )
@ ( in @ X4 @ X2 )
@ ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) ) ) ) ).
thf(cartprodpairsurjEq,conjecture,
( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
= ( in @ X3 @ X2 ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
= ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
= ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
= ( ~ ! [X3: $i] :
( ( in @ X2 @ X3 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ( in @ emptyset @ omega )
=> ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ).
thf(h0,negated_conjecture,
~ ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
= ( in @ X3 @ X2 ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
= ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
= ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
= ( ~ ! [X3: $i] :
( ( in @ X2 @ X3 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ( in @ emptyset @ omega )
=> ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
inference(assume_negation,[status(cth)],[cartprodpairsurjEq]) ).
thf(h1,assumption,
! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
= ( in @ X3 @ X2 ) )
=> ( X1 = X2 ) ),
introduced(assumption,[]) ).
thf(h2,assumption,
~ ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
= ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
= ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
= ( ~ ! [X3: $i] :
( ( in @ X2 @ X3 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ( in @ emptyset @ omega )
=> ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h3,assumption,
! [X1: $i] :
~ ( in @ X1 @ emptyset ),
introduced(assumption,[]) ).
thf(h4,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
= ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
= ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
= ( ~ ! [X3: $i] :
( ( in @ X2 @ X3 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ( in @ emptyset @ omega )
=> ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h5,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
= ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h6,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
= ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
= ( ~ ! [X3: $i] :
( ( in @ X2 @ X3 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ( in @ emptyset @ omega )
=> ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h7,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
= ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) ) ),
introduced(assumption,[]) ).
thf(h8,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
= ( ~ ! [X3: $i] :
( ( in @ X2 @ X3 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ( in @ emptyset @ omega )
=> ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h9,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
= ( ~ ! [X3: $i] :
( ( in @ X2 @ X3 )
=> ~ ( in @ X3 @ X1 ) ) ) ),
introduced(assumption,[]) ).
thf(h10,assumption,
~ ( ( in @ emptyset @ omega )
=> ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h11,assumption,
in @ emptyset @ omega,
introduced(assumption,[]) ).
thf(h12,assumption,
~ ( ! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) )
=> ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h13,assumption,
! [X1: $i] :
( ( in @ X1 @ omega )
=> ( in @ ( setadjoin @ X1 @ X1 ) @ omega ) ),
introduced(assumption,[]) ).
thf(h14,assumption,
~ ( ! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) )
=> ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h15,assumption,
! [X1: $i] :
( ~ ( ( in @ emptyset @ X1 )
=> ~ ! [X2: $i] :
( ~ ( ( in @ X2 @ omega )
=> ~ ( in @ X2 @ X1 ) )
=> ( in @ ( setadjoin @ X2 @ X2 ) @ X1 ) ) )
=> ! [X2: $i] :
( ( in @ X2 @ omega )
=> ( in @ X2 @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h16,assumption,
~ ( ! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h17,assumption,
! [X1: $i > $i > $o,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ! [X4: $i] :
( ( X1 @ X3 @ X4 )
=> ~ ! [X5: $i] :
( ( X1 @ X3 @ X5 )
=> ( X4 = X5 ) ) ) )
=> ~ ! [X3: $i] :
~ ! [X4: $i] :
( ( in @ X4 @ X3 )
= ( ~ ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ~ ( X1 @ X5 @ X4 ) ) ) ) ),
introduced(assumption,[]) ).
thf(h18,assumption,
~ ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) )
=> ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h19,assumption,
! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ) ),
introduced(assumption,[]) ).
thf(h20,assumption,
~ ( ! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h21,assumption,
! [X1: $i] :
~ ! [X2: $i] :
( ~ ( ~ ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X1 )
=> ~ ( in @ X4 @ X1 ) )
=> ( ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( ( in @ X3 @ X5 )
= ( in @ X4 @ X5 ) ) )
=> ( X3 = X4 ) ) ) )
=> ~ ! [X3: $i,X4: $i] :
( ~ ( ( in @ X3 @ X2 )
=> ~ ( in @ X4 @ X2 ) )
=> ( ~ ! [X5: $i] :
( ( in @ X5 @ X3 )
=> ( in @ X5 @ X4 ) )
=> ! [X5: $i] :
( ( in @ X5 @ X4 )
=> ( in @ X5 @ X3 ) ) ) ) )
=> ~ ! [X3: $i] :
( ~ ( ! [X4: $i] :
( ( in @ X4 @ X3 )
=> ( in @ X4 @ X1 ) )
=> ! [X4: $i] :
~ ( in @ X4 @ X3 ) )
=> ~ ! [X4: $i,X5: $i] :
( ~ ( ~ ( ( in @ X4 @ X2 )
=> ~ ( in @ X5 @ X3 ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X4 )
=> ~ ( in @ X6 @ X3 ) ) )
=> ~ ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ~ ! [X7: $i] :
( ( in @ X7 @ X6 )
=> ( in @ X7 @ X4 ) )
=> ( in @ X5 @ X6 ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h22,assumption,
~ ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h23,assumption,
! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ( X1 @ ( descr @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h24,assumption,
~ ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h25,assumption,
! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h26,assumption,
~ ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h27,assumption,
! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) ),
introduced(assumption,[]) ).
thf(h28,assumption,
~ ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) )
=> ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h29,assumption,
! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( X2 @ X3 ) ),
introduced(assumption,[]) ).
thf(h30,assumption,
~ ( ! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 )
=> ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h31,assumption,
! [X1: $o,X2: $i] :
( ( in @ X2 @ ( prop2set @ X1 ) )
=> X1 ),
introduced(assumption,[]) ).
thf(h32,assumption,
~ ( ! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h33,assumption,
! [X1: $i] :
( ( in @ X1 @ emptyset )
=> ! [X2: $o] : X2 ),
introduced(assumption,[]) ).
thf(h34,assumption,
~ ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h35,assumption,
~ ( ! [X1: $i] :
~ ( in @ X1 @ emptyset )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h36,assumption,
~ ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h37,assumption,
! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ( X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h38,assumption,
~ ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h39,assumption,
! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( X1 = X2 ) ) ),
introduced(assumption,[]) ).
thf(h40,assumption,
~ ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h41,assumption,
! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) ),
introduced(assumption,[]) ).
thf(h42,assumption,
~ ( ! [X1: $i] :
( ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h43,assumption,
~ ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h44,assumption,
! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
= ( X2 @ X3 ) ) ),
introduced(assumption,[]) ).
thf(h45,assumption,
~ ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h46,assumption,
! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) ),
introduced(assumption,[]) ).
thf(h47,assumption,
~ ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h48,assumption,
! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ) ),
introduced(assumption,[]) ).
thf(h49,assumption,
~ ( ! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h50,assumption,
! [X1: $i] :
( ~ ! [X2: $i] :
~ ( in @ X2 @ X1 )
=> ( X1 != emptyset ) ),
introduced(assumption,[]) ).
thf(h51,assumption,
~ ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h52,assumption,
! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h53,assumption,
~ ( ( in @ emptyset @ ( setadjoin @ emptyset @ emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h54,assumption,
in @ emptyset @ ( setadjoin @ emptyset @ emptyset ),
introduced(assumption,[]) ).
thf(h55,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h56,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setadjoin @ X1 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h57,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h58,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( X3 = X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) ),
introduced(assumption,[]) ).
thf(h59,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h60,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ X2 ) )
=> ( ( X3 != X1 )
=> ( in @ X3 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h61,assumption,
~ ( ! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h62,assumption,
! [X1: $i] :
( ( dsetconstr @ X1
@ ^ [X2: $i] : ~ $false )
= X1 ),
introduced(assumption,[]) ).
thf(h63,assumption,
~ ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h64,assumption,
! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) )
=> ( in @ X2 @ ( powerset @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h65,assumption,
~ ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h66,assumption,
! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) ),
introduced(assumption,[]) ).
thf(h67,assumption,
~ ( ! [X1: $i] : ( in @ emptyset @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h68,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h69,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h70,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h71,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X2 @ X3 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X2 @ ( setunion @ X1 ) ) ) ),
introduced(assumption,[]) ).
thf(h72,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h73,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ! [X3: $o] :
( ! [X4: $i] :
( ( in @ X2 @ X4 )
=> ( ( in @ X4 @ X1 )
=> X3 ) )
=> X3 ) ),
introduced(assumption,[]) ).
thf(h74,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h75,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ ( setunion @ X1 ) ) ) ),
introduced(assumption,[]) ).
thf(h76,assumption,
~ ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) )
=> ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h77,assumption,
! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) ) ),
introduced(assumption,[]) ).
thf(h78,assumption,
~ ( ! [X1: $i] :
( ( X1 != emptyset )
=> ~ ! [X2: $i] :
~ ( in @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h79,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h80,assumption,
! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) ),
introduced(assumption,[]) ).
thf(h81,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h82,assumption,
! [X1: $i,X2: $i] :
( ( X1 != X2 )
=> ~ ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) ),
introduced(assumption,[]) ).
thf(h83,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h84,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ),
introduced(assumption,[]) ).
thf(h85,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h86,assumption,
! [X1: $i,X2: $i] :
( ( in @ X1 @ ( setadjoin @ X2 @ emptyset ) )
=> ( in @ X2 @ ( setadjoin @ X1 @ emptyset ) ) ),
introduced(assumption,[]) ).
thf(h87,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h88,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) ),
introduced(assumption,[]) ).
thf(h89,assumption,
~ ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h90,assumption,
! [X1: $i,X2: $i] : ( in @ X1 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ),
introduced(assumption,[]) ).
thf(h91,assumption,
~ ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h92,assumption,
! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) ),
introduced(assumption,[]) ).
thf(h93,assumption,
~ ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) )
=> ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h94,assumption,
! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= emptyset ) ),
introduced(assumption,[]) ).
thf(h95,assumption,
~ ( ! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) )
=> ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h96,assumption,
! [X1: $i > $o,X2: $i] :
( ( in @ X2 @ emptyset )
=> ( X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h97,assumption,
~ ( ! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h98,assumption,
! [X1: $o] :
( X1
=> ( in @ emptyset @ ( prop2set @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h99,assumption,
~ ( ! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h100,assumption,
! [X1: $o] :
( X1
=> ( set2prop @ ( prop2set @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h101,assumption,
~ ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h102,assumption,
! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ( X1 @ X2 )
=> ( ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ) ),
introduced(assumption,[]) ).
thf(h103,assumption,
~ ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h104,assumption,
! [X1: $i > $o] :
( ~ ! [X2: $i] :
~ ! [X3: $i] :
( ( X1 @ X3 )
= ( X3 = X2 ) )
=> ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ),
introduced(assumption,[]) ).
thf(h105,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h106,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X4 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h107,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h108,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( in @ X3 @ X1 )
= ( in @ X4 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h109,assumption,
~ ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h110,assumption,
! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) ),
introduced(assumption,[]) ).
thf(h111,assumption,
~ ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h112,assumption,
! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) ) )
= ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h113,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h114,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( setadjoin @ X1 @ X3 )
= ( setadjoin @ X2 @ X4 ) ) ) ),
introduced(assumption,[]) ).
thf(h115,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h116,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( powerset @ X1 )
= ( powerset @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h117,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) )
=> ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h118,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setunion @ X1 )
= ( setunion @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h119,assumption,
~ ( ! [X1: $i > $o] :
( ~ ! [X2: $i] :
( ( X1 @ X2 )
=> ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ( X2 = X3 ) ) )
=> ! [X2: $i,X3: $i] :
( ( X1 @ X2 )
=> ( ( X1 @ X3 )
=> ( X2 = X3 ) ) ) )
=> ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h120,assumption,
~ ( ! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h121,assumption,
! [X1: $i > $o,X2: $i > $o] :
( ! [X3: $i,X4: $i] :
( ( X3 = X4 )
=> ( ( X1 @ X3 )
= ( X2 @ X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X1 @ X3 )
=> ~ ! [X4: $i] :
( ( X1 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ~ ! [X3: $i] :
( ( X2 @ X3 )
=> ~ ! [X4: $i] :
( ( X2 @ X4 )
=> ( X3 = X4 ) ) )
=> ( ( descr @ X1 )
= ( descr @ X2 ) ) ) ) ),
introduced(assumption,[]) ).
thf(h122,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h123,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ! [X3: $i > $o,X4: $i > $o] :
( ! [X5: $i] :
( ( in @ X5 @ X1 )
=> ! [X6: $i] :
( ( in @ X6 @ X2 )
=> ( ( X5 = X6 )
=> ( ( X3 @ X5 )
= ( X4 @ X6 ) ) ) ) )
=> ( ( dsetconstr @ X1 @ X3 )
= ( dsetconstr @ X2 @ X4 ) ) ) ),
introduced(assumption,[]) ).
thf(h124,assumption,
~ ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h125,assumption,
! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h126,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h127,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X2 @ X1 ) ),
introduced(assumption,[]) ).
thf(h128,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h129,assumption,
! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( subset @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h130,assumption,
~ ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h131,assumption,
~ ( ! [X1: $i] : ( subset @ emptyset @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h132,assumption,
! [X1: $i] : ( subset @ emptyset @ X1 ),
introduced(assumption,[]) ).
thf(h133,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h134,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h135,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h136,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h137,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h138,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( subset @ X1 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h139,assumption,
~ ( ! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h140,assumption,
! [X1: $i,X2: $i] :
( ~ ( subset @ X1 @ X2 )
=> ( X1 != X2 ) ),
introduced(assumption,[]) ).
thf(h141,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) )
=> ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h142,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( X1 != X2 ) ) ),
introduced(assumption,[]) ).
thf(h143,assumption,
~ ( ! [X1: $i] : ( subset @ X1 @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h144,assumption,
! [X1: $i] : ( subset @ X1 @ X1 ),
introduced(assumption,[]) ).
thf(h145,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h146,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X3 )
=> ( subset @ X1 @ X3 ) ) ),
introduced(assumption,[]) ).
thf(h147,assumption,
~ ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h148,assumption,
! [X1: $i,X2: $i] : ( subset @ X2 @ ( setadjoin @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h149,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h150,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X1 @ X3 )
=> ( subset @ X1 @ ( setadjoin @ X2 @ X3 ) ) ),
introduced(assumption,[]) ).
thf(h151,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h152,assumption,
! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( in @ X1 @ ( powerset @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h153,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) )
=> ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h154,assumption,
! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( subset @ X2 @ X1 )
=> ( X1 = X2 ) ) ),
introduced(assumption,[]) ).
thf(h155,assumption,
~ ( ! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h156,assumption,
! [X1: $i] :
( ( subset @ X1 @ emptyset )
=> ( X1 = emptyset ) ),
introduced(assumption,[]) ).
thf(h157,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h158,assumption,
! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( in @ X2 @ ( powerset @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h159,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h160,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ ( powerset @ X1 ) )
=> ( subset @ X2 @ X1 ) ),
introduced(assumption,[]) ).
thf(h161,assumption,
~ ( ! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h162,assumption,
! [X1: $i] : ( in @ X1 @ ( powerset @ X1 ) ),
introduced(assumption,[]) ).
thf(h163,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) )
=> ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h164,assumption,
! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( subset @ ( powerset @ X1 ) @ ( powerset @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h165,assumption,
~ ( ! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) )
=> ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h166,assumption,
! [X1: $i,X2: $i > $o] : ( in @ ( dsetconstr @ X1 @ X2 ) @ ( powerset @ X1 ) ),
introduced(assumption,[]) ).
thf(h167,assumption,
~ ( ! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h168,assumption,
! [X1: $i,X2: $i > $o] : ( subset @ ( dsetconstr @ X1 @ X2 ) @ X1 ),
introduced(assumption,[]) ).
thf(h169,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h170,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h171,assumption,
~ ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h172,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h173,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binunion @ X1 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h174,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h175,assumption,
! [X1: $i,X2: $i,X3: $i,X4: $o] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ( ( in @ X3 @ X1 )
=> X4 )
=> ( ( ( in @ X3 @ X2 )
=> X4 )
=> X4 ) ) ),
introduced(assumption,[]) ).
thf(h176,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h177,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binunion @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h178,assumption,
~ ( ! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h179,assumption,
! [X1: $i,X2: $i] : ( subset @ X1 @ ( binunion @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h180,assumption,
~ ( ! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h181,assumption,
! [X1: $i,X2: $i] : ( subset @ X2 @ ( binunion @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h182,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h183,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( binintersect @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h184,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h185,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( subset @ X3 @ X1 )
=> ( ( subset @ X3 @ X2 )
=> ( subset @ X3 @ ( binintersect @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h186,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h187,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) ),
introduced(assumption,[]) ).
thf(h188,assumption,
~ ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h189,assumption,
! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X1 ),
introduced(assumption,[]) ).
thf(h190,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h191,assumption,
! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( binintersect @ X1 @ X2 )
= X1 ) ),
introduced(assumption,[]) ).
thf(h192,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h193,assumption,
! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X2 )
=> ( subset @ X2 @ X1 ) ),
introduced(assumption,[]) ).
thf(h194,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h195,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( binintersect @ X1 @ X2 ) )
=> ( in @ X3 @ X2 ) ),
introduced(assumption,[]) ).
thf(h196,assumption,
~ ( ! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h197,assumption,
! [X1: $i,X2: $i] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ X2 ) )
=> ( ( binintersect @ X1 @ X2 )
= emptyset ) ),
introduced(assumption,[]) ).
thf(h198,assumption,
~ ( ! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h199,assumption,
! [X1: $i,X2: $i] : ( subset @ ( binintersect @ X1 @ X2 ) @ X2 ),
introduced(assumption,[]) ).
thf(h200,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h201,assumption,
! [X1: $i,X2: $i] :
( ( subset @ X2 @ X1 )
=> ( ( binintersect @ X1 @ X2 )
= X2 ) ),
introduced(assumption,[]) ).
thf(h202,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h203,assumption,
! [X1: $i,X2: $i] :
( ( ( binintersect @ X1 @ X2 )
= X1 )
=> ( subset @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h204,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h205,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( binintersect @ X1 @ ( binunion @ X2 @ X3 ) )
= ( binunion @ ( binintersect @ X1 @ X2 ) @ ( binintersect @ X1 @ X3 ) ) ),
introduced(assumption,[]) ).
thf(h206,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h207,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h208,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h209,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) ),
introduced(assumption,[]) ).
thf(h210,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h211,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ~ ( in @ X3 @ X2 ) ),
introduced(assumption,[]) ).
thf(h212,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h213,assumption,
! [X1: $i,X2: $i] :
( ( subset @ X1 @ X2 )
=> ( ( setminus @ X1 @ X2 )
= emptyset ) ),
introduced(assumption,[]) ).
thf(h214,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h215,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ( in @ X3 @ X1 )
=> ( in @ X3 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h216,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h217,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h218,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h219,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h220,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) )
=> ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h221,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( setminus @ X1 @ X2 ) ) ),
introduced(assumption,[]) ).
thf(h222,assumption,
~ ( ! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 )
=> ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h223,assumption,
! [X1: $i,X2: $i] : ( subset @ ( setminus @ X1 @ X2 ) @ X1 ),
introduced(assumption,[]) ).
thf(h224,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h225,assumption,
! [X1: $i,X2: $i] :
( ( ( setminus @ X1 @ X2 )
= emptyset )
=> ( subset @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h226,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h227,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( symdiff @ X1 @ X2 ) )
=> ! [X4: $o] :
( ( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> X4 ) )
=> ( ( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> X4 ) )
=> X4 ) ) ),
introduced(assumption,[]) ).
thf(h228,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h229,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h230,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h231,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h232,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h233,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h234,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h235,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ~ ( in @ X3 @ X1 )
=> ( ~ ( in @ X3 @ X2 )
=> ~ ( in @ X3 @ ( symdiff @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h236,assumption,
~ ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h237,assumption,
~ ( ! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h238,assumption,
! [X1: $i,X2: $i] : ( in @ X1 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) ),
introduced(assumption,[]) ).
thf(h239,assumption,
~ ( ! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h240,assumption,
! [X1: $i,X2: $i] : ( in @ X2 @ ( setunion @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ) ),
introduced(assumption,[]) ).
thf(h241,assumption,
~ ( ! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h242,assumption,
! [X1: $i,X2: $i] : ( iskpair @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) ),
introduced(assumption,[]) ).
thf(h243,assumption,
~ ( ! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h244,assumption,
! [X1: $i,X2: $i] : ( iskpair @ ( kpair @ X1 @ X2 ) ),
introduced(assumption,[]) ).
thf(h245,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h246,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( subset @ ( setadjoin @ X2 @ emptyset ) @ X1 ) ),
introduced(assumption,[]) ).
thf(h247,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h248,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ X1 )
=> ( in @ ( setadjoin @ X2 @ emptyset ) @ ( powerset @ X1 ) ) ),
introduced(assumption,[]) ).
thf(h249,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h250,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ( in @ ( setadjoin @ X3 @ emptyset ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h251,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) )
=> ( ( X3 != X1 )
=> ( X3 = X2 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h252,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h253,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( binunion @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h254,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h255,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ),
introduced(assumption,[]) ).
thf(h256,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h257,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( subset @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ),
introduced(assumption,[]) ).
thf(h258,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h259,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h260,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h261,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( powerset @ ( powerset @ ( binunion @ X1 @ X2 ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h262,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h263,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) ) ) ),
introduced(assumption,[]) ).
thf(h264,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) )
=> ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h265,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ! [X5: $i] :
( ( in @ X5 @ X2 )
=> ( X3
!= ( kpair @ X4 @ X5 ) ) ) ) ),
introduced(assumption,[]) ).
thf(h266,assumption,
~ ( sP5
=> ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h267,assumption,
sP5,
introduced(assumption,[]) ).
thf(h268,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) )
=> ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h269,assumption,
! [X1: $i,X2: $i] :
( ( in @ X2 @ ( setunion @ X1 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( in @ X2 @ X3 ) ) ),
introduced(assumption,[]) ).
thf(h270,assumption,
~ ( ! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 )
=> ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h271,assumption,
! [X1: $i] : ( subset @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) @ X1 ),
introduced(assumption,[]) ).
thf(h272,assumption,
~ ( ! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h273,assumption,
! [X1: $i] : ( subset @ X1 @ ( setunion @ ( setadjoin @ X1 @ emptyset ) ) ),
introduced(assumption,[]) ).
thf(h274,assumption,
~ ( ! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h275,assumption,
! [X1: $i] :
( ( setunion @ ( setadjoin @ X1 @ emptyset ) )
= X1 ),
introduced(assumption,[]) ).
thf(h276,assumption,
~ ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h277,assumption,
! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) ),
introduced(assumption,[]) ).
thf(h278,assumption,
~ ( ! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) )
=> ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h279,assumption,
! [X1: $i,X2: $i > $o] :
( ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) ) ),
introduced(assumption,[]) ).
thf(h280,assumption,
~ ( ! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) )
=> ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h281,assumption,
! [X1: $i,X2: $i > $o,X3: $i] :
( ( in @ X3 @ X1 )
=> ( ( X2 @ X3 )
=> ( ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X4 )
=> ( X4 = X3 ) ) )
=> ~ ! [X4: $i] :
( ( in @ X4 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X4 @ emptyset ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h282,assumption,
~ ( ! [X1: $i,X2: $i > $o] :
( ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X1 )
=> ( ( X2 @ X3 )
=> ( ( X2 @ X4 )
=> ( X3 = X4 ) ) ) ) )
=> ( ~ ! [X3: $i] :
( ( in @ X3 @ X1 )
=> ~ ( X2 @ X3 ) )
=> ~ ! [X3: $i] :
( ( in @ X3 @ ( dsetconstr @ X1 @ X2 ) )
=> ( ( dsetconstr @ X1 @ X2 )
!= ( setadjoin @ X3 @ emptyset ) ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h283,assumption,
~ ( ! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h284,assumption,
! [X1: $i,X2: $i] :
( ( ( setadjoin @ X1 @ emptyset )
= ( setadjoin @ X2 @ emptyset ) )
=> ( X1 = X2 ) ),
introduced(assumption,[]) ).
thf(h285,assumption,
~ ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X4 @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( kfst @ ( kpair @ X3 @ X4 ) )
= X3 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ X1 )
=> ! [X4: $i] :
( ( in @ X4 @ X2 )
=> ( ( ksnd @ ( kpair @ X3 @ X4 ) )
= X4 ) ) )
=> ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( ( kpair @ ( kfst @ X3 ) @ ( ksnd @ X3 ) )
= X3 ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ),
introduced(assumption,[]) ).
thf(h286,assumption,
! [X1: $i,X2: $i,X3: $i] :
( ( in @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) ),
introduced(assumption,[]) ).
thf(h287,assumption,
~ ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] : ( in @ ( setadjoin @ X3 @ emptyset ) @ X1 ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i] :
( ~ ! [X2: $i] :
( ( in @ X2 @ X1 )
=> ( X1
!= ( setadjoin @ X2 @ emptyset ) ) )
=> ( in @ ( setunion @ X1 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i] :
( ( kfst @ ( kpair @ X1 @ X2 ) )
= X1 )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( kfst @ X3 ) @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X1 = X3 ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X1 @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( X1 = X2 )
=> ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ emptyset ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( ( X3 = X4 )
=> ( X2 = X4 ) ) )
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) )
= ( setadjoin @ X3 @ emptyset ) )
=> ( X1 = X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( setadjoin @ ( setadjoin @ X1 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X1 @ ( setadjoin @ X2 @ emptyset ) ) @ emptyset ) )
= ( setadjoin @ ( setadjoin @ X3 @ emptyset ) @ ( setadjoin @ ( setadjoin @ X3 @ ( setadjoin @ X4 @ emptyset ) ) @ emptyset ) ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( ( kpair @ X1 @ X2 )
= ( kpair @ X3 @ X4 ) )
=> ( X2 = X4 ) )
=> ( ! [X1: $i] :
( ( iskpair @ X1 )
=> ~ ! [X2: $i] :
( ( in @ X2
@ ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) ) )
=> ( ( dsetconstr @ ( setunion @ X1 )
@ ^ [X3: $i] :
( X1
= ( kpair @ ( kfst @ X1 ) @ X3 ) ) )
!= ( setadjoin @ X2 @ emptyset ) ) ) )
=> ( ! [X1: $i,X2: $i] :
( ( ksnd @ ( kpair @ X1 @ X2 ) )
= X2 )
=> ( sP8
=> ( ! [X1: $i,X2: $i,X3: $i] :
( ( in @ X3 @ ( cartprod @ X1 @ X2 ) )
=> ( in @ ( ksnd @ X3 ) @ X2 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=> ( in @ X3 @ X1 ) )
=> ( ! [X1: $i,X2: $i,X3: $i,X4: $i] :
( ( in @ ( kpair @ X3 @ X4 ) @ ( cartprod @ X1 @ X2 ) )
=>