float4.sql 4.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105
  1. --
  2. -- FLOAT4
  3. --
  4. CREATE TABLE FLOAT4_TBL (f1 float4);
  5. INSERT INTO FLOAT4_TBL(f1) VALUES (' 0.0');
  6. INSERT INTO FLOAT4_TBL(f1) VALUES ('1004.30 ');
  7. INSERT INTO FLOAT4_TBL(f1) VALUES (' -34.84 ');
  8. INSERT INTO FLOAT4_TBL(f1) VALUES ('1.2345678901234e+20');
  9. INSERT INTO FLOAT4_TBL(f1) VALUES ('1.2345678901234e-20');
  10. -- test for over and under flow
  11. INSERT INTO FLOAT4_TBL(f1) VALUES ('10e70');
  12. INSERT INTO FLOAT4_TBL(f1) VALUES ('-10e70');
  13. INSERT INTO FLOAT4_TBL(f1) VALUES ('10e-70');
  14. INSERT INTO FLOAT4_TBL(f1) VALUES ('-10e-70');
  15. INSERT INTO FLOAT4_TBL(f1) VALUES ('10e70'::float8);
  16. INSERT INTO FLOAT4_TBL(f1) VALUES ('-10e70'::float8);
  17. INSERT INTO FLOAT4_TBL(f1) VALUES ('10e-70'::float8);
  18. INSERT INTO FLOAT4_TBL(f1) VALUES ('-10e-70'::float8);
  19. INSERT INTO FLOAT4_TBL(f1) VALUES ('10e400');
  20. INSERT INTO FLOAT4_TBL(f1) VALUES ('-10e400');
  21. INSERT INTO FLOAT4_TBL(f1) VALUES ('10e-400');
  22. INSERT INTO FLOAT4_TBL(f1) VALUES ('-10e-400');
  23. -- bad input
  24. INSERT INTO FLOAT4_TBL(f1) VALUES ('');
  25. INSERT INTO FLOAT4_TBL(f1) VALUES (' ');
  26. INSERT INTO FLOAT4_TBL(f1) VALUES ('xyz');
  27. INSERT INTO FLOAT4_TBL(f1) VALUES ('5.0.0');
  28. INSERT INTO FLOAT4_TBL(f1) VALUES ('5 . 0');
  29. INSERT INTO FLOAT4_TBL(f1) VALUES ('5. 0');
  30. INSERT INTO FLOAT4_TBL(f1) VALUES (' - 3.0');
  31. INSERT INTO FLOAT4_TBL(f1) VALUES ('123 5');
  32. -- special inputs
  33. SELECT 'NaN'::float4;
  34. SELECT 'nan'::float4;
  35. SELECT ' NAN '::float4;
  36. SELECT 'infinity'::float4;
  37. SELECT ' -INFINiTY '::float4;
  38. -- bad special inputs
  39. SELECT 'N A N'::float4;
  40. SELECT 'NaN x'::float4;
  41. SELECT ' INFINITY x'::float4;
  42. SELECT 'Infinity'::float4 + 100.0;
  43. SELECT 'Infinity'::float4 / 'Infinity'::float4;
  44. SELECT '42'::float4 / 'Infinity'::float4;
  45. SELECT 'nan'::float4 / 'nan'::float4;
  46. SELECT 'nan'::float4 / '0'::float4;
  47. SELECT 'nan'::numeric::float4;
  48. SELECT * FROM FLOAT4_TBL;
  49. SELECT f.* FROM FLOAT4_TBL f WHERE f.f1 <> '1004.3';
  50. SELECT f.* FROM FLOAT4_TBL f WHERE f.f1 = '1004.3';
  51. SELECT f.* FROM FLOAT4_TBL f WHERE '1004.3' > f.f1;
  52. SELECT f.* FROM FLOAT4_TBL f WHERE f.f1 < '1004.3';
  53. SELECT f.* FROM FLOAT4_TBL f WHERE '1004.3' >= f.f1;
  54. SELECT f.* FROM FLOAT4_TBL f WHERE f.f1 <= '1004.3';
  55. SELECT f.f1, f.f1 * '-10' AS x FROM FLOAT4_TBL f
  56. WHERE f.f1 > '0.0';
  57. SELECT f.f1, f.f1 / '-10' AS x FROM FLOAT4_TBL f
  58. WHERE f.f1 > '0.0';
  59. SELECT f.f1, f.f1 - '-10' AS x FROM FLOAT4_TBL f
  60. WHERE f.f1 > '0.0';
  61. -- test divide by zero
  62. SELECT f.f1 / '0.0' from FLOAT4_TBL f;
  63. SELECT * FROM FLOAT4_TBL;
  64. -- test the unary float4abs operator
  65. SELECT f.f1, @f.f1 AS abs_f1 FROM FLOAT4_TBL f;
  66. -- test edge-case coercions to integer
  67. SELECT '32767.4'::float4::int2;
  68. SELECT '32767.6'::float4::int2;
  69. SELECT '-32768.4'::float4::int2;
  70. SELECT '-32768.6'::float4::int2;
  71. SELECT '2147483520'::float4::int4;
  72. SELECT '2147483647'::float4::int4;
  73. SELECT '-2147483648.5'::float4::int4;
  74. SELECT '-2147483900'::float4::int4;
  75. SELECT '9223369837831520256'::float4::int8;
  76. SELECT '9223372036854775807'::float4::int8;
  77. SELECT '-9223372036854775808.5'::float4::int8;
  78. SELECT '-9223380000000000000'::float4::int8;
  79. -- Test for correct input rounding in edge cases.
  80. -- These lists are from Paxson 1991, excluding subnormals and
  81. -- inputs of over 9 sig. digits.
  82. SELECT float4send('5e-20'::float4);
  83. SELECT float4send('67e14'::float4);
  84. SELECT float4send('985e15'::float4);
  85. SELECT float4send('55895e-16'::float4);
  86. SELECT float4send('7038531e-32'::float4);
  87. SELECT float4send('702990899e-20'::float4);
  88. SELECT float4send('3e-23'::float4);
  89. SELECT float4send('57e18'::float4);
  90. SELECT float4send('789e-35'::float4);
  91. SELECT float4send('2539e-18'::float4);
  92. SELECT float4send('76173e28'::float4);
  93. SELECT float4send('887745e-11'::float4);
  94. SELECT float4send('5382571e-37'::float4);
  95. SELECT float4send('82381273e-35'::float4);
  96. SELECT float4send('750486563e-38'::float4);
  97. -- Test that the smallest possible normalized input value inputs
  98. -- correctly, either in 9-significant-digit or shortest-decimal
  99. -- format.
  100. --
  101. -- exact val is 1.1754943508...
  102. -- shortest val is 1.1754944000
  103. -- midpoint to next val is 1.1754944208...
  104. SELECT float4send('1.17549435e-38'::float4);
  105. SELECT float4send('1.1754944e-38'::float4);