theorem
L28 ↗isIntegral_apply
AlgebraicCurves.Foundations.Algebra.Proofs.RingHom_finiteDimensional_adjoin_range_of_finite_of_forall_mem_range.SolChiFinField.isIntegral_apply
Source context 4 commands
Surrounding namespaces, section variables, and local commands at this declaration.
section ProofImplementation
namespace AlgebraicCurves.Foundations.Algebra.Proofs
namespace RingHom_finiteDimensional_adjoin_range_of_finite_of_forall_mem_range
namespace SolChiFinFieldLean source · statement
theorem isIntegral_apply
{R S A K : Type*} [CommRing R] [CommRing S] [Algebra R S] [Algebra.IsIntegral R S]
[CommRing A] [CommRing K] [Algebra A K]
(χ' : S →+* K) (h : ∀ r : R, χ' (algebraMap R S r) ∈ (algebraMap A K).range) (s : S) :
IsIntegral A (χ' s)