% Mizar problem: e6_8_1,fraenkel,227,79 
include('Axioms/SET010^2.ax').
thf(f1_s8_fraenkel_type,type,( f1_s8_fraenkel: $i )).
thf(f2_s8_fraenkel_type,type,( f2_s8_fraenkel: $i )).
thf(f3_s8_fraenkel_type,type,( f3_s8_fraenkel: $i > $i > $i )).
thf(m1_subset_1_type,type,( m1_subset_1: $i > $i > $o )).
thf(p2_s8_fraenkel_type,type,( p2_s8_fraenkel: $i > $i > $o )).
thf(dt_m1_subset_1,axiom,( $true ),file(subset_1,m1_subset_1)).
thf(dt_f1_s8_fraenkel,axiom,( $true ),file(fraenkel,f1_s8_fraenkel)).
thf(dt_f2_s8_fraenkel,axiom,( $true ),file(fraenkel,f2_s8_fraenkel)).
thf(dt_f3_s8_fraenkel,axiom,( $true ),file(fraenkel,f3_s8_fraenkel)).
thf(e5_8_1__fraenkel,axiom,( ! [A: $i] : ( ( m1_subset_1 @ A @ f1_s8_fraenkel ) => ! [B: $i] : ( ( m1_subset_1 @ B @ f2_s8_fraenkel ) => ( = @ ( f3_s8_fraenkel @ A @ B ) @ ( f3_s8_fraenkel @ B @ A ) ) ) ) ),file(fraenkel,e5_8_1__fraenkel)).
thf(s7_fraenkel,axiom,( ! [A: $i > $i > $o] : ! [B: $i > $i > $i] : ! [C: $i > $i > $i] : ! [D: $i] : ! [E: $i] : ( ! [F: $i] : ( ( m1_subset_1 @ F @ E ) => ! [G: $i] : ( ( m1_subset_1 @ G @ D ) => ( = @ ( C @ F @ G ) @ ( B @ F @ G ) ) ) ) => ( = @ ( replSep2 @ ^ [F: $i] : ( m1_subset_1 @ F @ E ) @ ^ [F: $i] : ^ [G: $i] : ( m1_subset_1 @ G @ D ) @ ^ [F: $i] : ^ [G: $i] : ( C @ F @ G ) @ ^ [F: $i] : ^ [G: $i] : ( A @ F @ G ) ) @ ( replSep2 @ ^ [F: $i] : ( m1_subset_1 @ F @ E ) @ ^ [F: $i] : ^ [G: $i] : ( m1_subset_1 @ G @ D ) @ ^ [F: $i] : ^ [G: $i] : ( B @ F @ G ) @ ^ [F: $i] : ^ [G: $i] : ( A @ F @ G ) ) ) ) ),file(fraenkel,s7_fraenkel)).
thf(e6_8_1__fraenkel,conjecture,( = @ ( replSep2 @ ^ [A: $i] : ( m1_subset_1 @ A @ f1_s8_fraenkel ) @ ^ [A: $i] : ^ [B: $i] : ( m1_subset_1 @ B @ f2_s8_fraenkel ) @ ^ [A: $i] : ^ [B: $i] : ( f3_s8_fraenkel @ A @ B ) @ ^ [A: $i] : ^ [B: $i] : ( p2_s8_fraenkel @ A @ B ) ) @ ( replSep2 @ ^ [A: $i] : ( m1_subset_1 @ A @ f1_s8_fraenkel ) @ ^ [A: $i] : ^ [B: $i] : ( m1_subset_1 @ B @ f2_s8_fraenkel ) @ ^ [A: $i] : ^ [B: $i] : ( f3_s8_fraenkel @ B @ A ) @ ^ [A: $i] : ^ [B: $i] : ( p2_s8_fraenkel @ A @ B ) ) ),file(fraenkel,e6_8_1__fraenkel)).
thf(sethood_m1_subset_1,axiom,( ! [A: $i] : ( sethood @ ^ [X: $i] : ( m1_subset_1 @ X @ A ) ) ),file(subset_1,m1_subset_1)).
