Modular forms

This file defines modular forms and proves some basic properties about them. Including constructing the graded ring of modular forms.

We begin by defining modular forms and cusp forms as extension of SlashInvariantForms then we define the space of modular forms, cusp forms and prove that the product of two modular forms is a modular form.

structure ModularForm (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (k : ℤ) extends SlashInvariantForm Γ k : Type

These are SlashInvariantForm's that are holomorphic and bounded at infinity.

• toFun : UpperHalfPlane → ℂ
• slash_action_eq' (γ : Matrix.SpecialLinearGroup (Fin 2) ℤ) : γ ∈ Γ → SlashAction.map ℂ k γ self.toFun = self.toFun
• holo' : MDifferentiable (modelWithCornersSelf ℂ ℂ) (modelWithCornersSelf ℂ ℂ) ⇑self.toSlashInvariantForm
• bdd_at_infty' (A : Matrix.SpecialLinearGroup (Fin 2) ℤ) : UpperHalfPlane.IsBoundedAtImInfty (SlashAction.map ℂ k A ⇑self.toSlashInvariantForm)

structure CuspForm (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (k : ℤ) extends SlashInvariantForm Γ k : Type

These are SlashInvariantForms that are holomorphic and zero at infinity.

• toFun : UpperHalfPlane → ℂ
• slash_action_eq' (γ : Matrix.SpecialLinearGroup (Fin 2) ℤ) : γ ∈ Γ → SlashAction.map ℂ k γ self.toFun = self.toFun
• holo' : MDifferentiable (modelWithCornersSelf ℂ ℂ) (modelWithCornersSelf ℂ ℂ) ⇑self.toSlashInvariantForm
• zero_at_infty' (A : Matrix.SpecialLinearGroup (Fin 2) ℤ) : UpperHalfPlane.IsZeroAtImInfty (SlashAction.map ℂ k A ⇑self.toSlashInvariantForm)

class ModularFormClass (F : Type u_2) (Γ : outParam (Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ))) (k : outParam ℤ) [FunLike F UpperHalfPlane ℂ] extends SlashInvariantFormClass F Γ k : Prop

ModularFormClass F Γ k says that F is a type of bundled functions that extend SlashInvariantFormClass by requiring that the functions be holomorphic and bounded at infinity.

• slash_action_eq (f : F) (γ : Matrix.SpecialLinearGroup (Fin 2) ℤ) : γ ∈ Γ → SlashAction.map ℂ k γ ⇑f = ⇑f
• holo (f : F) : MDifferentiable (modelWithCornersSelf ℂ ℂ) (modelWithCornersSelf ℂ ℂ) ⇑f
• bdd_at_infty (f : F) (A : Matrix.SpecialLinearGroup (Fin 2) ℤ) : UpperHalfPlane.IsBoundedAtImInfty (SlashAction.map ℂ k A ⇑f)

class CuspFormClass (F : Type u_2) (Γ : outParam (Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ))) (k : outParam ℤ) [FunLike F UpperHalfPlane ℂ] extends SlashInvariantFormClass F Γ k : Prop

CuspFormClass F Γ k says that F is a type of bundled functions that extend SlashInvariantFormClass by requiring that the functions be holomorphic and zero at infinity.

• slash_action_eq (f : F) (γ : Matrix.SpecialLinearGroup (Fin 2) ℤ) : γ ∈ Γ → SlashAction.map ℂ k γ ⇑f = ⇑f
• holo (f : F) : MDifferentiable (modelWithCornersSelf ℂ ℂ) (modelWithCornersSelf ℂ ℂ) ⇑f
• zero_at_infty (f : F) (A : Matrix.SpecialLinearGroup (Fin 2) ℤ) : UpperHalfPlane.IsZeroAtImInfty (SlashAction.map ℂ k A ⇑f)

@[instance 100]

instance ModularForm.funLike (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (k : ℤ) : FunLike (ModularForm Γ k) UpperHalfPlane ℂ

Equations

• ModularForm.funLike Γ k = { coe := fun (f : ModularForm Γ k) => f.toFun, coe_injective' := ⋯ }

@[instance 100]

instance ModularFormClass.modularForm (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (k : ℤ) : ModularFormClass (ModularForm Γ k) Γ k

@[instance 100]

instance CuspForm.funLike (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (k : ℤ) : FunLike (CuspForm Γ k) UpperHalfPlane ℂ

Equations

• CuspForm.funLike Γ k = { coe := fun (f : CuspForm Γ k) => f.toFun, coe_injective' := ⋯ }

@[instance 100]

instance CuspFormClass.cuspForm (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (k : ℤ) : CuspFormClass (CuspForm Γ k) Γ k

theorem ModularForm.toFun_eq_coe {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : ModularForm Γ k) : f.toFun = ⇑f

@[simp]

theorem ModularForm.toSlashInvariantForm_coe {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : ModularForm Γ k) : ⇑f.toSlashInvariantForm = ⇑f

theorem CuspForm.toFun_eq_coe {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {f : CuspForm Γ k} : f.toFun = ⇑f

@[simp]

theorem CuspForm.toSlashInvariantForm_coe {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : CuspForm Γ k) : ⇑f.toSlashInvariantForm = ⇑f

theorem ModularForm.ext {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {f g : ModularForm Γ k} (h : ∀ (x : UpperHalfPlane), f x = g x) : f = g

theorem CuspForm.ext {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {f g : CuspForm Γ k} (h : ∀ (x : UpperHalfPlane), f x = g x) : f = g

def ModularForm.copy {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : ModularForm Γ k) (f' : UpperHalfPlane → ℂ) (h : f' = ⇑f) : ModularForm Γ k

Copy of a ModularForm with a new toFun equal to the old one. Useful to fix definitional equalities.

Equations

• f.copy f' h = { toSlashInvariantForm := f.copy f' h, holo' := ⋯, bdd_at_infty' := ⋯ }

def CuspForm.copy {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : CuspForm Γ k) (f' : UpperHalfPlane → ℂ) (h : f' = ⇑f) : CuspForm Γ k

Copy of a CuspForm with a new toFun equal to the old one. Useful to fix definitional equalities.

Equations

• f.copy f' h = { toSlashInvariantForm := f.copy f' h, holo' := ⋯, zero_at_infty' := ⋯ }

instance ModularForm.add {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Add (ModularForm Γ k)

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem ModularForm.coe_add {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : ModularForm Γ k) : ⇑(f + g) = ⇑f + ⇑g

@[simp]

theorem ModularForm.add_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : ModularForm Γ k) (z : UpperHalfPlane) : (f + g) z = f z + g z

instance ModularForm.instZero {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Zero (ModularForm Γ k)

Equations

• ModularForm.instZero = { zero := { toSlashInvariantForm := 0, holo' := ModularForm.instZero.proof_1, bdd_at_infty' := ⋯ } }

@[simp]

theorem ModularForm.coe_zero {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : ⇑0 = 0

@[simp]

theorem ModularForm.zero_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (z : UpperHalfPlane) : 0 z = 0

instance ModularForm.instSMul {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {α : Type u_1} [SMul α ℂ] [IsScalarTower α ℂ ℂ] : SMul α (ModularForm Γ k)

Equations

• ModularForm.instSMul = { smul := fun (c : α) (f : ModularForm Γ k) => { toSlashInvariantForm := c • f.toSlashInvariantForm, holo' := ⋯, bdd_at_infty' := ⋯ } }

@[simp]

theorem ModularForm.coe_smul {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {α : Type u_1} [SMul α ℂ] [IsScalarTower α ℂ ℂ] (f : ModularForm Γ k) (n : α) : ⇑(n • f) = n • ⇑f

@[simp]

theorem ModularForm.smul_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {α : Type u_1} [SMul α ℂ] [IsScalarTower α ℂ ℂ] (f : ModularForm Γ k) (n : α) (z : UpperHalfPlane) : (n • f) z = n • f z

instance ModularForm.instNeg {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Neg (ModularForm Γ k)

Equations

• ModularForm.instNeg = { neg := fun (f : ModularForm Γ k) => { toSlashInvariantForm := -f.toSlashInvariantForm, holo' := ⋯, bdd_at_infty' := ⋯ } }

@[simp]

theorem ModularForm.coe_neg {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : ModularForm Γ k) : ⇑(-f) = -⇑f

@[simp]

theorem ModularForm.neg_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : ModularForm Γ k) (z : UpperHalfPlane) : (-f) z = -f z

instance ModularForm.instSub {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Sub (ModularForm Γ k)

Equations

• ModularForm.instSub = { sub := fun (f g : ModularForm Γ k) => f + -g }

@[simp]

theorem ModularForm.coe_sub {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : ModularForm Γ k) : ⇑(f - g) = ⇑f - ⇑g

@[simp]

theorem ModularForm.sub_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : ModularForm Γ k) (z : UpperHalfPlane) : (f - g) z = f z - g z

instance ModularForm.instAddCommGroup {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : AddCommGroup (ModularForm Γ k)

Equations

• ModularForm.instAddCommGroup = Function.Injective.addCommGroup (fun (f : ModularForm Γ k) => ⇑f) ⋯ ⋯ ⋯ ⋯ ⋯ ⋯ ⋯

def ModularForm.coeHom {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : ModularForm Γ k →+ UpperHalfPlane → ℂ

Additive coercion from ModularForm to ℍ → ℂ.

Equations

• ModularForm.coeHom = { toFun := fun (f : ModularForm Γ k) => ⇑f, map_zero' := ⋯, map_add' := ⋯ }

@[simp]

theorem ModularForm.coeHom_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : ModularForm Γ k) (a : UpperHalfPlane) : ModularForm.coeHom f a = f a

instance ModularForm.instModuleComplex {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Module ℂ (ModularForm Γ k)

Equations

• ModularForm.instModuleComplex = Function.Injective.module ℂ ModularForm.coeHom ⋯ ⋯

instance ModularForm.instInhabited {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Inhabited (ModularForm Γ k)

Equations

• ModularForm.instInhabited = { default := 0 }

def ModularForm.mul {k_1 k_2 : ℤ} {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} (f : ModularForm Γ k_1) (g : ModularForm Γ k_2) : ModularForm Γ (k_1 + k_2)

The modular form of weight k_1 + k_2 given by the product of two modular forms of weights k_1 and k_2.

Equations

• f.mul g = { toSlashInvariantForm := f.mul g.toSlashInvariantForm, holo' := ⋯, bdd_at_infty' := ⋯ }

@[simp]

theorem ModularForm.mul_coe {k_1 k_2 : ℤ} {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} (f : ModularForm Γ k_1) (g : ModularForm Γ k_2) : ⇑(f.mul g) = ⇑f * ⇑g

def ModularForm.const {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} (x : ℂ) : ModularForm Γ 0

The constant function with value x : ℂ as a modular form of weight 0 and any level.

Equations

• ModularForm.const x = { toSlashInvariantForm := SlashInvariantForm.const x, holo' := ⋯, bdd_at_infty' := ⋯ }

@[simp]

theorem ModularForm.const_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} (x : ℂ) (τ : UpperHalfPlane) : (ModularForm.const x) τ = x

instance ModularForm.instOneOfNatInt {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} : One (ModularForm Γ 0)

Equations

• ModularForm.instOneOfNatInt = { one := let __src := ModularForm.const 1; { toSlashInvariantForm := 1, holo' := ⋯, bdd_at_infty' := ⋯ } }

@[simp]

theorem ModularForm.one_coe_eq_one {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} : ⇑1 = 1

instance ModularForm.instNatCastOfNatInt (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) : NatCast (ModularForm Γ 0)

Equations

• ModularForm.instNatCastOfNatInt Γ = { natCast := fun (n : ℕ) => ModularForm.const ↑n }

@[simp]

theorem ModularForm.coe_natCast (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (n : ℕ) : ⇑↑n = ↑n

theorem ModularForm.toSlashInvariantForm_natCast (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (n : ℕ) : (↑n).toSlashInvariantForm = ↑n

instance ModularForm.instIntCastOfNatInt (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) : IntCast (ModularForm Γ 0)

Equations

• ModularForm.instIntCastOfNatInt Γ = { intCast := fun (z : ℤ) => ModularForm.const ↑z }

@[simp]

theorem ModularForm.coe_intCast (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (z : ℤ) : ⇑↑z = ↑z

theorem ModularForm.toSlashInvariantForm_intCast (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) (z : ℤ) : (↑z).toSlashInvariantForm = ↑z

instance CuspForm.hasAdd {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Add (CuspForm Γ k)

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CuspForm.coe_add {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : CuspForm Γ k) : ⇑(f + g) = ⇑f + ⇑g

@[simp]

theorem CuspForm.add_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : CuspForm Γ k) (z : UpperHalfPlane) : (f + g) z = f z + g z

instance CuspForm.instZero {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Zero (CuspForm Γ k)

Equations

• CuspForm.instZero = { zero := { toSlashInvariantForm := 0, holo' := CuspForm.instZero.proof_1, zero_at_infty' := ⋯ } }

@[simp]

theorem CuspForm.coe_zero {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : ⇑0 = 0

@[simp]

theorem CuspForm.zero_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (z : UpperHalfPlane) : 0 z = 0

instance CuspForm.instSMul {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {α : Type u_2} [SMul α ℂ] [IsScalarTower α ℂ ℂ] : SMul α (CuspForm Γ k)

Equations

• CuspForm.instSMul = { smul := fun (c : α) (f : CuspForm Γ k) => { toSlashInvariantForm := c • f.toSlashInvariantForm, holo' := ⋯, zero_at_infty' := ⋯ } }

@[simp]

theorem CuspForm.coe_smul {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {α : Type u_2} [SMul α ℂ] [IsScalarTower α ℂ ℂ] (f : CuspForm Γ k) (n : α) : ⇑(n • f) = n • ⇑f

@[simp]

theorem CuspForm.smul_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} {α : Type u_2} [SMul α ℂ] [IsScalarTower α ℂ ℂ] (f : CuspForm Γ k) (n : α) {z : UpperHalfPlane} : (n • f) z = n • f z

instance CuspForm.instNeg {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Neg (CuspForm Γ k)

Equations

• CuspForm.instNeg = { neg := fun (f : CuspForm Γ k) => { toSlashInvariantForm := -f.toSlashInvariantForm, holo' := ⋯, zero_at_infty' := ⋯ } }

@[simp]

theorem CuspForm.coe_neg {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : CuspForm Γ k) : ⇑(-f) = -⇑f

@[simp]

theorem CuspForm.neg_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : CuspForm Γ k) (z : UpperHalfPlane) : (-f) z = -f z

instance CuspForm.instSub {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Sub (CuspForm Γ k)

Equations

• CuspForm.instSub = { sub := fun (f g : CuspForm Γ k) => f + -g }

@[simp]

theorem CuspForm.coe_sub {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : CuspForm Γ k) : ⇑(f - g) = ⇑f - ⇑g

@[simp]

theorem CuspForm.sub_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f g : CuspForm Γ k) (z : UpperHalfPlane) : (f - g) z = f z - g z

instance CuspForm.instAddCommGroup {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : AddCommGroup (CuspForm Γ k)

Equations

• CuspForm.instAddCommGroup = Function.Injective.addCommGroup (fun (f : CuspForm Γ k) => ⇑f) ⋯ ⋯ ⋯ ⋯ ⋯ ⋯ ⋯

def CuspForm.coeHom {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : CuspForm Γ k →+ UpperHalfPlane → ℂ

Additive coercion from CuspForm to ℍ → ℂ.

Equations

• CuspForm.coeHom = { toFun := fun (f : CuspForm Γ k) => ⇑f, map_zero' := ⋯, map_add' := ⋯ }

@[simp]

theorem CuspForm.coeHom_apply {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} (f : CuspForm Γ k) (a : UpperHalfPlane) : CuspForm.coeHom f a = f a

instance CuspForm.instModuleComplex {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Module ℂ (CuspForm Γ k)

Equations

• CuspForm.instModuleComplex = Function.Injective.module ℂ CuspForm.coeHom ⋯ ⋯

instance CuspForm.instInhabited {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} : Inhabited (CuspForm Γ k)

Equations

• CuspForm.instInhabited = { default := 0 }

@[instance 99]

instance CuspForm.instModularFormClassOfCuspFormClass {F : Type u_1} {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {k : ℤ} [FunLike F UpperHalfPlane ℂ] [CuspFormClass F Γ k] : ModularFormClass F Γ k

def ModularForm.mcast {a b : ℤ} {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} (h : a = b) (f : ModularForm Γ a) : ModularForm Γ b

Cast for modular forms, which is useful for avoiding Heqs.

Equations

• ModularForm.mcast h f = { toFun := ⇑f, slash_action_eq' := ⋯, holo' := ⋯, bdd_at_infty' := ⋯ }

theorem ModularForm.gradedMonoid_eq_of_cast {Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)} {a b : GradedMonoid (ModularForm Γ)} (h : a.fst = b.fst) (h2 : ModularForm.mcast h a.snd = b.snd) : a = b

instance ModularForm.instGOneInt (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) : GradedMonoid.GOne (ModularForm Γ)

Equations

• ModularForm.instGOneInt Γ = { one := 1 }

instance ModularForm.instGMulInt (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) : GradedMonoid.GMul (ModularForm Γ)

Equations

• ModularForm.instGMulInt Γ = { mul := fun {i j : ℤ} (f : ModularForm Γ i) (g : ModularForm Γ j) => f.mul g }

instance ModularForm.instGCommRing (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) : DirectSum.GCommRing (ModularForm Γ)

Equations

• ModularForm.instGCommRing Γ = DirectSum.GCommRing.mk ⋯

instance ModularForm.instGAlgebra (Γ : Subgroup (Matrix.SpecialLinearGroup (Fin 2) ℤ)) : DirectSum.GAlgebra ℂ (ModularForm Γ)

Equations

• ModularForm.instGAlgebra Γ = { toFun := { toFun := ModularForm.const, map_zero' := ⋯, map_add' := ⋯ }, map_one := ⋯, map_mul := ⋯, commutes := ⋯, smul_def := ⋯ }