feat: mapOfCompatibleSMul is the same map independently of S

[Ljon4ik4]

The mapOfCompatibleSMul : M ⊗[A] N →ₗ[S] M ⊗[R] N is the same map independently of S. This PR adds two lemmas asserting that (one for the underlying AddHom, one for the kernels).

I am not quite sure whether the second one is in the optimal shape: It was the shape useful to me, but maybe there is some better way to phrase it or it should be omitted completely (since it follows from the first one...).

---

[github-actions]

PR summary 962b15edd8

Import changes for modified files

No significant changes to the import graph

Import changes for all files

Files	Import difference

---

Declarations diff (regex)

+ mapOfCompatibleSMul_ker_same
+ mapOfCompatibleSMul_same

You can run this locally as follows

## from your `mathlib4` directory:
git clone https://github.com/leanprover-community/mathlib-ci.git ../mathlib-ci

## summary with just the declaration names:
../mathlib-ci/scripts/pr_summary/declarations_diff.sh <optional_commit>

## more verbose report:
../mathlib-ci/scripts/pr_summary/declarations_diff.sh long <optional_commit>

The doc-module for scripts/pr_summary/declarations_diff.sh in the mathlib-ci repository contains some details about this script.

Declarations diff (Lean)

✅ Lean-aware diff — post-build, computed from the Lean environment (commit 962b15e).

• +2 new declarations
• −0 removed declarations

+TensorProduct.mapOfCompatibleSMul_ker_same
+TensorProduct.mapOfCompatibleSMul_same

---

No changes to strong technical debt.

No changes to weak technical debt.

Current commit 962b15edd8
Reference commit fd1d54bcac

This script lives in the mathlib-ci repository. To run it locally, from your mathlib4 directory:

git clone https://github.com/leanprover-community/mathlib-ci.git ../mathlib-ci
../mathlib-ci/scripts/reporting/technical-debt-metrics.sh pr_summary

• The relative value is the weighted sum of the differences with weight given by the inverse of the current value of the statistic.
• The absolute value is the relative value divided by the total sum of the inverses of the current values (i.e. the weighted average of the differences).