aww cool! thanks Cedric :)

On 28/05/13 18:02, Cedric Greevey wrote:
(defn acmp [a1 a2 tolerance]
  (every? #(< % tolerance)
    (map #(Math/abs (- %1 %2)) (seq a1) (seq a2))))

user=> (acmp (double-array [0.01 0.7 2.2])
             (double-array [0.011 0.695 2.199])
             0.01)
true
user=> (acmp (double-array [0.01 0.7 2.2])
             (double-array [0.011 0.695 2.199])
             0.005)
false
user=>

Will work on any seqables of float/double.



On Tue, May 28, 2013 at 12:57 PM, Jim - FooBar(); <jimpil1...@gmail.com <mailto:jimpil1...@gmail.com>> wrote:

    ooo thanks Chris! I was suspecting the exact same thing because I
    tried this:

    (is (= (seq (aget ready 0))
             (seq (aget ready 1))))

    and got this:

    expected: (= (seq (aget ready 0)) (seq (aget ready 1)))
    actual: (not (= (-0.5345224838248488 0.2672612419124244
    0.801783725737273*1*)
                            (-0.5345224838248488 0.2672612419124244
    0.801783725737273*2*)))

    observe the last digit of the 3rd number (the bold ones)! This is
    why the test fails in Clojure...

    thanks again :)

    Jim




    On 28/05/13 17:42, Jim - FooBar(); wrote:
    Hi everyone,

    sometimes I feel really stupid!

    I am currently looking at a well-known java library's tests and
    found this:

Assert.assertArrayEquals(arrayOutput[0], arrayOutput[1], 0.01); //arrayOutput is a 2d double-array btw

    since I've basically wrapped this lib, I'd like to port the java
    tests as well. First of all, how do I compare 2 arrays in Clojure
    without using .equals() which is broken for arrays. More
    importantly, where on earth is that method (/assertArrayEquals/)?
    Looking at the docs for JUnit [1], I can see no overload that
    takes 2 arrays and a double!!! In fact the only methods that take
    3 args expect a String as the first arg....what is happening? can
    anyone shine some light please?  I am utterly confused...

    thanks in advance,

    Jim

    [1]http://junit.sourceforge.net/javadoc/org/junit/Assert.html

-- -- You received this message because you are subscribed to the Google
    Groups "Clojure" group.
    To post to this group, send email to clojure@googlegroups.com
    <mailto:clojure@googlegroups.com>
    Note that posts from new members are moderated - please be patient
    with your first post.
    To unsubscribe from this group, send email to
    clojure+unsubscr...@googlegroups.com
    <mailto:clojure%2bunsubscr...@googlegroups.com>
    For more options, visit this group at
    http://groups.google.com/group/clojure?hl=en
    ---
    You received this message because you are subscribed to the Google
    Groups "Clojure" group.
    To unsubscribe from this group and stop receiving emails from it,
    send an email to clojure+unsubscr...@googlegroups.com
    <mailto:clojure%2bunsubscr...@googlegroups.com>.
    For more options, visit https://groups.google.com/groups/opt_out.



--
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
---
You received this message because you are subscribed to the Google Groups "Clojure" group. To unsubscribe from this group and stop receiving emails from it, send an email to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.



--
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
--- You received this message because you are subscribed to the Google Groups "Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.


Reply via email to