. exists x; constructor
  . constructor
  . apply h
case neg
A : Type
R : A → A → Prop
inhabited_A : Nonempty A
x✝ x : A
h✝ : ∀ (y : A), R x y → ∃ y_1, refl_trans_clos R y y_1 ∧ normal R y_1
h : ¬∃ y, R x y
⊢ ∃ y, refl_trans_clos R x y ∧ normal R y
no goals