Arguments eq_bigcupl [T U A] B F _ _.
Global Instance eq_bigcup T U : Proper (set_eq ==> pointwise_relation T (@set_eq U) ==> set_eq) bigcup.

Lemma codom_comp T U V (f : U -> T) (g : V -> U) :
codom (f \o g) <--> f @: (codom g).