Include new equality rules for floats.

This commit is contained in:
Colin Jones 2010-10-29 10:18:09 -05:00
parent fe1f96b8c0
commit 2e6ee5ddea
2 changed files with 14 additions and 2 deletions

View File

@ -6,4 +6,13 @@
(= __ (+ 1 1)) (= __ (+ 1 1))
"You can test equality of many things" "You can test equality of many things"
(= (+ 3 4) __ (+ 2 __))) (= (+ 3 4) __ (+ 2 __))
"Some things may appear different, but be the same"
(= 2 2/1 __)
"You cannot generally float to heavens of integers"
(= __ (= 2 2.0))
"But a looser equality is also possible"
(== 2.0 2 __))

View File

@ -7,7 +7,10 @@
{"equalities" {"__" [true {"equalities" {"__" [true
2 2
7 7
5]} 5
4/2
false
6/3]}
"lists" {"__" ["1 2 3 4 5" "lists" {"__" ["1 2 3 4 5"
1 1
[2 3 4 5] [2 3 4 5]