(R : Type u_1) →
  [inst : CommSemiring R] →
    (A : Type u_2) →
      [inst_1 : Semiring A] →
        [inst_2 : TopologicalSpace A] →
          (B : Type u_3) →
            [inst_3 : Semiring B] →
              [inst_4 : TopologicalSpace B] → [inst_5 : Algebra R A] → [inst_6 : Algebra R B] → A × B →A[R] A