normal_rel_inv_compat

forall (G : Sort u), forall (one : G), forall (mul : forall (a : G), forall (b : G), G), forall (inv : forall (a : G), G), forall (group_args : @GroupLawArgs.{u} G one mul inv), forall (N : forall (x : G), Prop), forall (normal_args : @NormalSubgroupLawArgs.{u} G one mul inv N), forall (a : G), forall (b : G), forall (h : @NormalRel.{u} G one mul inv N a b), @NormalRel.{u} G one mul inv N (inv a) (inv b)

fun G => fun one => fun mul => fun inv => fun group_args => fun N => fun normal_args => fun a => fun b => fun h => @eq_subst.{u} G N (mul (mul a (mul (inv b) a)) (inv a)) (mul (inv (inv a)) (inv b)) (@group_rel_inv_reassoc.{u} G one mul inv group_args a b) (@normal_conj_closed.{u} G one mul inv N normal_args a (mul (inv b) a) (@normal_rel_symm.{u} G one mul inv group_args N normal_args a b h))