import Adam.Metadata
import Std.Tactic.RCases
import Mathlib.Tactic.LeftRight

import Adam.ToBePorted

Game "Adam"
World "Proposition"
Level 9

Title "Widerspruch"

Introduction
"
Auftritt dritter Querulant.
"

Statement ""
  (n : ℕ) (h : n = 10) (g : n ≠ 10) : n = 42 := by
  Hint "**Du** Wieder ein Widerspruch in den Annahmen?

**Robo** Ich sehe, du hast langsam den Dreh raus."
  contradiction



Conclusion
"
**Robo** Gut gemacht.  Bei dieser Frage ist auch ein bisschen offensichtlicher,
worin der Widerspruch besteht:  Die Annahme `n ≠ 10` ist genau die Negation von `n = 10`.
Man muss `≠` immer als `¬(· = ·)` lesen.
"

NewTactic contradiction
DisabledTactic tauto