factor/basis/math/vectors/specialization/specialization-tests.factor

21 lines
609 B
Factor

IN: math.vectors.specialization.tests
USING: compiler.tree.debugger math.vectors tools.test kernel
kernel.private math specialized-arrays.double
specialized-arrays.complex-float
specialized-arrays.float ;
[ V{ t } ] [
[ { double-array double-array } declare distance 0.0 < not ] final-literals
] unit-test
[ V{ float } ] [
[ { float-array float } declare v*n norm ] final-classes
] unit-test
[ V{ number } ] [
[ { complex-float-array complex-float-array } declare v. ] final-classes
] unit-test
[ V{ real } ] [
[ { complex-float-array complex } declare v*n norm ] final-classes
] unit-test