Skip to content
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 4 additions & 0 deletions Mathlib/AlgebraicGeometry/EllipticCurve/Weierstrass.lean
Original file line number Diff line number Diff line change
Expand Up @@ -395,6 +395,10 @@ lemma j_eq_zero (h : W.c₄ = 0) : W.j = 0 := by
lemma j_eq_zero_iff [IsReduced R] : W.j = 0 ↔ W.c₄ = 0 := by
rw [j_eq_zero_iff', pow_eq_zero_iff three_ne_zero]

theorem j_eq {K : Type*} [Field K] (W : WeierstrassCurve K) [W.IsElliptic] :

Copy link
Copy Markdown
Collaborator

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Make this a lemma. Surely K and W are already defined elsewhere. Can you also move this up to right below the definition?

Copy link
Copy Markdown
Collaborator Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

K and W are defined elsewhere (R instead of K, but as a CommRing so can't be used directly).

Copy link
Copy Markdown
Collaborator

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Ah gotcha, this is one of the few stupid files where we don't have W' for R and W for K...

W.j = W.Δ⁻¹ * W.c₄ ^ 3 := by
rw [WeierstrassCurve.j, Units.val_inv_eq_inv_val, WeierstrassCurve.coe_Δ']

section CharTwo

variable [CharP R 2]
Expand Down
Loading