apply IHmultipar.
eapply Par_lc2; apply H0.
Qed.
Hint Resolve multipar_context_independent : DB.

Lemma Good_NoAssn: forall c G D phi, erased_sort (Co phi) -> Good G D -> c `notin` D -> Good ((c, Co phi) :: G) D.
Hint Resolve Good_NoAssn.