Thm* L1,L2:T List, eq1,eq2,eq3,eq4:{T }, L3,L4:T List. Discrete{T}  eq1 = eq2  eq2 = eq3  eq3 = eq4  L1(~eq1)L2  L3(~eq2)L4  (L1( eq3)L3  L2( eq4)L4) | [sublist_functionality_wrt_id_list_iso_list_iso] |
Thm* L1,L2:T List, eq1,eq2:{T }, L3,L4:T List. Discrete{T}  eq1 = eq2  L1 = L2  L3(~eq1)L4  (L1( eq2)L3  L2( eq2)L4) | [sublist_functionality_wrt_id_id_list_iso] |
Thm* L1,L2:T List, eq1,eq2,eq3:{T }, L3,L4:T List. Discrete{T}  eq1 = eq2  eq2 = eq3  L1(~eq1)L2  L3(~eq2)L4  (L1 @ L3)(~eq3)(L2 @ L4) | [append_functionality_wrt_list_iso] |
Thm* L1,L2:T List, eq1,eq2,eq3:{T }, L3,L4:T List. Discrete{T}  eq1 = eq2  eq2 = eq3  L1( eq1)L2  L3( eq2)L4  (L1 @ L3)( eq3)(L2 @ L4) | [append_functionality_wrt_sublist] |