lean2/tests/lean/run/suffices.lean

6 lines
159 B
Text

variables {a b c : Prop}
theorem foo (Ha : a) (Hab : a → b) (Hbc : b → c) : c :=
suffices to show b, from Hbc this,
suffices to show a, from Hab this,
Ha