let UN be Universe; for I being Element of UN
for x being UN -valued ManySortedSet of I holds disjoint-union x is Subset of [:(union (rng x)),I:]
let I be Element of UN; for x being UN -valued ManySortedSet of I holds disjoint-union x is Subset of [:(union (rng x)),I:]
let x be UN -valued ManySortedSet of I; disjoint-union x is Subset of [:(union (rng x)),I:]
union (rng (disjoin x)) c= [:(union (rng x)),I:]
proof
let o be
object ;
TARSKI:def 3 ( not o in union (rng (disjoin x)) or o in [:(union (rng x)),I:] )
assume
o in union (rng (disjoin x))
;
o in [:(union (rng x)),I:]
then consider o9 being
set such that A1:
o in o9
and A2:
o9 in rng (disjoin x)
by TARSKI:def 4;
consider y being
object such that A3:
y in dom (disjoin x)
and A4:
o9 = (disjoin x) . y
by A2, FUNCT_1:def 3;
A5:
y in dom x
by A3, CARD_3:def 3;
A6:
y in I
by A3, PARTFUN1:def 2;
A7:
o in [:(x . y),{y}:]
by A1, A4, A5, CARD_3:def 3;
hence
o in [:(union (rng x)),I:]
by A7;
verum
end;
hence
disjoint-union x is Subset of [:(union (rng x)),I:]
; verum