lean2/tests/lean/let2.lean.expected.out

  Set: pp::colors
  Set: pp::unicode
  Proved: simple
theorem simple (p q r : Bool) (H_pq_qr : (p → q) ∧ (q → r)) (H_p : p) : r :=
    let P_pq : p → q := and::eliml H_pq_qr, P_qr : q → r := and::elimr H_pq_qr, P_q : q := P_pq H_p in P_qr P_q
Add (optional) type to let declarations Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-09-06 17:06:26 +00:00			`Set: pp::colors`
			`Set: pp::unicode`
			`Proved: simple`
feat(kernel): use Pi as forall/implication Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-01-08 08:38:39 +00:00			`theorem simple (p q r : Bool) (H_pq_qr : (p → q) ∧ (q → r)) (H_p : p) : r :=`
			`let P_pq : p → q := and::eliml H_pq_qr, P_qr : q → r := and::elimr H_pq_qr, P_q : q := P_pq H_p in P_qr P_q`