math: fix syntax

modern-harvey3
Doug Coleman 2019-09-29 11:20:27 -05:00
parent 511ecb4e84
commit 8b4998aa4d
2 changed files with 6 additions and 6 deletions

View File

@ -707,11 +707,11 @@ sequences tools.test ;
} Mtranspose 2 1 3 2 Msub
] unit-test
! Bugfix: blas-matrix-base did not handle `f smatrix{ } equal?`
! Bugfix: blas-matrix-base did not handle `f Smatrix{ } equal?`
{ f } [
f smatrix{
svector{ 1.0 2.0 3.0 4.0 }
svector{ 2.0 2.0 3.0 4.0 }
svector{ 3.0 2.0 3.0 4.0 }
f Smatrix{
Svector{ 1.0 2.0 3.0 4.0 }
Svector{ 2.0 2.0 3.0 4.0 }
Svector{ 3.0 2.0 3.0 4.0 }
} equal?
] unit-test

View File

@ -1,7 +1,7 @@
! Copyright (C) 2012 John Benediktsson
! See http://factorcode.org/license.txt for BSD license
USING: arrays kernel layouts locals math math.functions
math.order math.statistics sequences ;
math.order math.statistics sequences combinators.smart ;
IN: math.cardinality
GENERIC: trailing-zeros ( m -- n )