lean2/tests/lean/interactive/commands.input.expected.out

43 lines
607 B
Text

-- BEGINWAIT
-- ENDWAIT
-- BEGINWAIT
-- ENDWAIT
-- BEGININFO
-- TYPE|4|13
Type₁
-- ACK
-- TYPE|4|16
Prop
-- ACK
-- IDENTIFIER|4|16
true
-- ACK
-- ENDINFO
-- BEGINWAIT
-- ENDWAIT
-- BEGININFO
-- TYPE|4|13
Type₁
-- ACK
-- TYPE|4|16
Prop
-- ACK
-- IDENTIFIER|4|16
true
-- ACK
-- ENDINFO
-- BEGINFINDG
-- ENDFINDG
-- BEGINWAIT
-- ENDWAIT
-- BEGINSHOW
import logic data.nat.basic
open nat eq.ops
definition a := true
theorem tst (a b c : nat) : a + b + c = a + c + b :=
calc a + b + c = a + (b + c) : _
... = a + (c + b) : {!add.comm}
... = a + c + b : (!add.assoc)⁻¹
-- ENDSHOW