# HG changeset patch # User Chris Cannam # Date 1382514546 -3600 # Node ID 1404b9b588684ff8d754944349c0e4eb012bac91 # Parent f33f9dfb8422825feca91d0c80326aec525c8ebc Restore proper divide diff -r f33f9dfb8422 -r 1404b9b58868 src/may/vector/blockfuncs.yeti --- a/src/may/vector/blockfuncs.yeti Wed Oct 23 08:10:03 2013 +0100 +++ b/src/may/vector/blockfuncs.yeti Wed Oct 23 08:49:06 2013 +0100 @@ -92,8 +92,10 @@ fi; divideBy n v = + // Not just "scaled (1/n)" -- this way we get exact rationals. In fact + // the unit test for this function will fail if we use scaled (1/n) if n == 1 then v - else VectorBits#scaled(raw v, 1.0 / n); + else vec.fromList (map (/ n) (vec.list v)); fi; sqr v =