Paper XI · Lean source

ProjectorTransport.lean

Selected results recorded Coverage and evidence

Compiler/replay evidence is reported for a subset or bounded block. No whole-work coverage is implied.

This viewer reads the retained source; it does not run Lean or assign new claim mappings.

PaperXI/ProjectorTransport.lean27 lines

Original source pathformalization/PaperXI/ProjectorTransport.lean
Skip declarations and read code

Skip source text

1 import Mathlib.LinearAlgebra.Pi
2 import Mathlib.Tactic
3 
4 /-! Exact reindexing law underlying the Frobenius covariance in Proposition 3.1.
5 This does not yet prove Fourier idempotence or the Weil-group realization.
6 The character weight transforms by the inverse permutation. -/
7 set_option autoImplicit false
8 noncomputable section
9 namespace PaperXI.ProjectorTransport
10 open scoped BigOperators
11 
12 variable {K V G : Type*} [Field K] [AddCommGroup V] [Module K V] [Fintype G]
13 
14 theorem weighted_sum_conjugation (e : G ≃ G) (F : V ≃ₗ[K] V)
15     (T : G → Module.End K V) (w : G → K)
16     (h : ∀ g, F.conj (T g) = T (e g)) :
17     F.conj (∑ g, w g • T g) = ∑ g, w (e.symm g) • T g := by
18   simp only [map_sum, map_smul, h]
19   simpa using (Equiv.sum_comp e (fun g => w (e.symm g) • T g))
20 
21 theorem normalized_sum_conjugation (e : G ≃ G) (F : V ≃ₗ[K] V)
22     (T : G → Module.End K V) (w : G → K) (c : K)
23     (h : ∀ g, F.conj (T g) = T (e g)) :
24     F.conj (c • ∑ g, w g • T g) = c • ∑ g, w (e.symm g) • T g := by
25   rw [map_smul, weighted_sum_conjugation e F T w h]
26 
27 end PaperXI.ProjectorTransport

Back to source controls

Original file and source record

This copy matches the recorded source file. Its publication here does not change the work’s review status.

SHA-256: c88eba65d49511600eaef67165160b9de7d6f1dcb5c6f56476feb8a5259b3592

Original source on GitHub

Back to Paper XI: Packets, Arithmetic Realization, and Conditional Comparison