∀ (k G : Type u) [inst : CommRing k] [inst_1 : Monoid G] (α : Type u),
  (Rep.leftRegularTensorTrivialIsoFree k G α).hom.hom =
    ModuleCat.ofHom
      ↑(((finsuppTensorFinsupp' k G α).trans (Finsupp.domLCongr (Equiv.prodComm G α))).trans
          (Finsupp.curryLinearEquiv k))