awhecmu/canonical-drafter-extract-mathlib huggingface dataset:
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
⊢ IsLocallySurjective J (FA := FA) (CA := CA) (f₁ ≫ f₂) ↔ IsLocallySurjective J (FA := FA) (CA := CA) f₂

Tactic:
isLocallySurjective_iff_of_fac J rfl

Premises used: CategoryTheory.Presheaf.isLocallySurjective_iff_of_fac, rfl
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
K : GrothendieckTopology.{v, u} C
hJK : J ≤ K
F G : Functor.{v, v', u, u'} Cᵒᵖ A
f : F ⟶ G
h : IsLocallySurjective J (FA := FA) (CA := CA) f
U : C
s : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (G.obj (op U))
a : imageSieve (FA := FA) (CA := CA) f s ∈ (J : (a : C) → Set (Sieve a)) U
⊢ imageSieve (FA := FA) (CA := CA) f s ∈ (K : (a : C) → Set (Sieve a)) U

Tactic:
apply hJK
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
K : GrothendieckTopology.{v, u} C
hJK : J ≤ K
F G : Functor.{v, v', u, u'} Cᵒᵖ A
f : F ⟶ G
h : IsLocallySurjective J (FA := FA) (CA := CA) f
U : C
s : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (G.obj (op U))
⊢ imageSieve (FA := FA) (CA := CA) f s ∈ (J : (a : C) → Set (Sieve a)) U

Tactic:
h.1 _

Premises used: CategoryTheory.Presheaf.IsLocallySurjective.imageSieve_mem
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
K : GrothendieckTopology.{v, u} C
hJK : J ≤ K
F G : Functor.{v, v', u, u'} Cᵒᵖ A
f : F ⟶ G
h : IsLocallySurjective J (FA := FA) (CA := CA) f
U : C
s : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (G.obj (op U))
⊢ imageSieve (FA := FA) (CA := CA) f s ∈ (J : (a : C) → Set (Sieve a)) U

Tactic:
exact h.1 _

Premises used: CategoryTheory.Presheaf.IsLocallySurjective.imageSieve_mem
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
rj :
  Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X))
    (imageSieve (FA := FA) (CA := CA) f₁ x₁)
sj :
  Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X))
    (imageSieve (FA := FA) (CA := CA) f₁ x₂)
⊢ Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S

Tactic:
apply J.intersection_covering

Premises used: CategoryTheory.GrothendieckTopology.intersection_covering
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
⊢ Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X))
    (imageSieve (FA := FA) (CA := CA) f₁ x₁)

Tactic:
apply imageSieve_mem

Premises used: CategoryTheory.Presheaf.imageSieve_mem
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
⊢ Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X))
    (imageSieve (FA := FA) (CA := CA) f₁ x₂)

Tactic:
apply imageSieve_mem

Premises used: CategoryTheory.Presheaf.imageSieve_mem
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
⊢ Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S

Tactic:
have hS : S ∈ J X.unop := by
      apply J.intersection_covering
      all_goals apply imageSieve_mem
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
hS : Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S
T : ⦃Y : C⦄ → (f : Y ⟶ unop X) → S.arrows f → Sieve.{v, u} Y :=
  fun (Y : C) (f : Y ⟶ unop X) (hf : S.arrows f) ↦
    equalizerSieve (FD := FA) (CD := CA) (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯)
      (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯)
⊢ Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X))
    (equalizerSieve (FD := FA) (CD := CA) x₁ x₂)

Tactic:
J.superset_covering ?_ (J.transitive hS (Sieve.bind S.1 T) ?_)

Premises used: CategoryTheory.GrothendieckTopology.superset_covering, CategoryTheory.GrothendieckTopology.transitive, CategoryTheory.Sieve.bind, CategoryTheory.Sieve.arrows
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
hS : Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S
T : ⦃Y : C⦄ → (f : Y ⟶ unop X) → S.arrows f → Sieve.{v, u} Y :=
  fun (Y : C) (f : Y ⟶ unop X) (hf : S.arrows f) ↦
    equalizerSieve (FD := FA) (CD := CA) (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯)
      (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯)
refine_1 : Sieve.bind S.arrows T ≤ equalizerSieve (FD := FA) (CD := CA) x₁ x₂
refine_2 :
  ∀ ⦃Y : C⦄ ⦃f : Y ⟶ unop X⦄, S.arrows f → Sieve.pullback f (Sieve.bind S.arrows T) ∈ (J : (a : C) → Set (Sieve a)) Y
⊢ Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X))
    (equalizerSieve (FD := FA) (CD := CA) x₁ x₂)

Tactic:
refine J.superset_covering ?_ (J.transitive hS (Sieve.bind S.1 T) ?_)

Premises used: CategoryTheory.GrothendieckTopology.superset_covering, CategoryTheory.GrothendieckTopology.transitive, CategoryTheory.Sieve.bind, CategoryTheory.Sieve.arrows
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
hS : Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S
T : ⦃Y : C⦄ → (f : Y ⟶ unop X) → S.arrows f → Sieve.{v, u} Y :=
  fun (Y : C) (f : Y ⟶ unop X) (hf : S.arrows f) ↦
    equalizerSieve (FD := FA) (CD := CA) (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯)
      (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯)
Y Z : C
a : Y ⟶ Z
g : Z ⟶ unop X
hg : S.arrows g
ha : (T g hg).arrows a
⊢ (equalizerSieve (FD := FA) (CD := CA) x₁ x₂).arrows (a ≫ g)

Tactic:
simpa using congr_arg (f₁.app _) ha

Premises used: CategoryTheory.ConcreteCategory.hom, congr_arg, DFunLike.coe, CategoryTheory.NatTrans.app
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
hS : Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S
T : ⦃Y : C⦄ → (f : Y ⟶ unop X) → S.arrows f → Sieve.{v, u} Y :=
  fun (Y : C) (f : Y ⟶ unop X) (hf : S.arrows f) ↦
    equalizerSieve (FD := FA) (CD := CA) (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯)
      (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯)
Y : C
f : Y ⟶ unop X
hf : S.arrows f
refine_2 : T f hf ∈ (J : (a : C) → Set (Sieve a)) Y
⊢ Sieve.pullback f (Sieve.bind S.arrows T) ∈ (J : (a : C) → Set (Sieve a)) Y

Tactic:
apply J.superset_covering (Sieve.le_pullback_bind _ _ _ hf)

Premises used: CategoryTheory.GrothendieckTopology.superset_covering, CategoryTheory.Sieve.le_pullback_bind
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
hS : Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S
T : ⦃Y : C⦄ → (f : Y ⟶ unop X) → S.arrows f → Sieve.{v, u} Y :=
  fun (Y : C) (f : Y ⟶ unop X) (hf : S.arrows f) ↦
    equalizerSieve (FD := FA) (CD := CA) (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯)
      (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯)
Y : C
f : Y ⟶ unop X
hf : S.arrows f
refine_2 :
  Eq (α := CA (F₃.obj (op Y)))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) ((f₁ ≫ f₂).app (op Y)) : (a : CA (F₁.obj (op Y))) → CA (F₃.obj (op Y)))
        (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯) :
      CA (F₃.obj (op Y)))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) ((f₁ ≫ f₂).app (op Y)) : (a : CA (F₁.obj (op Y))) → CA (F₃.obj (op Y)))
        (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯) :
      CA (F₃.obj (op Y)))
⊢ T f hf ∈ (J : (a : C) → Set (Sieve a)) Y

Tactic:
apply equalizerSieve_mem J (f₁ ≫ f₂)

Premises used: CategoryTheory.Presheaf.equalizerSieve_mem, CategoryTheory.CategoryStruct.comp
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
X : Cᵒᵖ
x₁ x₂ : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj X)
h :
  Eq (α := CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₁ : CA (F₃.obj X))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app X) : (a : CA (F₂.obj X)) → CA (F₃.obj X)) x₂ : CA (F₃.obj X))
S : Sieve.{v, u} (unop X) := imageSieve (FA := FA) (CA := CA) f₁ x₁ ⊓ imageSieve (FA := FA) (CA := CA) f₁ x₂
hS : Membership.mem (γ := Set (Sieve.{v, u} (unop X))) ((J : (a : C) → Set (Sieve a)) (unop X)) S
T : ⦃Y : C⦄ → (f : Y ⟶ unop X) → S.arrows f → Sieve.{v, u} Y :=
  fun (Y : C) (f : Y ⟶ unop X) (hf : S.arrows f) ↦
    equalizerSieve (FD := FA) (CD := CA) (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯)
      (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯)
Y : C
f : Y ⟶ unop X
hf : S.arrows f
refine_2 :
  Eq (α := CA (F₃.obj (op Y)))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₁.app (op Y) ≫ f₂.app (op Y)) :
          (a : CA (F₁.obj (op Y))) → CA (F₃.obj (op Y)))
        (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯) :
      CA (F₃.obj (op Y)))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₁.app (op Y) ≫ f₂.app (op Y)) :
          (a : CA (F₁.obj (op Y))) → CA (F₃.obj (op Y)))
        (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯) :
      CA (F₃.obj (op Y)))
⊢ Eq (α := CA (F₃.obj (op Y)))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) ((f₁ ≫ f₂).app (op Y)) : (a : CA (F₁.obj (op Y))) → CA (F₃.obj (op Y)))
        (localPreimage (FA := FA) (CA := CA) f₁ x₁ f ⋯) :
      CA (F₃.obj (op Y)))
    ((ConcreteCategory.hom (FC := FA) (CC := CA) ((f₁ ≫ f₂).app (op Y)) : (a : CA (F₁.obj (op Y))) → CA (F₃.obj (op Y)))
        (localPreimage (FA := FA) (CA := CA) f₁ x₂ f ⋯) :
      CA (F₃.obj (op Y)))

Tactic:
dsimp
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
f₃ : F₁ ⟶ F₃
fac : f₁ ≫ f₂ = f₃
inst_4 : IsLocallyInjective (FD := FA) (CD := CA) J f₃
inst_5 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
⊢ IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)

Tactic:
subst fac
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
inst_5 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
⊢ IsLocallyInjective (FD := FA) (CD := CA) J f₂

Tactic:
isLocallyInjective_of_isLocallyInjective_of_isLocallySurjective J f₁ f₂

Premises used: CategoryTheory.Presheaf.isLocallyInjective_of_isLocallyInjective_of_isLocallySurjective
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallySurjective J (FA := FA) (CA := CA) f₁
inst_5 : IsLocallyInjective (FD := FA) (CD := CA) J (f₁ ≫ f₂)
⊢ IsLocallyInjective (FD := FA) (CD := CA) J f₂

Tactic:
exact isLocallyInjective_of_isLocallyInjective_of_isLocallySurjective J f₁ f₂

Premises used: CategoryTheory.Presheaf.isLocallyInjective_of_isLocallyInjective_of_isLocallySurjective
-- Module: Mathlib.CategoryTheory.Sites.LocallySurjective
Goal:
C : Type u
inst : Category.{v, u} C
J : GrothendieckTopology.{v, u} C
A : Type u'
inst_1 : Category.{v', u'} A
FA : A → A → Type u_1
CA : A → Type w'
inst_2 : (X Y : A) → FunLike.{u_1 + 1, w' + 1, w' + 1} (FA X Y) (CA X) (CA Y)
inst_3 : ConcreteCategory.{w', v', u', u_1} A FA (CC := CA)
F₁ F₂ F₃ : Functor.{v, v', u, u'} Cᵒᵖ A
f₁ : F₁ ⟶ F₂
f₂ : F₂ ⟶ F₃
inst_4 : IsLocallySurjective J (FA := FA) (CA := CA) (f₁ ≫ f₂)
inst_5 : IsLocallyInjective (FD := FA) (CD := CA) J f₂
X : C
x : ToType.{w', v', u', u_1} (FC := FA) (CC := CA) (F₂.obj (op X))
S : Sieve.{v, u} X :=
  imageSieve (FA := FA) (CA := CA) (f₁ ≫ f₂)
    ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app (op X)) : (a : CA (F₂.obj (op X))) → CA (F₃.obj (op X))) x)
T : ⦃Y : C⦄ → (f : Y ⟶ X) → S.arrows f → Sieve.{v, u} Y :=
  fun (Y : C) (f : Y ⟶ X) (hf : S.arrows f) ↦
    equalizerSieve.{w', v', v, u', u, u_1} (FD := FA) (CD := CA) (F := F₂)
      ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₁.app (op Y)) : (a : CA (F₁.obj (op Y))) → CA (F₂.obj (op Y)))
        (localPreimage (FA := FA) (CA := CA) (f₁ ≫ f₂)
          ((ConcreteCategory.hom (FC := FA) (CC := CA) (f₂.app (op X)) : (a : CA (F₂.obj (op X))) → CA (F₃.obj (op X)))
            x)
          f hf))
      ((ConcreteCategory.hom (FC := FA) (CC := CA) (F₂.map f.op) : (a : CA (F₂.obj (op X))) → CA (F₂.obj (op Y))) x)
⊢ imageSieve (FA := FA) (CA := CA) f₁ x ∈ (J : (a : C) → Set (Sieve a)) X

Tactic:
J.superset_covering ?_ (J.transitive (imageSieve_mem J (f₁ ≫ f₂) (f₂.app _ x))
      (Sieve.bind S.1 T) ?_)

Premises used: CategoryTheory.GrothendieckTopology.superset_covering, CategoryTheory.GrothendieckTopology.transitive, CategoryTheory.ConcreteCategory.hom, CategoryTheory.Sieve.bind, CategoryTheory.Sieve.arrows, CategoryTheory.CategoryStruct.comp, DFunLike.coe, CategoryTheory.NatTrans.app, CategoryTheory.Presheaf.imageSieve_mem