(R : Type u_1) →
  (A : Type u_2) →
    [inst : CommSemiring R] →
      [inst_1 : Semiring A] →
        [HopfAlgebra R A] → (G : Type u_3) → [inst_3 : AddGroup G] → HopfAlgebraStruct R (AddMonoidAlgebra A G)