∀ {X : AlgebraicGeometry.Scheme},
  autoParam (Nonempty ↥X) AlgebraicGeometry.IsIntegral.nonempty._autoParam →
    autoParam (∀ (U : X.Opens) [Nonempty ↥↑U], IsDomain ↑(X.presheaf.obj (Opposite.op U)))
        AlgebraicGeometry.IsIntegral.component_integral._autoParam →
      AlgebraicGeometry.IsIntegral X