g10/sqrtu32.c

   1 /* sqrtu32.c - Return the very approximate sqrt of an unsigned integer.
   2  *
   3  * This file by g10 Code GmbH
   4  *
   5  * To the extent possible under law, the person who associated CC0 with
   6  * g10 Code GmbH has waived all copyright and related or neighboring rights
   7  * to this file.
   8  *
   9  * You should have received a copy of the CC0 legalcode along with this
  10  * work.  If not, see <http://creativecommons.org/publicdomain/zero/1.0/>.
  11  */
  12
  13 /* The R code to generate the following table.  */
  14 #if 0
  15 {
  16   m = 2^32 - 1
  17   last.i = 0
  18   last.sqrt = 0
  19   i = 0
  20   while (i < m) {
  21     if (sqrt(i) - last.sqrt > 0.05 * last.sqrt) {
  22       cat(paste0("  if (i <= ", last.i, "u) return ", last.sqrt, ";\n"));
  23       last.i = i
  24       last.sqrt = sqrt(i)
  25     }
  26     i = i + max(1, floor(last.sqrt / 10))
  27   }
  28   cat(paste0("  return ", sqrt(m), ";\n"))
  29 }
  30 #endif
  31
  32 float
  33 sqrtu32 (unsigned int i)
  34 {
  35   if (i <= 0u) return 0;
  36   if (i <= 1u) return 1;
  37   if (i <= 2u) return 1.4142135623731;
  38   if (i <= 3u) return 1.73205080756888;
  39   if (i <= 4u) return 2;
  40   if (i <= 5u) return 2.23606797749979;
  41   if (i <= 6u) return 2.44948974278318;
  42   if (i <= 7u) return 2.64575131106459;
  43   if (i <= 8u) return 2.82842712474619;
  44   if (i <= 9u) return 3;
  45   if (i <= 10u) return 3.16227766016838;
  46   if (i <= 12u) return 3.46410161513775;
  47   if (i <= 14u) return 3.74165738677394;
  48   if (i <= 16u) return 4;
  49   if (i <= 18u) return 4.24264068711928;
  50   if (i <= 20u) return 4.47213595499958;
  51   if (i <= 23u) return 4.79583152331272;
  52   if (i <= 26u) return 5.09901951359278;
  53   if (i <= 29u) return 5.3851648071345;
  54   if (i <= 32u) return 5.65685424949238;
  55   if (i <= 36u) return 6;
  56   if (i <= 40u) return 6.32455532033676;
  57   if (i <= 45u) return 6.70820393249937;
  58   if (i <= 50u) return 7.07106781186548;
  59   if (i <= 56u) return 7.48331477354788;
  60   if (i <= 62u) return 7.87400787401181;
  61   if (i <= 69u) return 8.30662386291807;
  62   if (i <= 77u) return 8.77496438739212;
  63   if (i <= 85u) return 9.21954445729289;
  64   if (i <= 94u) return 9.69535971483266;
  65   if (i <= 104u) return 10.1980390271856;
  66   if (i <= 115u) return 10.7238052947636;
  67   if (i <= 127u) return 11.2694276695846;
  68   if (i <= 141u) return 11.8743420870379;
  69   if (i <= 156u) return 12.4899959967968;
  70   if (i <= 172u) return 13.114877048604;
  71   if (i <= 190u) return 13.7840487520902;
  72   if (i <= 210u) return 14.4913767461894;
  73   if (i <= 232u) return 15.2315462117278;
  74   if (i <= 256u) return 16;
  75   if (i <= 283u) return 16.8226038412607;
  76   if (i <= 313u) return 17.6918060129541;
  77   if (i <= 346u) return 18.6010752377383;
  78   if (i <= 382u) return 19.5448202856921;
  79   if (i <= 422u) return 20.5426385841741;
  80   if (i <= 466u) return 21.5870331449229;
  81   if (i <= 514u) return 22.6715680975093;
  82   if (i <= 568u) return 23.832750575626;
  83   if (i <= 628u) return 25.0599281722833;
  84   if (i <= 694u) return 26.343879744639;
  85   if (i <= 766u) return 27.6767050061961;
  86   if (i <= 846u) return 29.086079144498;
  87   if (i <= 934u) return 30.5614135798723;
  88   if (i <= 1030u) return 32.0936130717624;
  89   if (i <= 1138u) return 33.734255586866;
  90   if (i <= 1255u) return 35.4259791678367;
  91   if (i <= 1384u) return 37.2021504754766;
  92   if (i <= 1528u) return 39.0896405713841;
  93   if (i <= 1687u) return 41.0731055558257;
  94   if (i <= 1863u) return 43.1624837098145;
  95   if (i <= 2055u) return 45.3321078265725;
  96   if (i <= 2267u) return 47.6130234284697;
  97   if (i <= 2503u) return 50.029991005396;
  98   if (i <= 2763u) return 52.5642464038057;
  99   if (i <= 3048u) return 55.208694967369;
 100   if (i <= 3363u) return 57.9913786695919;
 101   if (i <= 3708u) return 60.8933493905533;
 102   if (i <= 4092u) return 63.9687423668779;
 103   if (i <= 4512u) return 67.1714224949867;
 104   if (i <= 4980u) return 70.5691150575094;
 105   if (i <= 5491u) return 74.1012820401914;
 106   if (i <= 6058u) return 77.8331548891602;
 107   if (i <= 6681u) return 81.7373843476778;
 108   if (i <= 7369u) return 85.842879728024;
 109   if (i <= 8129u) return 90.160967164289;
 110   if (i <= 8966u) return 94.6889645101265;
 111   if (i <= 9893u) return 99.4635611668917;
 112   if (i <= 10910u) return 104.450945424156;
 113   if (i <= 12030u) return 109.68135666557;
 114   if (i <= 13270u) return 115.195486022674;
 115   if (i <= 14634u) return 120.971070921936;
 116   if (i <= 16134u) return 127.019683514013;
 117   if (i <= 17790u) return 133.379158791769;
 118   if (i <= 19623u) return 140.08211877324;
 119   if (i <= 21639u) return 147.102005424807;
 120   if (i <= 23865u) return 154.483008774428;
 121   if (i <= 26325u) return 162.24980739588;
 122   if (i <= 29029u) return 170.378989314997;
 123   if (i <= 32021u) return 178.94412535761;
 124   if (i <= 35319u) return 187.933498876597;
 125   if (i <= 38955u) return 197.370210518204;
 126   if (i <= 42964u) return 207.277591649459;
 127   if (i <= 47384u) return 217.678662252413;
 128   if (i <= 52256u) return 228.595712995673;
 129   if (i <= 57624u) return 240.049994792751;
 130   if (i <= 63552u) return 252.09522010542;
 131   if (i <= 70077u) return 264.720607433573;
 132   if (i <= 77279u) return 277.991007048789;
 133   if (i <= 85217u) return 291.919509454233;
 134   if (i <= 93975u) return 306.553421119387;
 135   if (i <= 103635u) return 321.923904051874;
 136   if (i <= 114259u) return 338.022188620806;
 137   if (i <= 125974u) return 354.928161745444;
 138   if (i <= 138889u) return 372.678145321134;
 139   if (i <= 153134u) return 391.323395671662;
 140   if (i <= 168851u) return 410.914833025044;
 141   if (i <= 186194u) return 431.5020278052;
 142   if (i <= 205286u) return 453.084980991425;
 143   if (i <= 226346u) return 475.758342018298;
 144   if (i <= 249564u) return 499.563809738055;
 145   if (i <= 275191u) return 524.586503829445;
 146   if (i <= 303427u) return 550.842082633489;
 147   if (i <= 334557u) return 578.409024825858;
 148   if (i <= 368871u) return 607.347511726195;
 149   if (i <= 406731u) return 637.754655020251;
 150   if (i <= 448437u) return 669.654388472143;
 151   if (i <= 494439u) return 703.163565609027;
 152   if (i <= 545119u) return 738.321745582507;
 153   if (i <= 601037u) return 775.265760884614;
 154   if (i <= 662714u) return 814.072478345755;
 155   if (i <= 730673u) return 854.794127261062;
 156   if (i <= 805643u) return 897.576180610872;
 157   if (i <= 888235u) return 942.46220083354;
 158   if (i <= 979321u) return 989.60648744842;
 159   if (i <= 1079771u) return 1039.1203010239;
 160   if (i <= 1190496u) return 1091.09852900643;
 161   if (i <= 1312576u) return 1145.67709237813;
 162   if (i <= 1447210u) return 1203.00041562753;
 163   if (i <= 1595650u) return 1263.19040528338;
 164   if (i <= 1759324u) return 1326.3951145869;
 165   if (i <= 1939768u) return 1392.75554208195;
 166   if (i <= 2138677u) return 1462.42162183141;
 167   if (i <= 2357969u) return 1535.5679730966;
 168   if (i <= 2599709u) return 1612.3613118653;
 169   if (i <= 2866325u) return 1693.02244521448;
 170   if (i <= 3160216u) return 1777.69963717159;
 171   if (i <= 3484303u) return 1866.62877937741;
 172   if (i <= 3841609u) return 1960.00229591702;
 173   if (i <= 4235569u) return 2058.04980503388;
 174   if (i <= 4669759u) return 2160.962517028;
 175   if (i <= 5148415u) return 2269.011899484;
 176   if (i <= 5676351u) return 2382.50939137708;
 177   if (i <= 6258261u) return 2501.65165440754;
 178   if (i <= 6899761u) return 2626.73961404628;
 179   if (i <= 7607161u) return 2758.10822847835;
 180   if (i <= 8387061u) return 2896.04229941484;
 181   if (i <= 9246836u) return 3040.86106226509;
 182   if (i <= 10194708u) return 3192.91528230863;
 183   if (i <= 11239752u) return 3352.57393654487;
 184   if (i <= 12392152u) return 3520.24885483967;
 185   if (i <= 13662520u) return 3696.2846210756;
 186   if (i <= 15063244u) return 3881.13952338743;
 187   if (i <= 16607484u) return 4075.22809177597;
 188   if (i <= 18309965u) return 4279.01448934214;
 189   if (i <= 20187057u) return 4493.00089027367;
 190   if (i <= 22256498u) return 4717.67930236891;
 191   if (i <= 24538022u) return 4953.58678131311;
 192   if (i <= 27053612u) return 5201.30868147623;
 193   if (i <= 29826772u) return 5461.3892005606;
 194   if (i <= 32884372u) return 5734.48968958878;
 195   if (i <= 36255331u) return 6021.23998857378;
 196   if (i <= 39972079u) return 6322.34758614235;
 197   if (i <= 44069335u) return 6638.47384569677;
 198   if (i <= 48587017u) return 6970.43879537006;
 199   if (i <= 53567779u) return 7319.00122967608;
 200   if (i <= 59059051u) return 7684.98867923694;
 201   if (i <= 65113195u) return 8069.27475055844;
 202   if (i <= 71787681u) return 8472.76112020161;
 203   if (i <= 79146417u) return 8896.4272042208;
 204   if (i <= 87259431u) return 9341.27566234934;
 205   if (i <= 96204349u) return 9808.38156884203;
 206   if (i <= 106066089u) return 10298.8392064349;
 207   if (i <= 116938503u) return 10813.8107529215;
 208   if (i <= 128925712u) return 11354.5458737899;
 209   if (i <= 142141652u) return 11922.3173921851;
 210   if (i <= 156711468u) return 12518.445111115;
 211   if (i <= 172775559u) return 13144.4117023167;
 212   if (i <= 190485651u) return 13801.6539226283;
 213   if (i <= 210011271u) return 14491.7656274175;
 214   if (i <= 231537615u) return 15216.360110092;
 215   if (i <= 255271299u) return 15977.2118656542;
 216   if (i <= 281438144u) return 16776.1182637701;
 217   if (i <= 310285898u) return 17614.9339482156;
 218   if (i <= 342091319u) return 18495.710827108;
 219   if (i <= 377155755u) return 19420.4983200741;
 220   if (i <= 415815149u) return 20391.5460178967;
 221   if (i <= 458436366u) return 21411.1271538889;
 222   if (i <= 505427034u) return 22481.7044282679;
 223   if (i <= 557234442u) return 23605.8137330616;
 224   if (i <= 614351162u) return 24786.1082463544;
 225   if (i <= 677324576u) return 26025.4601496304;
 226   if (i <= 746751140u) return 27326.7477025716;
 227   if (i <= 823293584u) return 28693.0929667751;
 228   if (i <= 907682350u) return 30127.7670928331;
 229   if (i <= 1000720018u) return 31634.1590373444;
 230   if (i <= 1103296108u) return 33215.9014328981;
 231   if (i <= 1216386121u) return 34876.7274984337;
 232   if (i <= 1341067293u) return 36620.5856452351;
 233   if (i <= 1478527787u) return 38451.6291852504;
 234   if (i <= 1630078462u) return 40374.2301722274;
 235   if (i <= 1797161818u) return 42392.9453800983;
 236   if (i <= 1981371802u) return 44512.60273226;
 237   if (i <= 2184466481u) return 46738.2764016817;
 238   if (i <= 2408377949u) return 49075.2274472569;
 239   if (i <= 2655239305u) return 51529.014205591;
 240   if (i <= 2927404009u) return 54105.4896382983;
 241   if (i <= 3227464249u) return 56810.7758176211;
 242   if (i <= 3558280241u) return 59651.3222066368;
 243   return 65535.9999923706;
 244 }