Advertisement
Guest User

Untitled

a guest
Mar 23rd, 2019
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Racket 0.28 KB | None | 0 0
  1.  
  2. (claim a+b+c+d
  3.   (Π ([a Nat]
  4.       [b Nat]
  5.       [c Nat]
  6.       [d Nat])
  7.     (= Nat (+ (+ a b) (+ c d)) (+ (+ a c) (+ b d)))))
  8.  
  9. (claim a+b=c+d
  10.   (Π ([a Nat]
  11.       [b Nat]
  12.       [c Nat]
  13.       [d Nat])
  14.     ((= Nat a c) (= Nat b d)
  15.        (= Nat (+ a b) (+ c d)))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement