--- /dev/null
+--\r
+-- Test cube datatype\r
+--\r
+CREATE EXTENSION cube;\r
+--\r
+-- testing the input and output functions\r
+--\r
+-- Any number (a one-dimensional point)\r
+SELECT '1'::cube AS cube;\r
+ cube \r
+------\r
+ (1)\r
+(1 row)\r
+\r
+SELECT '-1'::cube AS cube;\r
+ cube \r
+------\r
+ (-1)\r
+(1 row)\r
+\r
+SELECT '1.'::cube AS cube;\r
+ cube \r
+------\r
+ (1)\r
+(1 row)\r
+\r
+SELECT '-1.'::cube AS cube;\r
+ cube \r
+------\r
+ (-1)\r
+(1 row)\r
+\r
+SELECT '.1'::cube AS cube;\r
+ cube \r
+-------\r
+ (0.1)\r
+(1 row)\r
+\r
+SELECT '-.1'::cube AS cube;\r
+ cube \r
+--------\r
+ (-0.1)\r
+(1 row)\r
+\r
+SELECT '1.0'::cube AS cube;\r
+ cube \r
+------\r
+ (1)\r
+(1 row)\r
+\r
+SELECT '-1.0'::cube AS cube;\r
+ cube \r
+------\r
+ (-1)\r
+(1 row)\r
+\r
+SELECT '1e27'::cube AS cube;\r
+ cube \r
+----------\r
+ (1e+027)\r
+(1 row)\r
+\r
+SELECT '-1e27'::cube AS cube;\r
+ cube \r
+-----------\r
+ (-1e+027)\r
+(1 row)\r
+\r
+SELECT '1.0e27'::cube AS cube;\r
+ cube \r
+----------\r
+ (1e+027)\r
+(1 row)\r
+\r
+SELECT '-1.0e27'::cube AS cube;\r
+ cube \r
+-----------\r
+ (-1e+027)\r
+(1 row)\r
+\r
+SELECT '1e+27'::cube AS cube;\r
+ cube \r
+----------\r
+ (1e+027)\r
+(1 row)\r
+\r
+SELECT '-1e+27'::cube AS cube;\r
+ cube \r
+-----------\r
+ (-1e+027)\r
+(1 row)\r
+\r
+SELECT '1.0e+27'::cube AS cube;\r
+ cube \r
+----------\r
+ (1e+027)\r
+(1 row)\r
+\r
+SELECT '-1.0e+27'::cube AS cube;\r
+ cube \r
+-----------\r
+ (-1e+027)\r
+(1 row)\r
+\r
+SELECT '1e-7'::cube AS cube;\r
+ cube \r
+----------\r
+ (1e-007)\r
+(1 row)\r
+\r
+SELECT '-1e-7'::cube AS cube;\r
+ cube \r
+-----------\r
+ (-1e-007)\r
+(1 row)\r
+\r
+SELECT '1.0e-7'::cube AS cube;\r
+ cube \r
+----------\r
+ (1e-007)\r
+(1 row)\r
+\r
+SELECT '-1.0e-7'::cube AS cube;\r
+ cube \r
+-----------\r
+ (-1e-007)\r
+(1 row)\r
+\r
+SELECT '1e-700'::cube AS cube;\r
+ cube \r
+------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT '-1e-700'::cube AS cube;\r
+ cube \r
+------\r
+ (-0)\r
+(1 row)\r
+\r
+SELECT '1234567890123456'::cube AS cube;\r
+ cube \r
+-------------------------\r
+ (1.23456789012346e+015)\r
+(1 row)\r
+\r
+SELECT '+1234567890123456'::cube AS cube;\r
+ cube \r
+-------------------------\r
+ (1.23456789012346e+015)\r
+(1 row)\r
+\r
+SELECT '-1234567890123456'::cube AS cube;\r
+ cube \r
+--------------------------\r
+ (-1.23456789012346e+015)\r
+(1 row)\r
+\r
+SELECT '.1234567890123456'::cube AS cube;\r
+ cube \r
+---------------------\r
+ (0.123456789012346)\r
+(1 row)\r
+\r
+SELECT '+.1234567890123456'::cube AS cube;\r
+ cube \r
+---------------------\r
+ (0.123456789012346)\r
+(1 row)\r
+\r
+SELECT '-.1234567890123456'::cube AS cube;\r
+ cube \r
+----------------------\r
+ (-0.123456789012346)\r
+(1 row)\r
+\r
+-- simple lists (points)\r
+SELECT '1,2'::cube AS cube;\r
+ cube \r
+--------\r
+ (1, 2)\r
+(1 row)\r
+\r
+SELECT '(1,2)'::cube AS cube;\r
+ cube \r
+--------\r
+ (1, 2)\r
+(1 row)\r
+\r
+SELECT '1,2,3,4,5'::cube AS cube;\r
+ cube \r
+-----------------\r
+ (1, 2, 3, 4, 5)\r
+(1 row)\r
+\r
+SELECT '(1,2,3,4,5)'::cube AS cube;\r
+ cube \r
+-----------------\r
+ (1, 2, 3, 4, 5)\r
+(1 row)\r
+\r
+-- double lists (cubes)\r
+SELECT '(0),(0)'::cube AS cube;\r
+ cube \r
+------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT '(0),(1)'::cube AS cube;\r
+ cube \r
+---------\r
+ (0),(1)\r
+(1 row)\r
+\r
+SELECT '[(0),(0)]'::cube AS cube;\r
+ cube \r
+------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT '[(0),(1)]'::cube AS cube;\r
+ cube \r
+---------\r
+ (0),(1)\r
+(1 row)\r
+\r
+SELECT '(0,0,0,0),(0,0,0,0)'::cube AS cube;\r
+ cube \r
+--------------\r
+ (0, 0, 0, 0)\r
+(1 row)\r
+\r
+SELECT '(0,0,0,0),(1,0,0,0)'::cube AS cube;\r
+ cube \r
+---------------------------\r
+ (0, 0, 0, 0),(1, 0, 0, 0)\r
+(1 row)\r
+\r
+SELECT '[(0,0,0,0),(0,0,0,0)]'::cube AS cube;\r
+ cube \r
+--------------\r
+ (0, 0, 0, 0)\r
+(1 row)\r
+\r
+SELECT '[(0,0,0,0),(1,0,0,0)]'::cube AS cube;\r
+ cube \r
+---------------------------\r
+ (0, 0, 0, 0),(1, 0, 0, 0)\r
+(1 row)\r
+\r
+-- invalid input: parse errors\r
+SELECT ''::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT ''::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at end of input\r
+SELECT 'ABC'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT 'ABC'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "A"\r
+SELECT '()'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '()'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ")"\r
+SELECT '[]'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[]'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "]"\r
+SELECT '[()]'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[()]'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ")"\r
+SELECT '[(1)]'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[(1)]'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "]"\r
+SELECT '[(1),]'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[(1),]'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "]"\r
+SELECT '[(1),2]'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[(1),2]'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "2"\r
+SELECT '[(1),(2),(3)]'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[(1),(2),(3)]'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ","\r
+SELECT '1,'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '1,'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at end of input\r
+SELECT '1,2,'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '1,2,'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at end of input\r
+SELECT '1,,2'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '1,,2'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ","\r
+SELECT '(1,)'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,)'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ")"\r
+SELECT '(1,2,)'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,2,)'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ")"\r
+SELECT '(1,,2)'::cube AS cube;\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,,2)'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ","\r
+-- invalid input: semantic errors and trailing garbage\r
+SELECT '[(1),(2)],'::cube AS cube; -- 0\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[(1),(2)],'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ","\r
+SELECT '[(1,2,3),(2,3)]'::cube AS cube; -- 1\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[(1,2,3),(2,3)]'::cube AS cube;\r
+ ^\r
+DETAIL: Different point dimensions in (1,2,3) and (2,3).\r
+SELECT '[(1,2),(1,2,3)]'::cube AS cube; -- 1\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '[(1,2),(1,2,3)]'::cube AS cube;\r
+ ^\r
+DETAIL: Different point dimensions in (1,2) and (1,2,3).\r
+SELECT '(1),(2),'::cube AS cube; -- 2\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1),(2),'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ","\r
+SELECT '(1,2,3),(2,3)'::cube AS cube; -- 3\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,2,3),(2,3)'::cube AS cube;\r
+ ^\r
+DETAIL: Different point dimensions in (1,2,3) and (2,3).\r
+SELECT '(1,2),(1,2,3)'::cube AS cube; -- 3\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,2),(1,2,3)'::cube AS cube;\r
+ ^\r
+DETAIL: Different point dimensions in (1,2) and (1,2,3).\r
+SELECT '(1,2,3)ab'::cube AS cube; -- 4\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,2,3)ab'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "a"\r
+SELECT '(1,2,3)a'::cube AS cube; -- 5\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,2,3)a'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "a"\r
+SELECT '(1,2)('::cube AS cube; -- 5\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '(1,2)('::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "("\r
+SELECT '1,2ab'::cube AS cube; -- 6\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '1,2ab'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "a"\r
+SELECT '1 e7'::cube AS cube; -- 6\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '1 e7'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "e"\r
+SELECT '1,2a'::cube AS cube; -- 7\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '1,2a'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near "a"\r
+SELECT '1..2'::cube AS cube; -- 7\r
+ERROR: bad cube representation\r
+LINE 1: SELECT '1..2'::cube AS cube;\r
+ ^\r
+DETAIL: syntax error at or near ".2"\r
+--\r
+-- Testing building cubes from float8 values\r
+--\r
+SELECT cube(0::float8);\r
+ cube \r
+------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT cube(1::float8);\r
+ cube \r
+------\r
+ (1)\r
+(1 row)\r
+\r
+SELECT cube(1,2);\r
+ cube \r
+---------\r
+ (1),(2)\r
+(1 row)\r
+\r
+SELECT cube(cube(1,2),3);\r
+ cube \r
+---------------\r
+ (1, 3),(2, 3)\r
+(1 row)\r
+\r
+SELECT cube(cube(1,2),3,4);\r
+ cube \r
+---------------\r
+ (1, 3),(2, 4)\r
+(1 row)\r
+\r
+SELECT cube(cube(cube(1,2),3,4),5);\r
+ cube \r
+---------------------\r
+ (1, 3, 5),(2, 4, 5)\r
+(1 row)\r
+\r
+SELECT cube(cube(cube(1,2),3,4),5,6);\r
+ cube \r
+---------------------\r
+ (1, 3, 5),(2, 4, 6)\r
+(1 row)\r
+\r
+--\r
+-- Test that the text -> cube cast was installed.\r
+--\r
+SELECT '(0)'::text::cube;\r
+ cube \r
+------\r
+ (0)\r
+(1 row)\r
+\r
+--\r
+-- Test the float[] -> cube cast\r
+--\r
+SELECT cube('{0,1,2}'::float[], '{3,4,5}'::float[]);\r
+ cube \r
+---------------------\r
+ (0, 1, 2),(3, 4, 5)\r
+(1 row)\r
+\r
+SELECT cube('{0,1,2}'::float[], '{3}'::float[]);\r
+ERROR: UR and LL arrays must be of same length\r
+SELECT cube(NULL::float[], '{3}'::float[]);\r
+ cube \r
+------\r
+ \r
+(1 row)\r
+\r
+SELECT cube('{0,1,2}'::float[]);\r
+ cube \r
+-----------\r
+ (0, 1, 2)\r
+(1 row)\r
+\r
+SELECT cube_subset(cube('(1,3,5),(6,7,8)'), ARRAY[3,2,1,1]);\r
+ cube_subset \r
+---------------------------\r
+ (5, 3, 1, 1),(8, 7, 6, 6)\r
+(1 row)\r
+\r
+SELECT cube_subset(cube('(1,3,5),(6,7,8)'), ARRAY[4,0]);\r
+ERROR: Index out of bounds\r
+--\r
+-- Testing limit of CUBE_MAX_DIM dimensions check in cube_in.\r
+--\r
+select '(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)'::cube;\r
+ERROR: bad cube representation\r
+LINE 1: select '(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0...\r
+ ^\r
+DETAIL: A cube cannot have more than 100 dimensions.\r
+select '(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0),(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)'::cube;\r
+ERROR: bad cube representation\r
+LINE 1: select '(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0...\r
+ ^\r
+DETAIL: A cube cannot have more than 100 dimensions.\r
+--\r
+-- testing the operators\r
+--\r
+-- equality/inequality:\r
+--\r
+SELECT '24, 33.20'::cube = '24, 33.20'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '24, 33.20'::cube != '24, 33.20'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '24, 33.20'::cube = '24, 33.21'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '24, 33.20'::cube != '24, 33.21'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube = '(2,0,0,0,0),(3,1,0,0,0)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube = '(2,0,0,0,0),(3,1,0,0,1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+-- "lower than" / "greater than"\r
+-- (these operators are not useful for anything but ordering)\r
+--\r
+SELECT '1'::cube > '2'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '1'::cube < '2'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '1,1'::cube > '1,2'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '1,1'::cube < '1,2'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube > '(2,0,0,0,0),(3,1,0,0,1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube < '(2,0,0,0,0),(3,1,0,0,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube > '(2,0,0,0,1),(3,1,0,0,0)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube < '(2,0,0,0,1),(3,1,0,0,0)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube > '(2,0,0,0,0),(3,1,0,0,0)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(2,0),(3,1)'::cube < '(2,0,0,0,0),(3,1,0,0,0)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0,0,0,0),(3,1,0,0,1)'::cube > '(2,0),(3,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0,0,0,0),(3,1,0,0,1)'::cube < '(2,0),(3,1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(2,0,0,0,1),(3,1,0,0,0)'::cube > '(2,0),(3,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0,0,0,1),(3,1,0,0,0)'::cube < '(2,0),(3,1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(2,0,0,0,0),(3,1,0,0,0)'::cube > '(2,0),(3,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(2,0,0,0,0),(3,1,0,0,0)'::cube < '(2,0),(3,1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+-- "overlap"\r
+--\r
+SELECT '1'::cube && '1'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '1'::cube && '2'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '[(-1,-1,-1),(1,1,1)]'::cube && '0'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '[(-1,-1,-1),(1,1,1)]'::cube && '1'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '[(-1,-1,-1),(1,1,1)]'::cube && '1,1,1'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '[(-1,-1,-1),(1,1,1)]'::cube && '[(1,1,1),(2,2,2)]'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '[(-1,-1,-1),(1,1,1)]'::cube && '[(1,1),(2,2)]'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '[(-1,-1,-1),(1,1,1)]'::cube && '[(2,1,1),(2,2,2)]'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+-- "contained in" (the left operand is the cube entirely enclosed by\r
+-- the right operand):\r
+--\r
+SELECT '0'::cube <@ '0'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '0,0,0'::cube <@ '0,0,0'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '0,0'::cube <@ '0,0,1'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '0,0,0'::cube <@ '0,0,1'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '1,0,0'::cube <@ '0,0,1'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(1,0,0),(0,0,1)'::cube <@ '(1,0,0),(0,0,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(1,0,0),(0,0,1)'::cube <@ '(-1,-1,-1),(1,1,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(1,0,0),(0,0,1)'::cube <@ '(-1,-1,-1,-1),(1,1,1,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '0'::cube <@ '(-1),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '1'::cube <@ '(-1),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '-1'::cube <@ '(-1),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1),(1)'::cube <@ '(-1),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1),(1)'::cube <@ '(-1,-1),(1,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-2),(1)'::cube <@ '(-1),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(-2),(1)'::cube <@ '(-1,-1),(1,1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+-- "contains" (the left operand is the cube that entirely encloses the\r
+-- right operand)\r
+--\r
+SELECT '0'::cube @> '0'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '0,0,0'::cube @> '0,0,0'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '0,0,1'::cube @> '0,0'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '0,0,1'::cube @> '0,0,0'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '0,0,1'::cube @> '1,0,0'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(1,0,0),(0,0,1)'::cube @> '(1,0,0),(0,0,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1,-1,-1),(1,1,1)'::cube @> '(1,0,0),(0,0,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1,-1,-1,-1),(1,1,1,1)'::cube @> '(1,0,0),(0,0,1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1),(1)'::cube @> '0'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1),(1)'::cube @> '1'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1),(1)'::cube @> '-1'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1),(1)'::cube @> '(-1),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1,-1),(1,1)'::cube @> '(-1),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ t\r
+(1 row)\r
+\r
+SELECT '(-1),(1)'::cube @> '(-2),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+SELECT '(-1,-1),(1,1)'::cube @> '(-2),(1)'::cube AS bool;\r
+ bool \r
+------\r
+ f\r
+(1 row)\r
+\r
+-- Test of distance function\r
+--\r
+SELECT cube_distance('(0)'::cube,'(2,2,2,2)'::cube);\r
+ cube_distance \r
+---------------\r
+ 4\r
+(1 row)\r
+\r
+SELECT cube_distance('(0)'::cube,'(.3,.4)'::cube);\r
+ cube_distance \r
+---------------\r
+ 0.5\r
+(1 row)\r
+\r
+-- Test of cube function (text to cube)\r
+--\r
+SELECT cube('(1,1.2)'::text);\r
+ cube \r
+----------\r
+ (1, 1.2)\r
+(1 row)\r
+\r
+SELECT cube(NULL);\r
+ cube \r
+------\r
+ \r
+(1 row)\r
+\r
+-- Test of cube_dim function (dimensions stored in cube)\r
+--\r
+SELECT cube_dim('(0)'::cube);\r
+ cube_dim \r
+----------\r
+ 1\r
+(1 row)\r
+\r
+SELECT cube_dim('(0,0)'::cube);\r
+ cube_dim \r
+----------\r
+ 2\r
+(1 row)\r
+\r
+SELECT cube_dim('(0,0,0)'::cube);\r
+ cube_dim \r
+----------\r
+ 3\r
+(1 row)\r
+\r
+-- Test of cube_ll_coord function (retrieves LL coodinate values)\r
+--\r
+SELECT cube_ll_coord('(-1,1),(2,-2)'::cube, 1);\r
+ cube_ll_coord \r
+---------------\r
+ -1\r
+(1 row)\r
+\r
+SELECT cube_ll_coord('(-1,1),(2,-2)'::cube, 2);\r
+ cube_ll_coord \r
+---------------\r
+ -2\r
+(1 row)\r
+\r
+SELECT cube_ll_coord('(-1,1),(2,-2)'::cube, 3);\r
+ cube_ll_coord \r
+---------------\r
+ 0\r
+(1 row)\r
+\r
+-- Test of cube_ur_coord function (retrieves UR coodinate values)\r
+--\r
+SELECT cube_ur_coord('(-1,1),(2,-2)'::cube, 1);\r
+ cube_ur_coord \r
+---------------\r
+ 2\r
+(1 row)\r
+\r
+SELECT cube_ur_coord('(-1,1),(2,-2)'::cube, 2);\r
+ cube_ur_coord \r
+---------------\r
+ 1\r
+(1 row)\r
+\r
+SELECT cube_ur_coord('(-1,1),(2,-2)'::cube, 3);\r
+ cube_ur_coord \r
+---------------\r
+ 0\r
+(1 row)\r
+\r
+-- Test of cube_is_point\r
+--\r
+SELECT cube_is_point('(0)'::cube);\r
+ cube_is_point \r
+---------------\r
+ t\r
+(1 row)\r
+\r
+SELECT cube_is_point('(0,1,2)'::cube);\r
+ cube_is_point \r
+---------------\r
+ t\r
+(1 row)\r
+\r
+SELECT cube_is_point('(0,1,2),(0,1,2)'::cube);\r
+ cube_is_point \r
+---------------\r
+ t\r
+(1 row)\r
+\r
+SELECT cube_is_point('(0,1,2),(-1,1,2)'::cube);\r
+ cube_is_point \r
+---------------\r
+ f\r
+(1 row)\r
+\r
+SELECT cube_is_point('(0,1,2),(0,-1,2)'::cube);\r
+ cube_is_point \r
+---------------\r
+ f\r
+(1 row)\r
+\r
+SELECT cube_is_point('(0,1,2),(0,1,-2)'::cube);\r
+ cube_is_point \r
+---------------\r
+ f\r
+(1 row)\r
+\r
+-- Test of cube_enlarge (enlarging and shrinking cubes)\r
+--\r
+SELECT cube_enlarge('(0)'::cube, 0, 0);\r
+ cube_enlarge \r
+--------------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, 0, 1);\r
+ cube_enlarge \r
+--------------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, 0, 2);\r
+ cube_enlarge \r
+--------------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(2),(-2)'::cube, 0, 4);\r
+ cube_enlarge \r
+--------------\r
+ (-2),(2)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, 1, 0);\r
+ cube_enlarge \r
+--------------\r
+ (-1),(1)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, 1, 1);\r
+ cube_enlarge \r
+--------------\r
+ (-1),(1)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, 1, 2);\r
+ cube_enlarge \r
+-----------------\r
+ (-1, -1),(1, 1)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(2),(-2)'::cube, 1, 4);\r
+ cube_enlarge \r
+-------------------------------\r
+ (-3, -1, -1, -1),(3, 1, 1, 1)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, -1, 0);\r
+ cube_enlarge \r
+--------------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, -1, 1);\r
+ cube_enlarge \r
+--------------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0)'::cube, -1, 2);\r
+ cube_enlarge \r
+--------------\r
+ (0)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(2),(-2)'::cube, -1, 4);\r
+ cube_enlarge \r
+--------------\r
+ (-1),(1)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0,0,0)'::cube, 1, 0);\r
+ cube_enlarge \r
+------------------------\r
+ (-1, -1, -1),(1, 1, 1)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(0,0,0)'::cube, 1, 2);\r
+ cube_enlarge \r
+------------------------\r
+ (-1, -1, -1),(1, 1, 1)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(2,-2),(-3,7)'::cube, 1, 2);\r
+ cube_enlarge \r
+-----------------\r
+ (-4, -3),(3, 8)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(2,-2),(-3,7)'::cube, 3, 2);\r
+ cube_enlarge \r
+------------------\r
+ (-6, -5),(5, 10)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(2,-2),(-3,7)'::cube, -1, 2);\r
+ cube_enlarge \r
+-----------------\r
+ (-2, -1),(1, 6)\r
+(1 row)\r
+\r
+SELECT cube_enlarge('(2,-2),(-3,7)'::cube, -3, 2);\r
+ cube_enlarge \r
+---------------------\r
+ (-0.5, 1),(-0.5, 4)\r
+(1 row)\r
+\r
+-- Load some example data and build the index\r
+--\r
+CREATE TABLE test_cube (c cube);\r
+\copy test_cube from 'data/test_cube.data'\r
+CREATE INDEX test_cube_ix ON test_cube USING gist (c);\r
+SELECT * FROM test_cube WHERE c && '(3000,1000),(0,0)' ORDER BY c;\r
+ c \r
+--------------------------\r
+ (337, 455),(240, 359)\r
+ (759, 187),(662, 163)\r
+ (1444, 403),(1346, 344)\r
+ (1594, 1043),(1517, 971)\r
+ (2424, 160),(2424, 81)\r
+(5 rows)\r
+\r
+-- Test sorting\r
+SELECT * FROM test_cube WHERE c && '(3000,1000),(0,0)' GROUP BY c ORDER BY c;\r
+ c \r
+--------------------------\r
+ (337, 455),(240, 359)\r
+ (759, 187),(662, 163)\r
+ (1444, 403),(1346, 344)\r
+ (1594, 1043),(1517, 971)\r
+ (2424, 160),(2424, 81)\r
+(5 rows)\r
+\r