TPTP Problem File: COM190^1.p
View Solutions
- Solve Problem
%------------------------------------------------------------------------------
% File : COM190^1 : TPTP v9.0.0. Released v7.0.0.
% Domain : Computing Theory
% Problem : Grammars and languages 811
% Version : [Bla16] axioms : Especial.
% English :
% Refs : [BH+14] Blanchette et al. (2014), Truly Modular (Co)datatypes
% : [RB15] Reynolds & Blanchette (2015), A Decision Procedure for
% : [Bla16] Blanchette (2016), Email to Geoff Sutcliffe
% Source : [Bla16]
% Names : gram_lang__811.p [Bla16]
% Status : Theorem
% Rating : 0.00 v7.1.0
% Syntax : Number of formulae : 312 ( 78 unt; 39 typ; 0 def)
% Number of atoms : 880 ( 279 equ; 0 cnn)
% Maximal formula atoms : 13 ( 3 avg)
% Number of connectives : 3978 ( 125 ~; 26 |; 81 &;3265 @)
% ( 0 <=>; 481 =>; 0 <=; 0 <~>)
% Maximal formula depth : 27 ( 9 avg)
% Number of types : 4 ( 3 usr)
% Number of type conns : 151 ( 151 >; 0 *; 0 +; 0 <<)
% Number of symbols : 37 ( 36 usr; 2 con; 0-3 aty)
% Number of variables : 1124 ( 50 ^; 957 !; 88 ?;1124 :)
% ( 29 !>; 0 ?*; 0 @-; 0 @+)
% SPC : TH1_THM_EQU_NAR
% Comments : This file was generated by Isabelle (most likely Sledgehammer)
% 2016-07-13 14:44:57.308
%------------------------------------------------------------------------------
%----Could-be-implicit typings (6)
thf(ty_t_DTree_Odtree,type,
dtree: $tType ).
thf(ty_t_List_Olist,type,
list: $tType > $tType ).
thf(ty_t_Set_Oset,type,
set: $tType > $tType ).
thf(ty_t_Nat_Onat,type,
nat: $tType ).
thf(ty_t_DTree_ON,type,
n: $tType ).
thf(ty_t_itself,type,
itself: $tType > $tType ).
%----Explicit typings (33)
thf(sy_cl_HOL_Otype,type,
type:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Oord,type,
ord:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Oorder,type,
order:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Ono__bot,type,
no_bot:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Ono__top,type,
no_top:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Olinorder,type,
linorder:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Opreorder,type,
preorder:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Owellorder,type,
wellorder:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Odense__order,type,
dense_order:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Orderings_Odense__linorder,type,
dense_linorder:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Conditionally__Complete__Lattices_Olinear__continuum,type,
condit1656338222tinuum:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_cl_Conditionally__Complete__Lattices_Oconditionally__complete__linorder,type,
condit1037483654norder:
!>[A: $tType] : ( ( itself @ A ) > $o ) ).
thf(sy_c_Gram__Lang__Mirabelle__ojxrtuoybn_Opath,type,
gram_L250615845e_path: ( n > dtree ) > ( list @ n ) > $o ).
thf(sy_c_List_Oappend,type,
append:
!>[A: $tType] : ( ( list @ A ) > ( list @ A ) > ( list @ A ) ) ).
thf(sy_c_List_Odistinct,type,
distinct:
!>[A: $tType] : ( ( list @ A ) > $o ) ).
thf(sy_c_List_Olast,type,
last:
!>[A: $tType] : ( ( list @ A ) > A ) ).
thf(sy_c_List_Olist_OCons,type,
cons:
!>[A: $tType] : ( A > ( list @ A ) > ( list @ A ) ) ).
thf(sy_c_List_Olist_ONil,type,
nil:
!>[A: $tType] : ( list @ A ) ).
thf(sy_c_List_Olist_Ohd,type,
hd:
!>[A: $tType] : ( ( list @ A ) > A ) ).
thf(sy_c_List_Olist_Oset,type,
set2:
!>[A: $tType] : ( ( list @ A ) > ( set @ A ) ) ).
thf(sy_c_List_On__lists,type,
n_lists:
!>[A: $tType] : ( nat > ( list @ A ) > ( list @ ( list @ A ) ) ) ).
thf(sy_c_List_Oproduct__lists,type,
product_lists:
!>[A: $tType] : ( ( list @ ( list @ A ) ) > ( list @ ( list @ A ) ) ) ).
thf(sy_c_List_Osublists,type,
sublists:
!>[A: $tType] : ( ( list @ A ) > ( list @ ( list @ A ) ) ) ).
thf(sy_c_List_Ounion,type,
union:
!>[A: $tType] : ( ( list @ A ) > ( list @ A ) > ( list @ A ) ) ).
thf(sy_c_Nat_Osize__class_Osize,type,
size_size:
!>[A: $tType] : ( A > nat ) ).
thf(sy_c_Orderings_Oord__class_Oless,type,
ord_less:
!>[A: $tType] : ( A > A > $o ) ).
thf(sy_c_Orderings_Oord__class_Oless__eq,type,
ord_less_eq:
!>[A: $tType] : ( A > A > $o ) ).
thf(sy_c_Pure_Otype,type,
type2:
!>[A: $tType] : ( itself @ A ) ).
thf(sy_c_Set_OCollect,type,
collect:
!>[A: $tType] : ( ( A > $o ) > ( set @ A ) ) ).
thf(sy_c_member,type,
member:
!>[A: $tType] : ( A > ( set @ A ) > $o ) ).
thf(sy_v_f,type,
f: n > dtree ).
thf(sy_v_nl,type,
nl: list @ n ).
thf(sy_v_nla____,type,
nla: list @ n ).
%----Relevant facts (255)
thf(fact_0_assms,axiom,
gram_L250615845e_path @ f @ nl ).
% assms
thf(fact_1__C1_Oprems_C,axiom,
gram_L250615845e_path @ f @ nla ).
% "1.prems"
thf(fact_2__C1_Ohyps_C,axiom,
! [Ys: list @ n] :
( ( ord_less @ nat @ ( size_size @ ( list @ n ) @ Ys ) @ ( size_size @ ( list @ n ) @ nla ) )
=> ( ( gram_L250615845e_path @ f @ Ys )
=> ? [Nl: list @ n] :
( ( gram_L250615845e_path @ f @ Nl )
& ( ( hd @ n @ Nl )
= ( hd @ n @ Ys ) )
& ( ( last @ n @ Nl )
= ( last @ n @ Ys ) )
& ( ord_less_eq @ ( set @ n ) @ ( set2 @ n @ Nl ) @ ( set2 @ n @ Ys ) )
& ( distinct @ n @ Nl ) ) ) ) ).
% "1.hyps"
thf(fact_3_path__NE,axiom,
! [F: n > dtree,Nl2: list @ n] :
( ( gram_L250615845e_path @ F @ Nl2 )
=> ( Nl2
!= ( nil @ n ) ) ) ).
% path_NE
thf(fact_4_path_OBase,axiom,
! [F: n > dtree,N: n] : ( gram_L250615845e_path @ F @ ( cons @ n @ N @ ( nil @ n ) ) ) ).
% path.Base
thf(fact_5_path__post,axiom,
! [F: n > dtree,N: n,Nl2: list @ n] :
( ( gram_L250615845e_path @ F @ ( cons @ n @ N @ Nl2 ) )
=> ( ( Nl2
!= ( nil @ n ) )
=> ( gram_L250615845e_path @ F @ Nl2 ) ) ) ).
% path_post
thf(fact_6_path__post__concat,axiom,
! [F: n > dtree,Nl1: list @ n,Nl22: list @ n] :
( ( gram_L250615845e_path @ F @ ( append @ n @ Nl1 @ Nl22 ) )
=> ( ( Nl22
!= ( nil @ n ) )
=> ( gram_L250615845e_path @ F @ Nl22 ) ) ) ).
% path_post_concat
thf(fact_7_path__concat,axiom,
! [F: n > dtree,Nl1: list @ n,Nl22: list @ n] :
( ( gram_L250615845e_path @ F @ Nl1 )
=> ( ( gram_L250615845e_path @ F @ ( cons @ n @ ( last @ n @ Nl1 ) @ Nl22 ) )
=> ( gram_L250615845e_path @ F @ ( append @ n @ Nl1 @ Nl22 ) ) ) ) ).
% path_concat
thf(fact_8_last__snoc,axiom,
! [A: $tType,Xs: list @ A,X: A] :
( ( last @ A @ ( append @ A @ Xs @ ( cons @ A @ X @ ( nil @ A ) ) ) )
= X ) ).
% last_snoc
thf(fact_9_last__appendL,axiom,
! [A: $tType,Ys2: list @ A,Xs: list @ A] :
( ( Ys2
= ( nil @ A ) )
=> ( ( last @ A @ ( append @ A @ Xs @ Ys2 ) )
= ( last @ A @ Xs ) ) ) ).
% last_appendL
thf(fact_10_last__appendR,axiom,
! [A: $tType,Ys2: list @ A,Xs: list @ A] :
( ( Ys2
!= ( nil @ A ) )
=> ( ( last @ A @ ( append @ A @ Xs @ Ys2 ) )
= ( last @ A @ Ys2 ) ) ) ).
% last_appendR
thf(fact_11_hd__append2,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( Xs
!= ( nil @ A ) )
=> ( ( hd @ A @ ( append @ A @ Xs @ Ys2 ) )
= ( hd @ A @ Xs ) ) ) ).
% hd_append2
thf(fact_12_append1__eq__conv,axiom,
! [A: $tType,Xs: list @ A,X: A,Ys2: list @ A,Y: A] :
( ( ( append @ A @ Xs @ ( cons @ A @ X @ ( nil @ A ) ) )
= ( append @ A @ Ys2 @ ( cons @ A @ Y @ ( nil @ A ) ) ) )
= ( ( Xs = Ys2 )
& ( X = Y ) ) ) ).
% append1_eq_conv
thf(fact_13_append__eq__append__conv,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A,Us: list @ A,Vs: list @ A] :
( ( ( ( size_size @ ( list @ A ) @ Xs )
= ( size_size @ ( list @ A ) @ Ys2 ) )
| ( ( size_size @ ( list @ A ) @ Us )
= ( size_size @ ( list @ A ) @ Vs ) ) )
=> ( ( ( append @ A @ Xs @ Us )
= ( append @ A @ Ys2 @ Vs ) )
= ( ( Xs = Ys2 )
& ( Us = Vs ) ) ) ) ).
% append_eq_append_conv
thf(fact_14_append__Nil2,axiom,
! [A: $tType,Xs: list @ A] :
( ( append @ A @ Xs @ ( nil @ A ) )
= Xs ) ).
% append_Nil2
thf(fact_15_append__self__conv,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( ( append @ A @ Xs @ Ys2 )
= Xs )
= ( Ys2
= ( nil @ A ) ) ) ).
% append_self_conv
thf(fact_16_self__append__conv,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( Xs
= ( append @ A @ Xs @ Ys2 ) )
= ( Ys2
= ( nil @ A ) ) ) ).
% self_append_conv
thf(fact_17_append__self__conv2,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( ( append @ A @ Xs @ Ys2 )
= Ys2 )
= ( Xs
= ( nil @ A ) ) ) ).
% append_self_conv2
thf(fact_18_self__append__conv2,axiom,
! [A: $tType,Ys2: list @ A,Xs: list @ A] :
( ( Ys2
= ( append @ A @ Xs @ Ys2 ) )
= ( Xs
= ( nil @ A ) ) ) ).
% self_append_conv2
thf(fact_19_list_Oinject,axiom,
! [A: $tType,X21: A,X22: list @ A,Y21: A,Y22: list @ A] :
( ( ( cons @ A @ X21 @ X22 )
= ( cons @ A @ Y21 @ Y22 ) )
= ( ( X21 = Y21 )
& ( X22 = Y22 ) ) ) ).
% list.inject
thf(fact_20_same__append__eq,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A,Zs: list @ A] :
( ( ( append @ A @ Xs @ Ys2 )
= ( append @ A @ Xs @ Zs ) )
= ( Ys2 = Zs ) ) ).
% same_append_eq
thf(fact_21_append__same__eq,axiom,
! [A: $tType,Ys2: list @ A,Xs: list @ A,Zs: list @ A] :
( ( ( append @ A @ Ys2 @ Xs )
= ( append @ A @ Zs @ Xs ) )
= ( Ys2 = Zs ) ) ).
% append_same_eq
thf(fact_22_append__assoc,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A,Zs: list @ A] :
( ( append @ A @ ( append @ A @ Xs @ Ys2 ) @ Zs )
= ( append @ A @ Xs @ ( append @ A @ Ys2 @ Zs ) ) ) ).
% append_assoc
thf(fact_23_append__is__Nil__conv,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( ( append @ A @ Xs @ Ys2 )
= ( nil @ A ) )
= ( ( Xs
= ( nil @ A ) )
& ( Ys2
= ( nil @ A ) ) ) ) ).
% append_is_Nil_conv
thf(fact_24_Nil__is__append__conv,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( ( nil @ A )
= ( append @ A @ Xs @ Ys2 ) )
= ( ( Xs
= ( nil @ A ) )
& ( Ys2
= ( nil @ A ) ) ) ) ).
% Nil_is_append_conv
thf(fact_25_not__Cons__self2,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( cons @ A @ X @ Xs )
!= Xs ) ).
% not_Cons_self2
thf(fact_26_neq__if__length__neq,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( ( size_size @ ( list @ A ) @ Xs )
!= ( size_size @ ( list @ A ) @ Ys2 ) )
=> ( Xs != Ys2 ) ) ).
% neq_if_length_neq
thf(fact_27_Ex__list__of__length,axiom,
! [A: $tType,N: nat] :
? [Xs2: list @ A] :
( ( size_size @ ( list @ A ) @ Xs2 )
= N ) ).
% Ex_list_of_length
thf(fact_28_append__eq__append__conv2,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A,Zs: list @ A,Ts: list @ A] :
( ( ( append @ A @ Xs @ Ys2 )
= ( append @ A @ Zs @ Ts ) )
= ( ? [Us2: list @ A] :
( ( ( Xs
= ( append @ A @ Zs @ Us2 ) )
& ( ( append @ A @ Us2 @ Ys2 )
= Ts ) )
| ( ( ( append @ A @ Xs @ Us2 )
= Zs )
& ( Ys2
= ( append @ A @ Us2 @ Ts ) ) ) ) ) ) ).
% append_eq_append_conv2
thf(fact_29_append__eq__appendI,axiom,
! [A: $tType,Xs: list @ A,Xs1: list @ A,Zs: list @ A,Ys2: list @ A,Us: list @ A] :
( ( ( append @ A @ Xs @ Xs1 )
= Zs )
=> ( ( Ys2
= ( append @ A @ Xs1 @ Us ) )
=> ( ( append @ A @ Xs @ Ys2 )
= ( append @ A @ Zs @ Us ) ) ) ) ).
% append_eq_appendI
thf(fact_30_map__tailrec__rev_Oinduct,axiom,
! [A: $tType,B: $tType,P: ( A > B ) > ( list @ A ) > ( list @ B ) > $o,A0: A > B,A1: list @ A,A2: list @ B] :
( ! [F2: A > B,X1: list @ B] : ( P @ F2 @ ( nil @ A ) @ X1 )
=> ( ! [F2: A > B,A3: A,As: list @ A,Bs: list @ B] :
( ( P @ F2 @ As @ ( cons @ B @ ( F2 @ A3 ) @ Bs ) )
=> ( P @ F2 @ ( cons @ A @ A3 @ As ) @ Bs ) )
=> ( P @ A0 @ A1 @ A2 ) ) ) ).
% map_tailrec_rev.induct
thf(fact_31_list__nonempty__induct,axiom,
! [A: $tType,Xs: list @ A,P: ( list @ A ) > $o] :
( ( Xs
!= ( nil @ A ) )
=> ( ! [X2: A] : ( P @ ( cons @ A @ X2 @ ( nil @ A ) ) )
=> ( ! [X2: A,Xs2: list @ A] :
( ( Xs2
!= ( nil @ A ) )
=> ( ( P @ Xs2 )
=> ( P @ ( cons @ A @ X2 @ Xs2 ) ) ) )
=> ( P @ Xs ) ) ) ) ).
% list_nonempty_induct
thf(fact_32_remdups__adj_Oinduct,axiom,
! [A: $tType,P: ( list @ A ) > $o,A0: list @ A] :
( ( P @ ( nil @ A ) )
=> ( ! [X2: A] : ( P @ ( cons @ A @ X2 @ ( nil @ A ) ) )
=> ( ! [X2: A,Y2: A,Xs2: list @ A] :
( ( ( X2 = Y2 )
=> ( P @ ( cons @ A @ X2 @ Xs2 ) ) )
=> ( ( ( X2 != Y2 )
=> ( P @ ( cons @ A @ Y2 @ Xs2 ) ) )
=> ( P @ ( cons @ A @ X2 @ ( cons @ A @ Y2 @ Xs2 ) ) ) ) )
=> ( P @ A0 ) ) ) ) ).
% remdups_adj.induct
thf(fact_33_remdups__adj_Ocases,axiom,
! [A: $tType,X: list @ A] :
( ( X
!= ( nil @ A ) )
=> ( ! [X2: A] :
( X
!= ( cons @ A @ X2 @ ( nil @ A ) ) )
=> ~ ! [X2: A,Y2: A,Xs2: list @ A] :
( X
!= ( cons @ A @ X2 @ ( cons @ A @ Y2 @ Xs2 ) ) ) ) ) ).
% remdups_adj.cases
thf(fact_34_transpose_Ocases,axiom,
! [A: $tType,X: list @ ( list @ A )] :
( ( X
!= ( nil @ ( list @ A ) ) )
=> ( ! [Xss: list @ ( list @ A )] :
( X
!= ( cons @ ( list @ A ) @ ( nil @ A ) @ Xss ) )
=> ~ ! [X2: A,Xs2: list @ A,Xss: list @ ( list @ A )] :
( X
!= ( cons @ ( list @ A ) @ ( cons @ A @ X2 @ Xs2 ) @ Xss ) ) ) ) ).
% transpose.cases
thf(fact_35_splice_Oinduct,axiom,
! [A: $tType,P: ( list @ A ) > ( list @ A ) > $o,A0: list @ A,A1: list @ A] :
( ! [X1: list @ A] : ( P @ ( nil @ A ) @ X1 )
=> ( ! [V: A,Va: list @ A] : ( P @ ( cons @ A @ V @ Va ) @ ( nil @ A ) )
=> ( ! [X2: A,Xs2: list @ A,Y2: A,Ys3: list @ A] :
( ( P @ Xs2 @ Ys3 )
=> ( P @ ( cons @ A @ X2 @ Xs2 ) @ ( cons @ A @ Y2 @ Ys3 ) ) )
=> ( P @ A0 @ A1 ) ) ) ) ).
% splice.induct
thf(fact_36_list__induct2_H,axiom,
! [A: $tType,B: $tType,P: ( list @ A ) > ( list @ B ) > $o,Xs: list @ A,Ys2: list @ B] :
( ( P @ ( nil @ A ) @ ( nil @ B ) )
=> ( ! [X2: A,Xs2: list @ A] : ( P @ ( cons @ A @ X2 @ Xs2 ) @ ( nil @ B ) )
=> ( ! [Y2: B,Ys3: list @ B] : ( P @ ( nil @ A ) @ ( cons @ B @ Y2 @ Ys3 ) )
=> ( ! [X2: A,Xs2: list @ A,Y2: B,Ys3: list @ B] :
( ( P @ Xs2 @ Ys3 )
=> ( P @ ( cons @ A @ X2 @ Xs2 ) @ ( cons @ B @ Y2 @ Ys3 ) ) )
=> ( P @ Xs @ Ys2 ) ) ) ) ) ).
% list_induct2'
thf(fact_37_neq__Nil__conv,axiom,
! [A: $tType,Xs: list @ A] :
( ( Xs
!= ( nil @ A ) )
= ( ? [Y3: A,Ys4: list @ A] :
( Xs
= ( cons @ A @ Y3 @ Ys4 ) ) ) ) ).
% neq_Nil_conv
thf(fact_38_list_Oinducts,axiom,
! [A: $tType,P: ( list @ A ) > $o,List: list @ A] :
( ( P @ ( nil @ A ) )
=> ( ! [X1: A,X23: list @ A] :
( ( P @ X23 )
=> ( P @ ( cons @ A @ X1 @ X23 ) ) )
=> ( P @ List ) ) ) ).
% list.inducts
thf(fact_39_list_Oexhaust,axiom,
! [A: $tType,Y: list @ A] :
( ( Y
!= ( nil @ A ) )
=> ~ ! [X212: A,X222: list @ A] :
( Y
!= ( cons @ A @ X212 @ X222 ) ) ) ).
% list.exhaust
thf(fact_40_list_OdiscI,axiom,
! [A: $tType,List: list @ A,X21: A,X22: list @ A] :
( ( List
= ( cons @ A @ X21 @ X22 ) )
=> ( List
!= ( nil @ A ) ) ) ).
% list.discI
thf(fact_41_list_Odistinct_I1_J,axiom,
! [A: $tType,X21: A,X22: list @ A] :
( ( nil @ A )
!= ( cons @ A @ X21 @ X22 ) ) ).
% list.distinct(1)
thf(fact_42_list_Oset__cases,axiom,
! [A: $tType,E: A,A4: list @ A] :
( ( member @ A @ E @ ( set2 @ A @ A4 ) )
=> ( ! [Z2: list @ A] :
( A4
!= ( cons @ A @ E @ Z2 ) )
=> ~ ! [Z1: A,Z2: list @ A] :
( ( A4
= ( cons @ A @ Z1 @ Z2 ) )
=> ~ ( member @ A @ E @ ( set2 @ A @ Z2 ) ) ) ) ) ).
% list.set_cases
thf(fact_43_set__ConsD,axiom,
! [A: $tType,Y: A,X: A,Xs: list @ A] :
( ( member @ A @ Y @ ( set2 @ A @ ( cons @ A @ X @ Xs ) ) )
=> ( ( Y = X )
| ( member @ A @ Y @ ( set2 @ A @ Xs ) ) ) ) ).
% set_ConsD
thf(fact_44_mem__Collect__eq,axiom,
! [A: $tType,A4: A,P: A > $o] :
( ( member @ A @ A4 @ ( collect @ A @ P ) )
= ( P @ A4 ) ) ).
% mem_Collect_eq
thf(fact_45_Collect__mem__eq,axiom,
! [A: $tType,A5: set @ A] :
( ( collect @ A
@ ^ [X3: A] : ( member @ A @ X3 @ A5 ) )
= A5 ) ).
% Collect_mem_eq
thf(fact_46_Collect__cong,axiom,
! [A: $tType,P: A > $o,Q: A > $o] :
( ! [X2: A] :
( ( P @ X2 )
= ( Q @ X2 ) )
=> ( ( collect @ A @ P )
= ( collect @ A @ Q ) ) ) ).
% Collect_cong
thf(fact_47_list_Oset__intros_I1_J,axiom,
! [A: $tType,A1: A,A2: list @ A] : ( member @ A @ A1 @ ( set2 @ A @ ( cons @ A @ A1 @ A2 ) ) ) ).
% list.set_intros(1)
thf(fact_48_list_Oset__intros_I2_J,axiom,
! [A: $tType,X: A,A2: list @ A,A1: A] :
( ( member @ A @ X @ ( set2 @ A @ A2 ) )
=> ( member @ A @ X @ ( set2 @ A @ ( cons @ A @ A1 @ A2 ) ) ) ) ).
% list.set_intros(2)
thf(fact_49_subset__code_I1_J,axiom,
! [A: $tType,Xs: list @ A,B2: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ ( set2 @ A @ Xs ) @ B2 )
= ( ! [X3: A] :
( ( member @ A @ X3 @ ( set2 @ A @ Xs ) )
=> ( member @ A @ X3 @ B2 ) ) ) ) ).
% subset_code(1)
thf(fact_50_length__induct,axiom,
! [A: $tType,P: ( list @ A ) > $o,Xs: list @ A] :
( ! [Xs2: list @ A] :
( ! [Ys: list @ A] :
( ( ord_less @ nat @ ( size_size @ ( list @ A ) @ Ys ) @ ( size_size @ ( list @ A ) @ Xs2 ) )
=> ( P @ Ys ) )
=> ( P @ Xs2 ) )
=> ( P @ Xs ) ) ).
% length_induct
thf(fact_51_append__Cons,axiom,
! [A: $tType,X: A,Xs: list @ A,Ys2: list @ A] :
( ( append @ A @ ( cons @ A @ X @ Xs ) @ Ys2 )
= ( cons @ A @ X @ ( append @ A @ Xs @ Ys2 ) ) ) ).
% append_Cons
thf(fact_52_Cons__eq__appendI,axiom,
! [A: $tType,X: A,Xs1: list @ A,Ys2: list @ A,Xs: list @ A,Zs: list @ A] :
( ( ( cons @ A @ X @ Xs1 )
= Ys2 )
=> ( ( Xs
= ( append @ A @ Xs1 @ Zs ) )
=> ( ( cons @ A @ X @ Xs )
= ( append @ A @ Ys2 @ Zs ) ) ) ) ).
% Cons_eq_appendI
thf(fact_53_append__Nil,axiom,
! [A: $tType,Ys2: list @ A] :
( ( append @ A @ ( nil @ A ) @ Ys2 )
= Ys2 ) ).
% append_Nil
thf(fact_54_eq__Nil__appendI,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( Xs = Ys2 )
=> ( Xs
= ( append @ A @ ( nil @ A ) @ Ys2 ) ) ) ).
% eq_Nil_appendI
thf(fact_55_distinct__length__2__or__more,axiom,
! [A: $tType,A4: A,B3: A,Xs: list @ A] :
( ( distinct @ A @ ( cons @ A @ A4 @ ( cons @ A @ B3 @ Xs ) ) )
= ( ( A4 != B3 )
& ( distinct @ A @ ( cons @ A @ A4 @ Xs ) )
& ( distinct @ A @ ( cons @ A @ B3 @ Xs ) ) ) ) ).
% distinct_length_2_or_more
thf(fact_56_distinct_Osimps_I1_J,axiom,
! [A: $tType] : ( distinct @ A @ ( nil @ A ) ) ).
% distinct.simps(1)
thf(fact_57_list_Osel_I1_J,axiom,
! [A: $tType,X21: A,X22: list @ A] :
( ( hd @ A @ ( cons @ A @ X21 @ X22 ) )
= X21 ) ).
% list.sel(1)
thf(fact_58_set__subset__Cons,axiom,
! [A: $tType,Xs: list @ A,X: A] : ( ord_less_eq @ ( set @ A ) @ ( set2 @ A @ Xs ) @ ( set2 @ A @ ( cons @ A @ X @ Xs ) ) ) ).
% set_subset_Cons
thf(fact_59_list__induct3,axiom,
! [B: $tType,A: $tType,C: $tType,Xs: list @ A,Ys2: list @ B,Zs: list @ C,P: ( list @ A ) > ( list @ B ) > ( list @ C ) > $o] :
( ( ( size_size @ ( list @ A ) @ Xs )
= ( size_size @ ( list @ B ) @ Ys2 ) )
=> ( ( ( size_size @ ( list @ B ) @ Ys2 )
= ( size_size @ ( list @ C ) @ Zs ) )
=> ( ( P @ ( nil @ A ) @ ( nil @ B ) @ ( nil @ C ) )
=> ( ! [X2: A,Xs2: list @ A,Y2: B,Ys3: list @ B,Z: C,Zs2: list @ C] :
( ( ( size_size @ ( list @ A ) @ Xs2 )
= ( size_size @ ( list @ B ) @ Ys3 ) )
=> ( ( ( size_size @ ( list @ B ) @ Ys3 )
= ( size_size @ ( list @ C ) @ Zs2 ) )
=> ( ( P @ Xs2 @ Ys3 @ Zs2 )
=> ( P @ ( cons @ A @ X2 @ Xs2 ) @ ( cons @ B @ Y2 @ Ys3 ) @ ( cons @ C @ Z @ Zs2 ) ) ) ) )
=> ( P @ Xs @ Ys2 @ Zs ) ) ) ) ) ).
% list_induct3
thf(fact_60_list__induct2,axiom,
! [A: $tType,B: $tType,Xs: list @ A,Ys2: list @ B,P: ( list @ A ) > ( list @ B ) > $o] :
( ( ( size_size @ ( list @ A ) @ Xs )
= ( size_size @ ( list @ B ) @ Ys2 ) )
=> ( ( P @ ( nil @ A ) @ ( nil @ B ) )
=> ( ! [X2: A,Xs2: list @ A,Y2: B,Ys3: list @ B] :
( ( ( size_size @ ( list @ A ) @ Xs2 )
= ( size_size @ ( list @ B ) @ Ys3 ) )
=> ( ( P @ Xs2 @ Ys3 )
=> ( P @ ( cons @ A @ X2 @ Xs2 ) @ ( cons @ B @ Y2 @ Ys3 ) ) ) )
=> ( P @ Xs @ Ys2 ) ) ) ) ).
% list_induct2
thf(fact_61_rev__nonempty__induct,axiom,
! [A: $tType,Xs: list @ A,P: ( list @ A ) > $o] :
( ( Xs
!= ( nil @ A ) )
=> ( ! [X2: A] : ( P @ ( cons @ A @ X2 @ ( nil @ A ) ) )
=> ( ! [X2: A,Xs2: list @ A] :
( ( Xs2
!= ( nil @ A ) )
=> ( ( P @ Xs2 )
=> ( P @ ( append @ A @ Xs2 @ ( cons @ A @ X2 @ ( nil @ A ) ) ) ) ) )
=> ( P @ Xs ) ) ) ) ).
% rev_nonempty_induct
thf(fact_62_append__eq__Cons__conv,axiom,
! [A: $tType,Ys2: list @ A,Zs: list @ A,X: A,Xs: list @ A] :
( ( ( append @ A @ Ys2 @ Zs )
= ( cons @ A @ X @ Xs ) )
= ( ( ( Ys2
= ( nil @ A ) )
& ( Zs
= ( cons @ A @ X @ Xs ) ) )
| ? [Ys5: list @ A] :
( ( Ys2
= ( cons @ A @ X @ Ys5 ) )
& ( ( append @ A @ Ys5 @ Zs )
= Xs ) ) ) ) ).
% append_eq_Cons_conv
thf(fact_63_Cons__eq__append__conv,axiom,
! [A: $tType,X: A,Xs: list @ A,Ys2: list @ A,Zs: list @ A] :
( ( ( cons @ A @ X @ Xs )
= ( append @ A @ Ys2 @ Zs ) )
= ( ( ( Ys2
= ( nil @ A ) )
& ( ( cons @ A @ X @ Xs )
= Zs ) )
| ? [Ys5: list @ A] :
( ( ( cons @ A @ X @ Ys5 )
= Ys2 )
& ( Xs
= ( append @ A @ Ys5 @ Zs ) ) ) ) ) ).
% Cons_eq_append_conv
thf(fact_64_rev__exhaust,axiom,
! [A: $tType,Xs: list @ A] :
( ( Xs
!= ( nil @ A ) )
=> ~ ! [Ys3: list @ A,Y2: A] :
( Xs
!= ( append @ A @ Ys3 @ ( cons @ A @ Y2 @ ( nil @ A ) ) ) ) ) ).
% rev_exhaust
thf(fact_65_rev__induct,axiom,
! [A: $tType,P: ( list @ A ) > $o,Xs: list @ A] :
( ( P @ ( nil @ A ) )
=> ( ! [X2: A,Xs2: list @ A] :
( ( P @ Xs2 )
=> ( P @ ( append @ A @ Xs2 @ ( cons @ A @ X2 @ ( nil @ A ) ) ) ) )
=> ( P @ Xs ) ) ) ).
% rev_induct
thf(fact_66_split__list__first__prop__iff,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ( ? [X3: A] :
( ( member @ A @ X3 @ ( set2 @ A @ Xs ) )
& ( P @ X3 ) ) )
= ( ? [Ys4: list @ A,X3: A] :
( ? [Zs3: list @ A] :
( Xs
= ( append @ A @ Ys4 @ ( cons @ A @ X3 @ Zs3 ) ) )
& ( P @ X3 )
& ! [Y3: A] :
( ( member @ A @ Y3 @ ( set2 @ A @ Ys4 ) )
=> ~ ( P @ Y3 ) ) ) ) ) ).
% split_list_first_prop_iff
thf(fact_67_split__list__last__prop__iff,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ( ? [X3: A] :
( ( member @ A @ X3 @ ( set2 @ A @ Xs ) )
& ( P @ X3 ) ) )
= ( ? [Ys4: list @ A,X3: A,Zs3: list @ A] :
( ( Xs
= ( append @ A @ Ys4 @ ( cons @ A @ X3 @ Zs3 ) ) )
& ( P @ X3 )
& ! [Y3: A] :
( ( member @ A @ Y3 @ ( set2 @ A @ Zs3 ) )
=> ~ ( P @ Y3 ) ) ) ) ) ).
% split_list_last_prop_iff
thf(fact_68_in__set__conv__decomp__first,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( member @ A @ X @ ( set2 @ A @ Xs ) )
= ( ? [Ys4: list @ A,Zs3: list @ A] :
( ( Xs
= ( append @ A @ Ys4 @ ( cons @ A @ X @ Zs3 ) ) )
& ~ ( member @ A @ X @ ( set2 @ A @ Ys4 ) ) ) ) ) ).
% in_set_conv_decomp_first
thf(fact_69_in__set__conv__decomp__last,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( member @ A @ X @ ( set2 @ A @ Xs ) )
= ( ? [Ys4: list @ A,Zs3: list @ A] :
( ( Xs
= ( append @ A @ Ys4 @ ( cons @ A @ X @ Zs3 ) ) )
& ~ ( member @ A @ X @ ( set2 @ A @ Zs3 ) ) ) ) ) ).
% in_set_conv_decomp_last
thf(fact_70_split__list__first__propE,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ? [X4: A] :
( ( member @ A @ X4 @ ( set2 @ A @ Xs ) )
& ( P @ X4 ) )
=> ~ ! [Ys3: list @ A,X2: A] :
( ? [Zs2: list @ A] :
( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X2 @ Zs2 ) ) )
=> ( ( P @ X2 )
=> ~ ! [Xa: A] :
( ( member @ A @ Xa @ ( set2 @ A @ Ys3 ) )
=> ~ ( P @ Xa ) ) ) ) ) ).
% split_list_first_propE
thf(fact_71_split__list__last__propE,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ? [X4: A] :
( ( member @ A @ X4 @ ( set2 @ A @ Xs ) )
& ( P @ X4 ) )
=> ~ ! [Ys3: list @ A,X2: A,Zs2: list @ A] :
( ( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X2 @ Zs2 ) ) )
=> ( ( P @ X2 )
=> ~ ! [Xa: A] :
( ( member @ A @ Xa @ ( set2 @ A @ Zs2 ) )
=> ~ ( P @ Xa ) ) ) ) ) ).
% split_list_last_propE
thf(fact_72_split__list__first__prop,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ? [X4: A] :
( ( member @ A @ X4 @ ( set2 @ A @ Xs ) )
& ( P @ X4 ) )
=> ? [Ys3: list @ A,X2: A] :
( ? [Zs2: list @ A] :
( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X2 @ Zs2 ) ) )
& ( P @ X2 )
& ! [Xa: A] :
( ( member @ A @ Xa @ ( set2 @ A @ Ys3 ) )
=> ~ ( P @ Xa ) ) ) ) ).
% split_list_first_prop
thf(fact_73_split__list__last__prop,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ? [X4: A] :
( ( member @ A @ X4 @ ( set2 @ A @ Xs ) )
& ( P @ X4 ) )
=> ? [Ys3: list @ A,X2: A,Zs2: list @ A] :
( ( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X2 @ Zs2 ) ) )
& ( P @ X2 )
& ! [Xa: A] :
( ( member @ A @ Xa @ ( set2 @ A @ Zs2 ) )
=> ~ ( P @ Xa ) ) ) ) ).
% split_list_last_prop
thf(fact_74_in__set__conv__decomp,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( member @ A @ X @ ( set2 @ A @ Xs ) )
= ( ? [Ys4: list @ A,Zs3: list @ A] :
( Xs
= ( append @ A @ Ys4 @ ( cons @ A @ X @ Zs3 ) ) ) ) ) ).
% in_set_conv_decomp
thf(fact_75_split__list__propE,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ? [X4: A] :
( ( member @ A @ X4 @ ( set2 @ A @ Xs ) )
& ( P @ X4 ) )
=> ~ ! [Ys3: list @ A,X2: A] :
( ? [Zs2: list @ A] :
( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X2 @ Zs2 ) ) )
=> ~ ( P @ X2 ) ) ) ).
% split_list_propE
thf(fact_76_split__list__first,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( member @ A @ X @ ( set2 @ A @ Xs ) )
=> ? [Ys3: list @ A,Zs2: list @ A] :
( ( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X @ Zs2 ) ) )
& ~ ( member @ A @ X @ ( set2 @ A @ Ys3 ) ) ) ) ).
% split_list_first
thf(fact_77_split__list__prop,axiom,
! [A: $tType,Xs: list @ A,P: A > $o] :
( ? [X4: A] :
( ( member @ A @ X4 @ ( set2 @ A @ Xs ) )
& ( P @ X4 ) )
=> ? [Ys3: list @ A,X2: A] :
( ? [Zs2: list @ A] :
( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X2 @ Zs2 ) ) )
& ( P @ X2 ) ) ) ).
% split_list_prop
thf(fact_78_split__list__last,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( member @ A @ X @ ( set2 @ A @ Xs ) )
=> ? [Ys3: list @ A,Zs2: list @ A] :
( ( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X @ Zs2 ) ) )
& ~ ( member @ A @ X @ ( set2 @ A @ Zs2 ) ) ) ) ).
% split_list_last
thf(fact_79_split__list,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( member @ A @ X @ ( set2 @ A @ Xs ) )
=> ? [Ys3: list @ A,Zs2: list @ A] :
( Xs
= ( append @ A @ Ys3 @ ( cons @ A @ X @ Zs2 ) ) ) ) ).
% split_list
thf(fact_80_distinct__singleton,axiom,
! [A: $tType,X: A] : ( distinct @ A @ ( cons @ A @ X @ ( nil @ A ) ) ) ).
% distinct_singleton
thf(fact_81_distinct_Osimps_I2_J,axiom,
! [A: $tType,X: A,Xs: list @ A] :
( ( distinct @ A @ ( cons @ A @ X @ Xs ) )
= ( ~ ( member @ A @ X @ ( set2 @ A @ Xs ) )
& ( distinct @ A @ Xs ) ) ) ).
% distinct.simps(2)
thf(fact_82_hd__in__set,axiom,
! [A: $tType,Xs: list @ A] :
( ( Xs
!= ( nil @ A ) )
=> ( member @ A @ ( hd @ A @ Xs ) @ ( set2 @ A @ Xs ) ) ) ).
% hd_in_set
thf(fact_83_list_Oset__sel_I1_J,axiom,
! [A: $tType,A4: list @ A] :
( ( A4
!= ( nil @ A ) )
=> ( member @ A @ ( hd @ A @ A4 ) @ ( set2 @ A @ A4 ) ) ) ).
% list.set_sel(1)
thf(fact_84_last__ConsR,axiom,
! [A: $tType,Xs: list @ A,X: A] :
( ( Xs
!= ( nil @ A ) )
=> ( ( last @ A @ ( cons @ A @ X @ Xs ) )
= ( last @ A @ Xs ) ) ) ).
% last_ConsR
thf(fact_85_last__ConsL,axiom,
! [A: $tType,Xs: list @ A,X: A] :
( ( Xs
= ( nil @ A ) )
=> ( ( last @ A @ ( cons @ A @ X @ Xs ) )
= X ) ) ).
% last_ConsL
thf(fact_86_last_Osimps,axiom,
! [A: $tType,Xs: list @ A,X: A] :
( ( ( Xs
= ( nil @ A ) )
=> ( ( last @ A @ ( cons @ A @ X @ Xs ) )
= X ) )
& ( ( Xs
!= ( nil @ A ) )
=> ( ( last @ A @ ( cons @ A @ X @ Xs ) )
= ( last @ A @ Xs ) ) ) ) ).
% last.simps
thf(fact_87_last__in__set,axiom,
! [A: $tType,As2: list @ A] :
( ( As2
!= ( nil @ A ) )
=> ( member @ A @ ( last @ A @ As2 ) @ ( set2 @ A @ As2 ) ) ) ).
% last_in_set
thf(fact_88_longest__common__prefix,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
? [Ps: list @ A,Xs3: list @ A,Ys6: list @ A] :
( ( Xs
= ( append @ A @ Ps @ Xs3 ) )
& ( Ys2
= ( append @ A @ Ps @ Ys6 ) )
& ( ( Xs3
= ( nil @ A ) )
| ( Ys6
= ( nil @ A ) )
| ( ( hd @ A @ Xs3 )
!= ( hd @ A @ Ys6 ) ) ) ) ).
% longest_common_prefix
thf(fact_89_hd__append,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( ( Xs
= ( nil @ A ) )
=> ( ( hd @ A @ ( append @ A @ Xs @ Ys2 ) )
= ( hd @ A @ Ys2 ) ) )
& ( ( Xs
!= ( nil @ A ) )
=> ( ( hd @ A @ ( append @ A @ Xs @ Ys2 ) )
= ( hd @ A @ Xs ) ) ) ) ).
% hd_append
thf(fact_90_longest__common__suffix,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
? [Ss: list @ A,Xs3: list @ A,Ys6: list @ A] :
( ( Xs
= ( append @ A @ Xs3 @ Ss ) )
& ( Ys2
= ( append @ A @ Ys6 @ Ss ) )
& ( ( Xs3
= ( nil @ A ) )
| ( Ys6
= ( nil @ A ) )
| ( ( last @ A @ Xs3 )
!= ( last @ A @ Ys6 ) ) ) ) ).
% longest_common_suffix
thf(fact_91_last__append,axiom,
! [A: $tType,Ys2: list @ A,Xs: list @ A] :
( ( ( Ys2
= ( nil @ A ) )
=> ( ( last @ A @ ( append @ A @ Xs @ Ys2 ) )
= ( last @ A @ Xs ) ) )
& ( ( Ys2
!= ( nil @ A ) )
=> ( ( last @ A @ ( append @ A @ Xs @ Ys2 ) )
= ( last @ A @ Ys2 ) ) ) ) ).
% last_append
thf(fact_92_not__distinct__decomp,axiom,
! [A: $tType,Ws: list @ A] :
( ~ ( distinct @ A @ Ws )
=> ? [Xs2: list @ A,Ys3: list @ A,Zs2: list @ A,Y2: A] :
( Ws
= ( append @ A @ Xs2 @ ( append @ A @ ( cons @ A @ Y2 @ ( nil @ A ) ) @ ( append @ A @ Ys3 @ ( append @ A @ ( cons @ A @ Y2 @ ( nil @ A ) ) @ Zs2 ) ) ) ) ) ) ).
% not_distinct_decomp
thf(fact_93_not__distinct__conv__prefix,axiom,
! [A: $tType,As2: list @ A] :
( ( ~ ( distinct @ A @ As2 ) )
= ( ? [Xs4: list @ A,Y3: A,Ys4: list @ A] :
( ( member @ A @ Y3 @ ( set2 @ A @ Xs4 ) )
& ( distinct @ A @ Xs4 )
& ( As2
= ( append @ A @ Xs4 @ ( cons @ A @ Y3 @ Ys4 ) ) ) ) ) ) ).
% not_distinct_conv_prefix
thf(fact_94_subset__antisym,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( ord_less_eq @ ( set @ A ) @ B2 @ A5 )
=> ( A5 = B2 ) ) ) ).
% subset_antisym
thf(fact_95_subsetI,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ! [X2: A] :
( ( member @ A @ X2 @ A5 )
=> ( member @ A @ X2 @ B2 ) )
=> ( ord_less_eq @ ( set @ A ) @ A5 @ B2 ) ) ).
% subsetI
thf(fact_96_distinct__union,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A] :
( ( distinct @ A @ ( union @ A @ Xs @ Ys2 ) )
= ( distinct @ A @ Ys2 ) ) ).
% distinct_union
thf(fact_97_order__refl,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A] : ( ord_less_eq @ A @ X @ X ) ) ).
% order_refl
thf(fact_98_set__n__lists,axiom,
! [A: $tType,N: nat,Xs: list @ A] :
( ( set2 @ ( list @ A ) @ ( n_lists @ A @ N @ Xs ) )
= ( collect @ ( list @ A )
@ ^ [Ys4: list @ A] :
( ( ( size_size @ ( list @ A ) @ Ys4 )
= N )
& ( ord_less_eq @ ( set @ A ) @ ( set2 @ A @ Ys4 ) @ ( set2 @ A @ Xs ) ) ) ) ) ).
% set_n_lists
thf(fact_99_complete__interval,axiom,
! [A: $tType] :
( ( condit1037483654norder @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,P: A > $o] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ( P @ A4 )
=> ( ~ ( P @ B3 )
=> ? [C2: A] :
( ( ord_less_eq @ A @ A4 @ C2 )
& ( ord_less_eq @ A @ C2 @ B3 )
& ! [X4: A] :
( ( ( ord_less_eq @ A @ A4 @ X4 )
& ( ord_less @ A @ X4 @ C2 ) )
=> ( P @ X4 ) )
& ! [D: A] :
( ! [X2: A] :
( ( ( ord_less_eq @ A @ A4 @ X2 )
& ( ord_less @ A @ X2 @ D ) )
=> ( P @ X2 ) )
=> ( ord_less_eq @ A @ D @ C2 ) ) ) ) ) ) ) ).
% complete_interval
thf(fact_100_order_Onot__eq__order__implies__strict,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A] :
( ( A4 != B3 )
=> ( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ord_less @ A @ A4 @ B3 ) ) ) ) ).
% order.not_eq_order_implies_strict
thf(fact_101_dual__order_Ostrict__implies__order,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A] :
( ( ord_less @ A @ B3 @ A4 )
=> ( ord_less_eq @ A @ B3 @ A4 ) ) ) ).
% dual_order.strict_implies_order
thf(fact_102_dual__order_Ostrict__iff__order,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ( ( ord_less @ A )
= ( ^ [B4: A,A6: A] :
( ( ord_less_eq @ A @ B4 @ A6 )
& ( A6 != B4 ) ) ) ) ) ).
% dual_order.strict_iff_order
thf(fact_103_dual__order_Oorder__iff__strict,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ( ( ord_less_eq @ A )
= ( ^ [B4: A,A6: A] :
( ( ord_less @ A @ B4 @ A6 )
| ( A6 = B4 ) ) ) ) ) ).
% dual_order.order_iff_strict
thf(fact_104_psubsetI,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( A5 != B2 )
=> ( ord_less @ ( set @ A ) @ A5 @ B2 ) ) ) ).
% psubsetI
thf(fact_105_psubsetE,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ( ord_less @ ( set @ A ) @ A5 @ B2 )
=> ~ ( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ord_less_eq @ ( set @ A ) @ B2 @ A5 ) ) ) ).
% psubsetE
thf(fact_106_psubset__eq,axiom,
! [A: $tType] :
( ( ord_less @ ( set @ A ) )
= ( ^ [A7: set @ A,B5: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ A7 @ B5 )
& ( A7 != B5 ) ) ) ) ).
% psubset_eq
thf(fact_107_psubset__imp__subset,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ( ord_less @ ( set @ A ) @ A5 @ B2 )
=> ( ord_less_eq @ ( set @ A ) @ A5 @ B2 ) ) ).
% psubset_imp_subset
thf(fact_108_psubset__subset__trans,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C3: set @ A] :
( ( ord_less @ ( set @ A ) @ A5 @ B2 )
=> ( ( ord_less_eq @ ( set @ A ) @ B2 @ C3 )
=> ( ord_less @ ( set @ A ) @ A5 @ C3 ) ) ) ).
% psubset_subset_trans
thf(fact_109_subset__not__subset__eq,axiom,
! [A: $tType] :
( ( ord_less @ ( set @ A ) )
= ( ^ [A7: set @ A,B5: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ A7 @ B5 )
& ~ ( ord_less_eq @ ( set @ A ) @ B5 @ A7 ) ) ) ) ).
% subset_not_subset_eq
thf(fact_110_subset__psubset__trans,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C3: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( ord_less @ ( set @ A ) @ B2 @ C3 )
=> ( ord_less @ ( set @ A ) @ A5 @ C3 ) ) ) ).
% subset_psubset_trans
thf(fact_111_subset__iff__psubset__eq,axiom,
! [A: $tType] :
( ( ord_less_eq @ ( set @ A ) )
= ( ^ [A7: set @ A,B5: set @ A] :
( ( ord_less @ ( set @ A ) @ A7 @ B5 )
| ( A7 = B5 ) ) ) ) ).
% subset_iff_psubset_eq
thf(fact_112_length__n__lists__elem,axiom,
! [A: $tType,Ys2: list @ A,N: nat,Xs: list @ A] :
( ( member @ ( list @ A ) @ Ys2 @ ( set2 @ ( list @ A ) @ ( n_lists @ A @ N @ Xs ) ) )
=> ( ( size_size @ ( list @ A ) @ Ys2 )
= N ) ) ).
% length_n_lists_elem
thf(fact_113_less__eq__set__def,axiom,
! [A: $tType] :
( ( ord_less_eq @ ( set @ A ) )
= ( ^ [A7: set @ A,B5: set @ A] :
( ord_less_eq @ ( A > $o )
@ ^ [X3: A] : ( member @ A @ X3 @ A7 )
@ ^ [X3: A] : ( member @ A @ X3 @ B5 ) ) ) ) ).
% less_eq_set_def
thf(fact_114_impossible__Cons,axiom,
! [A: $tType,Xs: list @ A,Ys2: list @ A,X: A] :
( ( ord_less_eq @ nat @ ( size_size @ ( list @ A ) @ Xs ) @ ( size_size @ ( list @ A ) @ Ys2 ) )
=> ( Xs
!= ( cons @ A @ X @ Ys2 ) ) ) ).
% impossible_Cons
thf(fact_115_le__funD,axiom,
! [B: $tType,A: $tType] :
( ( ord @ B @ ( type2 @ B ) )
=> ! [F: A > B,G: A > B,X: A] :
( ( ord_less_eq @ ( A > B ) @ F @ G )
=> ( ord_less_eq @ B @ ( F @ X ) @ ( G @ X ) ) ) ) ).
% le_funD
thf(fact_116_le__funE,axiom,
! [B: $tType,A: $tType] :
( ( ord @ B @ ( type2 @ B ) )
=> ! [F: A > B,G: A > B,X: A] :
( ( ord_less_eq @ ( A > B ) @ F @ G )
=> ( ord_less_eq @ B @ ( F @ X ) @ ( G @ X ) ) ) ) ).
% le_funE
thf(fact_117_le__funI,axiom,
! [B: $tType,A: $tType] :
( ( ord @ B @ ( type2 @ B ) )
=> ! [F: A > B,G: A > B] :
( ! [X2: A] : ( ord_less_eq @ B @ ( F @ X2 ) @ ( G @ X2 ) )
=> ( ord_less_eq @ ( A > B ) @ F @ G ) ) ) ).
% le_funI
thf(fact_118_le__fun__def,axiom,
! [B: $tType,A: $tType] :
( ( ord @ B @ ( type2 @ B ) )
=> ( ( ord_less_eq @ ( A > B ) )
= ( ^ [F3: A > B,G2: A > B] :
! [X3: A] : ( ord_less_eq @ B @ ( F3 @ X3 ) @ ( G2 @ X3 ) ) ) ) ) ).
% le_fun_def
thf(fact_119_order__subst1,axiom,
! [A: $tType,B: $tType] :
( ( ( order @ B @ ( type2 @ B ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,F: B > A,B3: B,C4: B] :
( ( ord_less_eq @ A @ A4 @ ( F @ B3 ) )
=> ( ( ord_less_eq @ B @ B3 @ C4 )
=> ( ! [X2: B,Y2: B] :
( ( ord_less_eq @ B @ X2 @ Y2 )
=> ( ord_less_eq @ A @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less_eq @ A @ A4 @ ( F @ C4 ) ) ) ) ) ) ).
% order_subst1
thf(fact_120_order__subst2,axiom,
! [A: $tType,C: $tType] :
( ( ( order @ C @ ( type2 @ C ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,B3: A,F: A > C,C4: C] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( ord_less_eq @ C @ ( F @ B3 ) @ C4 )
=> ( ! [X2: A,Y2: A] :
( ( ord_less_eq @ A @ X2 @ Y2 )
=> ( ord_less_eq @ C @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less_eq @ C @ ( F @ A4 ) @ C4 ) ) ) ) ) ).
% order_subst2
thf(fact_121_ord__eq__le__subst,axiom,
! [A: $tType,B: $tType] :
( ( ( ord @ B @ ( type2 @ B ) )
& ( ord @ A @ ( type2 @ A ) ) )
=> ! [A4: A,F: B > A,B3: B,C4: B] :
( ( A4
= ( F @ B3 ) )
=> ( ( ord_less_eq @ B @ B3 @ C4 )
=> ( ! [X2: B,Y2: B] :
( ( ord_less_eq @ B @ X2 @ Y2 )
=> ( ord_less_eq @ A @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less_eq @ A @ A4 @ ( F @ C4 ) ) ) ) ) ) ).
% ord_eq_le_subst
thf(fact_122_ord__le__eq__subst,axiom,
! [A: $tType,B: $tType] :
( ( ( ord @ B @ ( type2 @ B ) )
& ( ord @ A @ ( type2 @ A ) ) )
=> ! [A4: A,B3: A,F: A > B,C4: B] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( ( F @ B3 )
= C4 )
=> ( ! [X2: A,Y2: A] :
( ( ord_less_eq @ A @ X2 @ Y2 )
=> ( ord_less_eq @ B @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less_eq @ B @ ( F @ A4 ) @ C4 ) ) ) ) ) ).
% ord_le_eq_subst
thf(fact_123_eq__iff,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ( ( ^ [Y4: A,Z3: A] : ( Y4 = Z3 ) )
= ( ^ [X3: A,Y3: A] :
( ( ord_less_eq @ A @ X3 @ Y3 )
& ( ord_less_eq @ A @ Y3 @ X3 ) ) ) ) ) ).
% eq_iff
thf(fact_124_antisym,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less_eq @ A @ X @ Y )
=> ( ( ord_less_eq @ A @ Y @ X )
=> ( X = Y ) ) ) ) ).
% antisym
thf(fact_125_linear,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less_eq @ A @ X @ Y )
| ( ord_less_eq @ A @ Y @ X ) ) ) ).
% linear
thf(fact_126_eq__refl,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( X = Y )
=> ( ord_less_eq @ A @ X @ Y ) ) ) ).
% eq_refl
thf(fact_127_le__cases,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ~ ( ord_less_eq @ A @ X @ Y )
=> ( ord_less_eq @ A @ Y @ X ) ) ) ).
% le_cases
thf(fact_128_order_Otrans,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( ord_less_eq @ A @ B3 @ C4 )
=> ( ord_less_eq @ A @ A4 @ C4 ) ) ) ) ).
% order.trans
thf(fact_129_le__cases3,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A,Z4: A] :
( ( ( ord_less_eq @ A @ X @ Y )
=> ~ ( ord_less_eq @ A @ Y @ Z4 ) )
=> ( ( ( ord_less_eq @ A @ Y @ X )
=> ~ ( ord_less_eq @ A @ X @ Z4 ) )
=> ( ( ( ord_less_eq @ A @ X @ Z4 )
=> ~ ( ord_less_eq @ A @ Z4 @ Y ) )
=> ( ( ( ord_less_eq @ A @ Z4 @ Y )
=> ~ ( ord_less_eq @ A @ Y @ X ) )
=> ( ( ( ord_less_eq @ A @ Y @ Z4 )
=> ~ ( ord_less_eq @ A @ Z4 @ X ) )
=> ~ ( ( ord_less_eq @ A @ Z4 @ X )
=> ~ ( ord_less_eq @ A @ X @ Y ) ) ) ) ) ) ) ) ).
% le_cases3
thf(fact_130_antisym__conv,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [Y: A,X: A] :
( ( ord_less_eq @ A @ Y @ X )
=> ( ( ord_less_eq @ A @ X @ Y )
= ( X = Y ) ) ) ) ).
% antisym_conv
thf(fact_131_ord__eq__le__trans,axiom,
! [A: $tType] :
( ( ord @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( A4 = B3 )
=> ( ( ord_less_eq @ A @ B3 @ C4 )
=> ( ord_less_eq @ A @ A4 @ C4 ) ) ) ) ).
% ord_eq_le_trans
thf(fact_132_ord__le__eq__trans,axiom,
! [A: $tType] :
( ( ord @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( B3 = C4 )
=> ( ord_less_eq @ A @ A4 @ C4 ) ) ) ) ).
% ord_le_eq_trans
thf(fact_133_order__class_Oorder_Oantisym,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( ord_less_eq @ A @ B3 @ A4 )
=> ( A4 = B3 ) ) ) ) ).
% order_class.order.antisym
thf(fact_134_order__trans,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A,Z4: A] :
( ( ord_less_eq @ A @ X @ Y )
=> ( ( ord_less_eq @ A @ Y @ Z4 )
=> ( ord_less_eq @ A @ X @ Z4 ) ) ) ) ).
% order_trans
thf(fact_135_dual__order_Orefl,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A] : ( ord_less_eq @ A @ A4 @ A4 ) ) ).
% dual_order.refl
thf(fact_136_linorder__wlog,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [P: A > A > $o,A4: A,B3: A] :
( ! [A3: A,B6: A] :
( ( ord_less_eq @ A @ A3 @ B6 )
=> ( P @ A3 @ B6 ) )
=> ( ! [A3: A,B6: A] :
( ( P @ B6 @ A3 )
=> ( P @ A3 @ B6 ) )
=> ( P @ A4 @ B3 ) ) ) ) ).
% linorder_wlog
thf(fact_137_dual__order_Otrans,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A,C4: A] :
( ( ord_less_eq @ A @ B3 @ A4 )
=> ( ( ord_less_eq @ A @ C4 @ B3 )
=> ( ord_less_eq @ A @ C4 @ A4 ) ) ) ) ).
% dual_order.trans
thf(fact_138_dual__order_Oantisym,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A] :
( ( ord_less_eq @ A @ B3 @ A4 )
=> ( ( ord_less_eq @ A @ A4 @ B3 )
=> ( A4 = B3 ) ) ) ) ).
% dual_order.antisym
thf(fact_139_ord__eq__less__subst,axiom,
! [A: $tType,B: $tType] :
( ( ( ord @ B @ ( type2 @ B ) )
& ( ord @ A @ ( type2 @ A ) ) )
=> ! [A4: A,F: B > A,B3: B,C4: B] :
( ( A4
= ( F @ B3 ) )
=> ( ( ord_less @ B @ B3 @ C4 )
=> ( ! [X2: B,Y2: B] :
( ( ord_less @ B @ X2 @ Y2 )
=> ( ord_less @ A @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ A @ A4 @ ( F @ C4 ) ) ) ) ) ) ).
% ord_eq_less_subst
thf(fact_140_ord__less__eq__subst,axiom,
! [A: $tType,B: $tType] :
( ( ( ord @ B @ ( type2 @ B ) )
& ( ord @ A @ ( type2 @ A ) ) )
=> ! [A4: A,B3: A,F: A > B,C4: B] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ( ( F @ B3 )
= C4 )
=> ( ! [X2: A,Y2: A] :
( ( ord_less @ A @ X2 @ Y2 )
=> ( ord_less @ B @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ B @ ( F @ A4 ) @ C4 ) ) ) ) ) ).
% ord_less_eq_subst
thf(fact_141_order__less__subst1,axiom,
! [A: $tType,B: $tType] :
( ( ( order @ B @ ( type2 @ B ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,F: B > A,B3: B,C4: B] :
( ( ord_less @ A @ A4 @ ( F @ B3 ) )
=> ( ( ord_less @ B @ B3 @ C4 )
=> ( ! [X2: B,Y2: B] :
( ( ord_less @ B @ X2 @ Y2 )
=> ( ord_less @ A @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ A @ A4 @ ( F @ C4 ) ) ) ) ) ) ).
% order_less_subst1
thf(fact_142_order__less__subst2,axiom,
! [A: $tType,C: $tType] :
( ( ( order @ C @ ( type2 @ C ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,B3: A,F: A > C,C4: C] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ( ord_less @ C @ ( F @ B3 ) @ C4 )
=> ( ! [X2: A,Y2: A] :
( ( ord_less @ A @ X2 @ Y2 )
=> ( ord_less @ C @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ C @ ( F @ A4 ) @ C4 ) ) ) ) ) ).
% order_less_subst2
thf(fact_143_lt__ex,axiom,
! [A: $tType] :
( ( no_bot @ A @ ( type2 @ A ) )
=> ! [X: A] :
? [Y2: A] : ( ord_less @ A @ Y2 @ X ) ) ).
% lt_ex
thf(fact_144_gt__ex,axiom,
! [A: $tType] :
( ( no_top @ A @ ( type2 @ A ) )
=> ! [X: A] :
? [X1: A] : ( ord_less @ A @ X @ X1 ) ) ).
% gt_ex
thf(fact_145_neqE,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( X != Y )
=> ( ~ ( ord_less @ A @ X @ Y )
=> ( ord_less @ A @ Y @ X ) ) ) ) ).
% neqE
thf(fact_146_neq__iff,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( X != Y )
= ( ( ord_less @ A @ X @ Y )
| ( ord_less @ A @ Y @ X ) ) ) ) ).
% neq_iff
thf(fact_147_order_Oasym,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A] :
( ( ord_less @ A @ A4 @ B3 )
=> ~ ( ord_less @ A @ B3 @ A4 ) ) ) ).
% order.asym
thf(fact_148_dense,axiom,
! [A: $tType] :
( ( dense_order @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ? [Z: A] :
( ( ord_less @ A @ X @ Z )
& ( ord_less @ A @ Z @ Y ) ) ) ) ).
% dense
thf(fact_149_less__imp__neq,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ( X != Y ) ) ) ).
% less_imp_neq
thf(fact_150_less__asym,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ~ ( ord_less @ A @ Y @ X ) ) ) ).
% less_asym
thf(fact_151_less__asym_H,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A] :
( ( ord_less @ A @ A4 @ B3 )
=> ~ ( ord_less @ A @ B3 @ A4 ) ) ) ).
% less_asym'
thf(fact_152_less__trans,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A,Z4: A] :
( ( ord_less @ A @ X @ Y )
=> ( ( ord_less @ A @ Y @ Z4 )
=> ( ord_less @ A @ X @ Z4 ) ) ) ) ).
% less_trans
thf(fact_153_less__linear,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
| ( X = Y )
| ( ord_less @ A @ Y @ X ) ) ) ).
% less_linear
thf(fact_154_less__irrefl,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A] :
~ ( ord_less @ A @ X @ X ) ) ).
% less_irrefl
thf(fact_155_ord__eq__less__trans,axiom,
! [A: $tType] :
( ( ord @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( A4 = B3 )
=> ( ( ord_less @ A @ B3 @ C4 )
=> ( ord_less @ A @ A4 @ C4 ) ) ) ) ).
% ord_eq_less_trans
thf(fact_156_ord__less__eq__trans,axiom,
! [A: $tType] :
( ( ord @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ( B3 = C4 )
=> ( ord_less @ A @ A4 @ C4 ) ) ) ) ).
% ord_less_eq_trans
thf(fact_157_dual__order_Oasym,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A] :
( ( ord_less @ A @ B3 @ A4 )
=> ~ ( ord_less @ A @ A4 @ B3 ) ) ) ).
% dual_order.asym
thf(fact_158_less__imp__not__eq,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ( X != Y ) ) ) ).
% less_imp_not_eq
thf(fact_159_less__not__sym,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ~ ( ord_less @ A @ Y @ X ) ) ) ).
% less_not_sym
thf(fact_160_less__induct,axiom,
! [A: $tType] :
( ( wellorder @ A @ ( type2 @ A ) )
=> ! [P: A > $o,A4: A] :
( ! [X2: A] :
( ! [Y5: A] :
( ( ord_less @ A @ Y5 @ X2 )
=> ( P @ Y5 ) )
=> ( P @ X2 ) )
=> ( P @ A4 ) ) ) ).
% less_induct
thf(fact_161_antisym__conv3,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [Y: A,X: A] :
( ~ ( ord_less @ A @ Y @ X )
=> ( ( ~ ( ord_less @ A @ X @ Y ) )
= ( X = Y ) ) ) ) ).
% antisym_conv3
thf(fact_162_less__imp__not__eq2,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ( Y != X ) ) ) ).
% less_imp_not_eq2
thf(fact_163_less__imp__triv,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A,P: $o] :
( ( ord_less @ A @ X @ Y )
=> ( ( ord_less @ A @ Y @ X )
=> P ) ) ) ).
% less_imp_triv
thf(fact_164_linorder__cases,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ~ ( ord_less @ A @ X @ Y )
=> ( ( X != Y )
=> ( ord_less @ A @ Y @ X ) ) ) ) ).
% linorder_cases
thf(fact_165_dual__order_Oirrefl,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A] :
~ ( ord_less @ A @ A4 @ A4 ) ) ).
% dual_order.irrefl
thf(fact_166_order_Ostrict__trans,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ( ord_less @ A @ B3 @ C4 )
=> ( ord_less @ A @ A4 @ C4 ) ) ) ) ).
% order.strict_trans
thf(fact_167_less__imp__not__less,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ~ ( ord_less @ A @ Y @ X ) ) ) ).
% less_imp_not_less
thf(fact_168_dual__order_Ostrict__trans,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A,C4: A] :
( ( ord_less @ A @ B3 @ A4 )
=> ( ( ord_less @ A @ C4 @ B3 )
=> ( ord_less @ A @ C4 @ A4 ) ) ) ) ).
% dual_order.strict_trans
thf(fact_169_not__less__iff__gr__or__eq,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ~ ( ord_less @ A @ X @ Y ) )
= ( ( ord_less @ A @ Y @ X )
| ( X = Y ) ) ) ) ).
% not_less_iff_gr_or_eq
thf(fact_170_order_Ostrict__implies__not__eq,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A] :
( ( ord_less @ A @ A4 @ B3 )
=> ( A4 != B3 ) ) ) ).
% order.strict_implies_not_eq
thf(fact_171_dual__order_Ostrict__implies__not__eq,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A] :
( ( ord_less @ A @ B3 @ A4 )
=> ( A4 != B3 ) ) ) ).
% dual_order.strict_implies_not_eq
thf(fact_172_ex__gt__or__lt,axiom,
! [A: $tType] :
( ( condit1656338222tinuum @ A @ ( type2 @ A ) )
=> ! [A4: A] :
? [B6: A] :
( ( ord_less @ A @ A4 @ B6 )
| ( ord_less @ A @ B6 @ A4 ) ) ) ).
% ex_gt_or_lt
thf(fact_173_set__mp,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,X: A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( member @ A @ X @ A5 )
=> ( member @ A @ X @ B2 ) ) ) ).
% set_mp
thf(fact_174_in__mono,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,X: A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( member @ A @ X @ A5 )
=> ( member @ A @ X @ B2 ) ) ) ).
% in_mono
thf(fact_175_subsetD,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C4: A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( member @ A @ C4 @ A5 )
=> ( member @ A @ C4 @ B2 ) ) ) ).
% subsetD
thf(fact_176_subsetCE,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C4: A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( member @ A @ C4 @ A5 )
=> ( member @ A @ C4 @ B2 ) ) ) ).
% subsetCE
thf(fact_177_equalityE,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ( A5 = B2 )
=> ~ ( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ~ ( ord_less_eq @ ( set @ A ) @ B2 @ A5 ) ) ) ).
% equalityE
thf(fact_178_subset__eq,axiom,
! [A: $tType] :
( ( ord_less_eq @ ( set @ A ) )
= ( ^ [A7: set @ A,B5: set @ A] :
! [X3: A] :
( ( member @ A @ X3 @ A7 )
=> ( member @ A @ X3 @ B5 ) ) ) ) ).
% subset_eq
thf(fact_179_equalityD1,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ( A5 = B2 )
=> ( ord_less_eq @ ( set @ A ) @ A5 @ B2 ) ) ).
% equalityD1
thf(fact_180_equalityD2,axiom,
! [A: $tType,A5: set @ A,B2: set @ A] :
( ( A5 = B2 )
=> ( ord_less_eq @ ( set @ A ) @ B2 @ A5 ) ) ).
% equalityD2
thf(fact_181_set__rev__mp,axiom,
! [A: $tType,X: A,A5: set @ A,B2: set @ A] :
( ( member @ A @ X @ A5 )
=> ( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( member @ A @ X @ B2 ) ) ) ).
% set_rev_mp
thf(fact_182_subset__iff,axiom,
! [A: $tType] :
( ( ord_less_eq @ ( set @ A ) )
= ( ^ [A7: set @ A,B5: set @ A] :
! [T: A] :
( ( member @ A @ T @ A7 )
=> ( member @ A @ T @ B5 ) ) ) ) ).
% subset_iff
thf(fact_183_rev__subsetD,axiom,
! [A: $tType,C4: A,A5: set @ A,B2: set @ A] :
( ( member @ A @ C4 @ A5 )
=> ( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( member @ A @ C4 @ B2 ) ) ) ).
% rev_subsetD
thf(fact_184_subset__refl,axiom,
! [A: $tType,A5: set @ A] : ( ord_less_eq @ ( set @ A ) @ A5 @ A5 ) ).
% subset_refl
thf(fact_185_Collect__mono,axiom,
! [A: $tType,P: A > $o,Q: A > $o] :
( ! [X2: A] :
( ( P @ X2 )
=> ( Q @ X2 ) )
=> ( ord_less_eq @ ( set @ A ) @ ( collect @ A @ P ) @ ( collect @ A @ Q ) ) ) ).
% Collect_mono
thf(fact_186_subset__trans,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C3: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ( ord_less_eq @ ( set @ A ) @ B2 @ C3 )
=> ( ord_less_eq @ ( set @ A ) @ A5 @ C3 ) ) ) ).
% subset_trans
thf(fact_187_set__eq__subset,axiom,
! [A: $tType] :
( ( ^ [Y4: set @ A,Z3: set @ A] : ( Y4 = Z3 ) )
= ( ^ [A7: set @ A,B5: set @ A] :
( ( ord_less_eq @ ( set @ A ) @ A7 @ B5 )
& ( ord_less_eq @ ( set @ A ) @ B5 @ A7 ) ) ) ) ).
% set_eq_subset
thf(fact_188_contra__subsetD,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C4: A] :
( ( ord_less_eq @ ( set @ A ) @ A5 @ B2 )
=> ( ~ ( member @ A @ C4 @ B2 )
=> ~ ( member @ A @ C4 @ A5 ) ) ) ).
% contra_subsetD
thf(fact_189_Collect__mono__iff,axiom,
! [A: $tType,P: A > $o,Q: A > $o] :
( ( ord_less_eq @ ( set @ A ) @ ( collect @ A @ P ) @ ( collect @ A @ Q ) )
= ( ! [X3: A] :
( ( P @ X3 )
=> ( Q @ X3 ) ) ) ) ).
% Collect_mono_iff
thf(fact_190_leD,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [Y: A,X: A] :
( ( ord_less_eq @ A @ Y @ X )
=> ~ ( ord_less @ A @ X @ Y ) ) ) ).
% leD
thf(fact_191_leI,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ~ ( ord_less @ A @ X @ Y )
=> ( ord_less_eq @ A @ Y @ X ) ) ) ).
% leI
thf(fact_192_le__less,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ( ( ord_less_eq @ A )
= ( ^ [X3: A,Y3: A] :
( ( ord_less @ A @ X3 @ Y3 )
| ( X3 = Y3 ) ) ) ) ) ).
% le_less
thf(fact_193_less__le,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ( ( ord_less @ A )
= ( ^ [X3: A,Y3: A] :
( ( ord_less_eq @ A @ X3 @ Y3 )
& ( X3 != Y3 ) ) ) ) ) ).
% less_le
thf(fact_194_order__le__less__subst1,axiom,
! [A: $tType,B: $tType] :
( ( ( order @ B @ ( type2 @ B ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,F: B > A,B3: B,C4: B] :
( ( ord_less_eq @ A @ A4 @ ( F @ B3 ) )
=> ( ( ord_less @ B @ B3 @ C4 )
=> ( ! [X2: B,Y2: B] :
( ( ord_less @ B @ X2 @ Y2 )
=> ( ord_less @ A @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ A @ A4 @ ( F @ C4 ) ) ) ) ) ) ).
% order_le_less_subst1
thf(fact_195_order__le__less__subst2,axiom,
! [A: $tType,C: $tType] :
( ( ( order @ C @ ( type2 @ C ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,B3: A,F: A > C,C4: C] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( ord_less @ C @ ( F @ B3 ) @ C4 )
=> ( ! [X2: A,Y2: A] :
( ( ord_less_eq @ A @ X2 @ Y2 )
=> ( ord_less_eq @ C @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ C @ ( F @ A4 ) @ C4 ) ) ) ) ) ).
% order_le_less_subst2
thf(fact_196_order__less__le__subst1,axiom,
! [A: $tType,B: $tType] :
( ( ( order @ B @ ( type2 @ B ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,F: B > A,B3: B,C4: B] :
( ( ord_less @ A @ A4 @ ( F @ B3 ) )
=> ( ( ord_less_eq @ B @ B3 @ C4 )
=> ( ! [X2: B,Y2: B] :
( ( ord_less_eq @ B @ X2 @ Y2 )
=> ( ord_less_eq @ A @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ A @ A4 @ ( F @ C4 ) ) ) ) ) ) ).
% order_less_le_subst1
thf(fact_197_order__less__le__subst2,axiom,
! [A: $tType,C: $tType] :
( ( ( order @ C @ ( type2 @ C ) )
& ( order @ A @ ( type2 @ A ) ) )
=> ! [A4: A,B3: A,F: A > C,C4: C] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ( ord_less_eq @ C @ ( F @ B3 ) @ C4 )
=> ( ! [X2: A,Y2: A] :
( ( ord_less @ A @ X2 @ Y2 )
=> ( ord_less @ C @ ( F @ X2 ) @ ( F @ Y2 ) ) )
=> ( ord_less @ C @ ( F @ A4 ) @ C4 ) ) ) ) ) ).
% order_less_le_subst2
thf(fact_198_not__le,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ~ ( ord_less_eq @ A @ X @ Y ) )
= ( ord_less @ A @ Y @ X ) ) ) ).
% not_le
thf(fact_199_not__less,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ~ ( ord_less @ A @ X @ Y ) )
= ( ord_less_eq @ A @ Y @ X ) ) ) ).
% not_less
thf(fact_200_le__neq__trans,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( A4 != B3 )
=> ( ord_less @ A @ A4 @ B3 ) ) ) ) ).
% le_neq_trans
thf(fact_201_less__imp__le,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less @ A @ X @ Y )
=> ( ord_less_eq @ A @ X @ Y ) ) ) ).
% less_imp_le
thf(fact_202_antisym__conv1,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ~ ( ord_less @ A @ X @ Y )
=> ( ( ord_less_eq @ A @ X @ Y )
= ( X = Y ) ) ) ) ).
% antisym_conv1
thf(fact_203_antisym__conv2,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less_eq @ A @ X @ Y )
=> ( ( ~ ( ord_less @ A @ X @ Y ) )
= ( X = Y ) ) ) ) ).
% antisym_conv2
thf(fact_204_le__less__trans,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A,Z4: A] :
( ( ord_less_eq @ A @ X @ Y )
=> ( ( ord_less @ A @ Y @ Z4 )
=> ( ord_less @ A @ X @ Z4 ) ) ) ) ).
% le_less_trans
thf(fact_205_less__le__trans,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A,Z4: A] :
( ( ord_less @ A @ X @ Y )
=> ( ( ord_less_eq @ A @ Y @ Z4 )
=> ( ord_less @ A @ X @ Z4 ) ) ) ) ).
% less_le_trans
thf(fact_206_dense__ge,axiom,
! [A: $tType] :
( ( dense_linorder @ A @ ( type2 @ A ) )
=> ! [Z4: A,Y: A] :
( ! [X2: A] :
( ( ord_less @ A @ Z4 @ X2 )
=> ( ord_less_eq @ A @ Y @ X2 ) )
=> ( ord_less_eq @ A @ Y @ Z4 ) ) ) ).
% dense_ge
thf(fact_207_dense__le,axiom,
! [A: $tType] :
( ( dense_linorder @ A @ ( type2 @ A ) )
=> ! [Y: A,Z4: A] :
( ! [X2: A] :
( ( ord_less @ A @ X2 @ Y )
=> ( ord_less_eq @ A @ X2 @ Z4 ) )
=> ( ord_less_eq @ A @ Y @ Z4 ) ) ) ).
% dense_le
thf(fact_208_le__less__linear,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less_eq @ A @ X @ Y )
| ( ord_less @ A @ Y @ X ) ) ) ).
% le_less_linear
thf(fact_209_le__imp__less__or__eq,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A] :
( ( ord_less_eq @ A @ X @ Y )
=> ( ( ord_less @ A @ X @ Y )
| ( X = Y ) ) ) ) ).
% le_imp_less_or_eq
thf(fact_210_less__le__not__le,axiom,
! [A: $tType] :
( ( preorder @ A @ ( type2 @ A ) )
=> ( ( ord_less @ A )
= ( ^ [X3: A,Y3: A] :
( ( ord_less_eq @ A @ X3 @ Y3 )
& ~ ( ord_less_eq @ A @ Y3 @ X3 ) ) ) ) ) ).
% less_le_not_le
thf(fact_211_not__le__imp__less,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [Y: A,X: A] :
( ~ ( ord_less_eq @ A @ Y @ X )
=> ( ord_less @ A @ X @ Y ) ) ) ).
% not_le_imp_less
thf(fact_212_order_Ostrict__trans1,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( ord_less_eq @ A @ A4 @ B3 )
=> ( ( ord_less @ A @ B3 @ C4 )
=> ( ord_less @ A @ A4 @ C4 ) ) ) ) ).
% order.strict_trans1
thf(fact_213_order_Ostrict__trans2,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A,C4: A] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ( ord_less_eq @ A @ B3 @ C4 )
=> ( ord_less @ A @ A4 @ C4 ) ) ) ) ).
% order.strict_trans2
thf(fact_214_order_Oorder__iff__strict,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ( ( ord_less_eq @ A )
= ( ^ [A6: A,B4: A] :
( ( ord_less @ A @ A6 @ B4 )
| ( A6 = B4 ) ) ) ) ) ).
% order.order_iff_strict
thf(fact_215_order_Ostrict__iff__order,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ( ( ord_less @ A )
= ( ^ [A6: A,B4: A] :
( ( ord_less_eq @ A @ A6 @ B4 )
& ( A6 != B4 ) ) ) ) ) ).
% order.strict_iff_order
thf(fact_216_dual__order_Ostrict__trans1,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A,C4: A] :
( ( ord_less_eq @ A @ B3 @ A4 )
=> ( ( ord_less @ A @ C4 @ B3 )
=> ( ord_less @ A @ C4 @ A4 ) ) ) ) ).
% dual_order.strict_trans1
thf(fact_217_dual__order_Ostrict__trans2,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [B3: A,A4: A,C4: A] :
( ( ord_less @ A @ B3 @ A4 )
=> ( ( ord_less_eq @ A @ C4 @ B3 )
=> ( ord_less @ A @ C4 @ A4 ) ) ) ) ).
% dual_order.strict_trans2
thf(fact_218_dense__ge__bounded,axiom,
! [A: $tType] :
( ( dense_linorder @ A @ ( type2 @ A ) )
=> ! [Z4: A,X: A,Y: A] :
( ( ord_less @ A @ Z4 @ X )
=> ( ! [W: A] :
( ( ord_less @ A @ Z4 @ W )
=> ( ( ord_less @ A @ W @ X )
=> ( ord_less_eq @ A @ Y @ W ) ) )
=> ( ord_less_eq @ A @ Y @ Z4 ) ) ) ) ).
% dense_ge_bounded
thf(fact_219_dense__le__bounded,axiom,
! [A: $tType] :
( ( dense_linorder @ A @ ( type2 @ A ) )
=> ! [X: A,Y: A,Z4: A] :
( ( ord_less @ A @ X @ Y )
=> ( ! [W: A] :
( ( ord_less @ A @ X @ W )
=> ( ( ord_less @ A @ W @ Y )
=> ( ord_less_eq @ A @ W @ Z4 ) ) )
=> ( ord_less_eq @ A @ Y @ Z4 ) ) ) ) ).
% dense_le_bounded
thf(fact_220_order_Ostrict__implies__order,axiom,
! [A: $tType] :
( ( order @ A @ ( type2 @ A ) )
=> ! [A4: A,B3: A] :
( ( ord_less @ A @ A4 @ B3 )
=> ( ord_less_eq @ A @ A4 @ B3 ) ) ) ).
% order.strict_implies_order
thf(fact_221_distinct__n__lists,axiom,
! [A: $tType,Xs: list @ A,N: nat] :
( ( distinct @ A @ Xs )
=> ( distinct @ ( list @ A ) @ ( n_lists @ A @ N @ Xs ) ) ) ).
% distinct_n_lists
thf(fact_222_sublists_Osimps_I1_J,axiom,
! [A: $tType] :
( ( sublists @ A @ ( nil @ A ) )
= ( cons @ ( list @ A ) @ ( nil @ A ) @ ( nil @ ( list @ A ) ) ) ) ).
% sublists.simps(1)
thf(fact_223_minf_I8_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ~ ( ord_less_eq @ A @ T2 @ X4 ) ) ) ).
% minf(8)
thf(fact_224_minf_I6_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ( ord_less_eq @ A @ X4 @ T2 ) ) ) ).
% minf(6)
thf(fact_225_pinf_I8_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ( ord_less_eq @ A @ T2 @ X4 ) ) ) ).
% pinf(8)
thf(fact_226_predicate1I,axiom,
! [A: $tType,P: A > $o,Q: A > $o] :
( ! [X2: A] :
( ( P @ X2 )
=> ( Q @ X2 ) )
=> ( ord_less_eq @ ( A > $o ) @ P @ Q ) ) ).
% predicate1I
thf(fact_227_rev__predicate1D,axiom,
! [A: $tType,P: A > $o,X: A,Q: A > $o] :
( ( P @ X )
=> ( ( ord_less_eq @ ( A > $o ) @ P @ Q )
=> ( Q @ X ) ) ) ).
% rev_predicate1D
thf(fact_228_less__fun__def,axiom,
! [B: $tType,A: $tType] :
( ( ord @ B @ ( type2 @ B ) )
=> ( ( ord_less @ ( A > B ) )
= ( ^ [F3: A > B,G2: A > B] :
( ( ord_less_eq @ ( A > B ) @ F3 @ G2 )
& ~ ( ord_less_eq @ ( A > B ) @ G2 @ F3 ) ) ) ) ) ).
% less_fun_def
thf(fact_229_predicate1D,axiom,
! [A: $tType,P: A > $o,Q: A > $o,X: A] :
( ( ord_less_eq @ ( A > $o ) @ P @ Q )
=> ( ( P @ X )
=> ( Q @ X ) ) ) ).
% predicate1D
thf(fact_230_psubset__trans,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C3: set @ A] :
( ( ord_less @ ( set @ A ) @ A5 @ B2 )
=> ( ( ord_less @ ( set @ A ) @ B2 @ C3 )
=> ( ord_less @ ( set @ A ) @ A5 @ C3 ) ) ) ).
% psubset_trans
thf(fact_231_less__set__def,axiom,
! [A: $tType] :
( ( ord_less @ ( set @ A ) )
= ( ^ [A7: set @ A,B5: set @ A] :
( ord_less @ ( A > $o )
@ ^ [X3: A] : ( member @ A @ X3 @ A7 )
@ ^ [X3: A] : ( member @ A @ X3 @ B5 ) ) ) ) ).
% less_set_def
thf(fact_232_psubsetD,axiom,
! [A: $tType,A5: set @ A,B2: set @ A,C4: A] :
( ( ord_less @ ( set @ A ) @ A5 @ B2 )
=> ( ( member @ A @ C4 @ A5 )
=> ( member @ A @ C4 @ B2 ) ) ) ).
% psubsetD
thf(fact_233_pinf_I1_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [P: A > $o,P2: A > $o,Q: A > $o,Q2: A > $o] :
( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ Z5 @ X2 )
=> ( ( P @ X2 )
= ( P2 @ X2 ) ) )
=> ( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ Z5 @ X2 )
=> ( ( Q @ X2 )
= ( Q2 @ X2 ) ) )
=> ? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ( ( ( P @ X4 )
& ( Q @ X4 ) )
= ( ( P2 @ X4 )
& ( Q2 @ X4 ) ) ) ) ) ) ) ).
% pinf(1)
thf(fact_234_pinf_I2_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [P: A > $o,P2: A > $o,Q: A > $o,Q2: A > $o] :
( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ Z5 @ X2 )
=> ( ( P @ X2 )
= ( P2 @ X2 ) ) )
=> ( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ Z5 @ X2 )
=> ( ( Q @ X2 )
= ( Q2 @ X2 ) ) )
=> ? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ( ( ( P @ X4 )
| ( Q @ X4 ) )
= ( ( P2 @ X4 )
| ( Q2 @ X4 ) ) ) ) ) ) ) ).
% pinf(2)
thf(fact_235_pinf_I3_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ( X4 != T2 ) ) ) ).
% pinf(3)
thf(fact_236_pinf_I4_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ( X4 != T2 ) ) ) ).
% pinf(4)
thf(fact_237_pinf_I5_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ~ ( ord_less @ A @ X4 @ T2 ) ) ) ).
% pinf(5)
thf(fact_238_pinf_I7_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ( ord_less @ A @ T2 @ X4 ) ) ) ).
% pinf(7)
thf(fact_239_pinf_I11_J,axiom,
! [C: $tType,D2: $tType] :
( ( ord @ C @ ( type2 @ C ) )
=> ! [F4: D2] :
? [Z: C] :
! [X4: C] :
( ( ord_less @ C @ Z @ X4 )
=> ( F4 = F4 ) ) ) ).
% pinf(11)
thf(fact_240_minf_I1_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [P: A > $o,P2: A > $o,Q: A > $o,Q2: A > $o] :
( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ X2 @ Z5 )
=> ( ( P @ X2 )
= ( P2 @ X2 ) ) )
=> ( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ X2 @ Z5 )
=> ( ( Q @ X2 )
= ( Q2 @ X2 ) ) )
=> ? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ( ( ( P @ X4 )
& ( Q @ X4 ) )
= ( ( P2 @ X4 )
& ( Q2 @ X4 ) ) ) ) ) ) ) ).
% minf(1)
thf(fact_241_minf_I2_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [P: A > $o,P2: A > $o,Q: A > $o,Q2: A > $o] :
( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ X2 @ Z5 )
=> ( ( P @ X2 )
= ( P2 @ X2 ) ) )
=> ( ? [Z5: A] :
! [X2: A] :
( ( ord_less @ A @ X2 @ Z5 )
=> ( ( Q @ X2 )
= ( Q2 @ X2 ) ) )
=> ? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ( ( ( P @ X4 )
| ( Q @ X4 ) )
= ( ( P2 @ X4 )
| ( Q2 @ X4 ) ) ) ) ) ) ) ).
% minf(2)
thf(fact_242_minf_I3_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ( X4 != T2 ) ) ) ).
% minf(3)
thf(fact_243_minf_I4_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ( X4 != T2 ) ) ) ).
% minf(4)
thf(fact_244_minf_I5_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ( ord_less @ A @ X4 @ T2 ) ) ) ).
% minf(5)
thf(fact_245_minf_I7_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ X4 @ Z )
=> ~ ( ord_less @ A @ T2 @ X4 ) ) ) ).
% minf(7)
thf(fact_246_minf_I11_J,axiom,
! [C: $tType,D2: $tType] :
( ( ord @ C @ ( type2 @ C ) )
=> ! [F4: D2] :
? [Z: C] :
! [X4: C] :
( ( ord_less @ C @ X4 @ Z )
=> ( F4 = F4 ) ) ) ).
% minf(11)
thf(fact_247_pinf_I6_J,axiom,
! [A: $tType] :
( ( linorder @ A @ ( type2 @ A ) )
=> ! [T2: A] :
? [Z: A] :
! [X4: A] :
( ( ord_less @ A @ Z @ X4 )
=> ~ ( ord_less_eq @ A @ X4 @ T2 ) ) ) ).
% pinf(6)
thf(fact_248_pred__subset__eq,axiom,
! [A: $tType,R: set @ A,S: set @ A] :
( ( ord_less_eq @ ( A > $o )
@ ^ [X3: A] : ( member @ A @ X3 @ R )
@ ^ [X3: A] : ( member @ A @ X3 @ S ) )
= ( ord_less_eq @ ( set @ A ) @ R @ S ) ) ).
% pred_subset_eq
thf(fact_249_distinct__product__lists,axiom,
! [A: $tType,Xss2: list @ ( list @ A )] :
( ! [X2: list @ A] :
( ( member @ ( list @ A ) @ X2 @ ( set2 @ ( list @ A ) @ Xss2 ) )
=> ( distinct @ A @ X2 ) )
=> ( distinct @ ( list @ A ) @ ( product_lists @ A @ Xss2 ) ) ) ).
% distinct_product_lists
thf(fact_250_in__set__product__lists__length,axiom,
! [A: $tType,Xs: list @ A,Xss2: list @ ( list @ A )] :
( ( member @ ( list @ A ) @ Xs @ ( set2 @ ( list @ A ) @ ( product_lists @ A @ Xss2 ) ) )
=> ( ( size_size @ ( list @ A ) @ Xs )
= ( size_size @ ( list @ ( list @ A ) ) @ Xss2 ) ) ) ).
% in_set_product_lists_length
thf(fact_251_product__lists_Osimps_I1_J,axiom,
! [A: $tType] :
( ( product_lists @ A @ ( nil @ ( list @ A ) ) )
= ( cons @ ( list @ A ) @ ( nil @ A ) @ ( nil @ ( list @ A ) ) ) ) ).
% product_lists.simps(1)
thf(fact_252_nat__less__le,axiom,
( ( ord_less @ nat )
= ( ^ [M: nat,N2: nat] :
( ( ord_less_eq @ nat @ M @ N2 )
& ( M != N2 ) ) ) ) ).
% nat_less_le
thf(fact_253_less__imp__le__nat,axiom,
! [M2: nat,N: nat] :
( ( ord_less @ nat @ M2 @ N )
=> ( ord_less_eq @ nat @ M2 @ N ) ) ).
% less_imp_le_nat
thf(fact_254_nat__neq__iff,axiom,
! [M2: nat,N: nat] :
( ( M2 != N )
= ( ( ord_less @ nat @ M2 @ N )
| ( ord_less @ nat @ N @ M2 ) ) ) ).
% nat_neq_iff
%----Type constructors (17)
thf(tcon_fun___Orderings_Opreorder,axiom,
! [A8: $tType,A9: $tType] :
( ( preorder @ A9 @ ( type2 @ A9 ) )
=> ( preorder @ ( A8 > A9 ) @ ( type2 @ ( A8 > A9 ) ) ) ) ).
thf(tcon_fun___Orderings_Oorder,axiom,
! [A8: $tType,A9: $tType] :
( ( order @ A9 @ ( type2 @ A9 ) )
=> ( order @ ( A8 > A9 ) @ ( type2 @ ( A8 > A9 ) ) ) ) ).
thf(tcon_fun___Orderings_Oord,axiom,
! [A8: $tType,A9: $tType] :
( ( ord @ A9 @ ( type2 @ A9 ) )
=> ( ord @ ( A8 > A9 ) @ ( type2 @ ( A8 > A9 ) ) ) ) ).
thf(tcon_Nat_Onat___Conditionally__Complete__Lattices_Oconditionally__complete__linorder,axiom,
condit1037483654norder @ nat @ ( type2 @ nat ) ).
thf(tcon_Nat_Onat___Orderings_Owellorder,axiom,
wellorder @ nat @ ( type2 @ nat ) ).
thf(tcon_Nat_Onat___Orderings_Opreorder_1,axiom,
preorder @ nat @ ( type2 @ nat ) ).
thf(tcon_Nat_Onat___Orderings_Olinorder,axiom,
linorder @ nat @ ( type2 @ nat ) ).
thf(tcon_Nat_Onat___Orderings_Ono__top,axiom,
no_top @ nat @ ( type2 @ nat ) ).
thf(tcon_Nat_Onat___Orderings_Oorder_2,axiom,
order @ nat @ ( type2 @ nat ) ).
thf(tcon_Nat_Onat___Orderings_Oord_3,axiom,
ord @ nat @ ( type2 @ nat ) ).
thf(tcon_Set_Oset___Orderings_Opreorder_4,axiom,
! [A8: $tType] : ( preorder @ ( set @ A8 ) @ ( type2 @ ( set @ A8 ) ) ) ).
thf(tcon_Set_Oset___Orderings_Oorder_5,axiom,
! [A8: $tType] : ( order @ ( set @ A8 ) @ ( type2 @ ( set @ A8 ) ) ) ).
thf(tcon_Set_Oset___Orderings_Oord_6,axiom,
! [A8: $tType] : ( ord @ ( set @ A8 ) @ ( type2 @ ( set @ A8 ) ) ) ).
thf(tcon_HOL_Obool___Orderings_Opreorder_7,axiom,
preorder @ $o @ ( type2 @ $o ) ).
thf(tcon_HOL_Obool___Orderings_Olinorder_8,axiom,
linorder @ $o @ ( type2 @ $o ) ).
thf(tcon_HOL_Obool___Orderings_Oorder_9,axiom,
order @ $o @ ( type2 @ $o ) ).
thf(tcon_HOL_Obool___Orderings_Oord_10,axiom,
ord @ $o @ ( type2 @ $o ) ).
%----Conjectures (1)
thf(conj_0,conjecture,
gram_L250615845e_path @ f @ nla ).
%------------------------------------------------------------------------------