(R : Type u_1) →
  {A : Type u_2} →
    [inst : Semiring R] →
      [inst_1 : StarMul R] →
        [inst_2 : TrivialStar R] →
          [inst_3 : AddCommGroup A] →
            [inst_4 : Module R A] →
              [inst_5 : StarAddMonoid A] → [inst_6 : StarModule R A] → [Invertible 2] → A →ₗ[R] ↥(selfAdjoint A)