{R : Type uR} →
  (A : Type uA) →
    {M₂ : Type uM₂} →
      [inst : CommSemiring R] →
        [inst_1 : CommSemiring A] →
          [inst_2 : AddCommMonoid M₂] →
            [inst_3 : Algebra R A] →
              [inst_4 : Module R M₂] → LinearMap.BilinForm R M₂ → LinearMap.BilinForm A (TensorProduct R A M₂)