{X Y : AlgebraicGeometry.Scheme} →
  {f : X ⟶ Y} →
    {motive : AlgebraicGeometry.GeometricallyIntegral f → Sort u} →
      ((geometrically_isIntegral : AlgebraicGeometry.geometrically AlgebraicGeometry.IsIntegral f) → motive ⋯) →
        (t : AlgebraicGeometry.GeometricallyIntegral f) → motive t