theorem
L33 ↗restrictAlong_incl_incl
AlgebraicCurves.Places.Proofs.Place_restrictAlong_inclusion_of_le_of_le.AlgebraicCurve.Place.ITransportSeam.restrictAlong_incl_incl
Source context 10 commands
Surrounding namespaces, section variables, and local commands at this declaration.
section ProofImplementation
namespace AlgebraicCurves.Places.Proofs.Place_restrictAlong_inclusion_of_le_of_le
open _root_.AlgebraicCurve
namespace AlgebraicCurve
open _root_.AlgebraicCurve
namespace Place
open _root_.AlgebraicCurve.Place
namespace ITransportSeam
open _root_.AlgebraicCurve.Place
open _root_.AlgebraicCurveLean source · statement
theorem restrictAlong_incl_incl {K E : Type*} [Field K] [Field E] [Algebra K E]
{S T : IntermediateField K E} (h₁ : S ≤ T) (h₂ : T ≤ S)
(hι₁ : (IntermediateField.inclusion h₁).toRingHom.IsIntegral) (hι₂ :
(IntermediateField.inclusion h₂).toRingHom.IsIntegral)
(W : Place K ↥S) :
(W.restrictAlong (IntermediateField.inclusion h₂) hι₂).restrictAlong
(IntermediateField.inclusion h₁) hι₁ = W