]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/math/matrices/simd/simd-tests.factor
Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...
[factor.git] / extra / math / matrices / simd / simd-tests.factor
index 8ffab958c139cd9f364d36b55b364119cbd9c44c..611fb991a21e5958adadf2c313990d721aa3252e 100644 (file)
@@ -6,7 +6,7 @@ FROM: math.matrices => m~ ;
 SPECIALIZED-ARRAY: float-4
 IN: math.matrices.simd.tests
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 3.0 0.0 0.0 0.0 }
@@ -15,9 +15,9 @@ IN: math.matrices.simd.tests
             float-4{ 0.0 0.0 0.0 1.0 }
         }
     }
-} [ float-4{ 3.0 4.0 2.0 0.0 } scale-matrix4 ] unit-test
+] [ float-4{ 3.0 4.0 2.0 0.0 } scale-matrix4 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 1/8. 0.0  0.0  0.0 }
@@ -26,9 +26,9 @@ IN: math.matrices.simd.tests
             float-4{ 0.0  0.0  0.0  1.0 }
         }
     }
-} [ float-4{ 8.0 4.0 2.0 0.0 } ortho-matrix4 ] unit-test
+] [ float-4{ 8.0 4.0 2.0 0.0 } ortho-matrix4 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 0.0 0.0 -1.0 0.0 }
@@ -37,7 +37,7 @@ IN: math.matrices.simd.tests
             float-4{ 3.0 4.0  2.0 1.0 }
         }
     }
-} [
+] [
     S{ matrix4 f
         float-4-array{
             float-4{  0.0 1.0 0.0 3.0 }
@@ -48,7 +48,7 @@ IN: math.matrices.simd.tests
     } transpose-matrix4
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 1.0 0.0 0.0 0.0 }
@@ -57,9 +57,9 @@ IN: math.matrices.simd.tests
             float-4{ 3.0 4.0 2.0 1.0 }
         }
     }
-} [ float-4{ 3.0 4.0 2.0 0.0 } translation-matrix4 ] unit-test
+] [ float-4{ 3.0 4.0 2.0 0.0 } translation-matrix4 ] unit-test
 
-{ t } [
+[ t ] [
     float-4{ $[ 1/2. sqrt ] 0.0 $[ 1/2. sqrt ] 0.0 } pi rotation-matrix4
     S{ matrix4 f
         float-4-array{
@@ -72,7 +72,7 @@ IN: math.matrices.simd.tests
     1.0e-7 m~
 ] unit-test
 
-{ t } [
+[ t ] [
     float-4{ 0.0 1.0 0.0 1.0 } pi 1/2. * rotation-matrix4
     S{ matrix4 f
         float-4-array{
@@ -85,7 +85,7 @@ IN: math.matrices.simd.tests
     1.0e-7 m~
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{  2.0  0.0  0.0  0.0 }
@@ -94,7 +94,7 @@ IN: math.matrices.simd.tests
             float-4{ 10.0 18.0 28.0  1.0 }
         }
     }
-} [
+] [
     S{ matrix4 f
         float-4-array{
             float-4{ 2.0 0.0 0.0 0.0 }
@@ -114,7 +114,7 @@ IN: math.matrices.simd.tests
     m4.
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 3.0 0.0 0.0 0.0 }
@@ -123,7 +123,7 @@ IN: math.matrices.simd.tests
             float-4{ 5.0 6.0 7.0 2.0 }
         }
     }
-} [
+] [
     S{ matrix4 f
         float-4-array{
             float-4{ 2.0 0.0 0.0 0.0 }
@@ -143,7 +143,7 @@ IN: math.matrices.simd.tests
     m4+
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{  1.0  0.0  0.0 0.0 }
@@ -152,7 +152,7 @@ IN: math.matrices.simd.tests
             float-4{ -5.0 -6.0 -7.0 0.0 }
         }
     }
-} [
+] [
     S{ matrix4 f
         float-4-array{
             float-4{ 2.0 0.0 0.0 0.0 }
@@ -172,7 +172,7 @@ IN: math.matrices.simd.tests
     m4-
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 3.0 0.0 0.0 15.0 }
@@ -181,7 +181,7 @@ IN: math.matrices.simd.tests
             float-4{ 0.0 0.0 0.0  3.0 }
         }
     }
-} [
+] [
     S{ matrix4 f
         float-4-array{
             float-4{ 1.0 0.0 0.0 5.0 }
@@ -193,7 +193,7 @@ IN: math.matrices.simd.tests
     3.0 m4*n
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 3.0 0.0 0.0 15.0 }
@@ -202,7 +202,7 @@ IN: math.matrices.simd.tests
             float-4{ 0.0 0.0 0.0  3.0 }
         }
     }
-} [
+] [
     3.0
     S{ matrix4 f
         float-4-array{
@@ -215,7 +215,7 @@ IN: math.matrices.simd.tests
     n*m4
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 1/2. 0.0   0.0   0.0 }
@@ -224,22 +224,22 @@ IN: math.matrices.simd.tests
             float-4{ 0.0  0.0 -10/4.  0.0 }
         }
     }
-} [
+] [
     float-4{ 2.0 2.0 0.0 0.0 } 1.0 5.0
     frustum-matrix4
 ] unit-test
 
-{ float-4{ 3.0 4.0 5.0 1.0 } }
+[ float-4{ 3.0 4.0 5.0 1.0 } ]
 [ float-4{ 1.0 1.0 1.0 1.0 } translation-matrix4 float-4{ 2.0 3.0 4.0 1.0 } m4.v ] unit-test
 
-{ float-4{ 2.0 2.5 3.0 1.0 } }
+[ float-4{ 2.0 2.5 3.0 1.0 } ]
 [
     float-4{ 1.0 1.0 1.0 1.0 } translation-matrix4
     float-4{ 0.5 0.5 0.5 1.0 } scale-matrix4 m4.
     float-4{ 2.0 3.0 4.0 1.0 } m4.v
 ] unit-test
 
-{
+[
     S{ matrix4 f
         float-4-array{
             float-4{ 1.0  0.0  0.0  0.0 }
@@ -248,11 +248,11 @@ IN: math.matrices.simd.tests
             float-4{ 0.0  0.0  0.0  1.0 }
         }
     }
-} [
+] [
     float-4{ 1.0 0.0 0.0 0.0 } q>matrix4
 ] unit-test
 
-{ t } [
+[ t ] [
     pi 0.5 * 0.0 0.0 euler4 q>matrix4
     S{ matrix4 f
         float-4-array{
@@ -265,7 +265,7 @@ IN: math.matrices.simd.tests
     1.0e-7 m~
 ] unit-test
 
-{ t } [
+[ t ] [
     0.0 pi 0.25 * 0.0 euler4 q>matrix4
     S{ matrix4 f
         float-4-array{