unfold Ru, Vu, C', Gim in |- *.
apply Gunion_disj_LG.
auto.
auto.
auto.
auto.
auto.
auto.
Qed.
Hint Resolve egal_LG_u_1'_2'.

(* Specifications: *)
Theorem union_is_LCF :
l_egal (LG X Vu Ru S') (lunion (LG X V1 R1 S1) (LG X V2 R2 S2)).