129 {
130 const u64 F2 = 1572067135;
131 const u64 G2 = 907633384;
132
133
134 fl::u32 s = (((
u64)
x + (
u64)
y) * F2) >> 32;
135 fl::u32 i = ((
x>>1) + (s>>1)) >> 11;
136 fl::u32 j = ((
y>>1) + (s>>1)) >> 11;
137
141 fl::i32 x0 = ((
u64)
x<<2) - (X0>>18);
142 fl::i32 y0 = ((
u64)
y<<2) - (Y0>>18);
143
144
145
146 fl::u32 i1, j1;
147 if (x0 > y0) {
148 i1 = 1;
149 j1 = 0;
150 } else {
151 i1 = 0;
152 j1 = 1;
153 }
154
155
156
157
158
159 fl::i32 x1 = x0 - ((fl::i32)i1<<14) + (fl::i32)(G2>>18);
160 fl::i32 y1 = y0 - ((fl::i32)j1<<14) + (fl::i32)(G2>>18);
161 fl::i32 x2 = x0 - (1 << 14) + ((fl::i32)(2*G2)>>18);
162 fl::i32 y2 = y0 - (1 << 14) + ((fl::i32)(2*G2)>>18);
163
164 fl::i32 n0 = 0, n1 = 0, n2 = 0;
165
166
167 fl::i32 t0 = (((fl::i32)1 << 27) - x0*x0 - y0*y0) >> 12;
168 if (t0 > 0) {
169 t0 = (t0 * t0) >> 16;
170 t0 = (t0 * t0) >> 16;
172 }
173
174 fl::i32 t1 = (((fl::i32)1 << 27) - x1*x1 - y1*y1) >> 12;
175 if (t1 > 0) {
176 t1 = (t1 * t1) >> 16;
177 t1 = (t1 * t1) >> 16;
179 }
180
181 fl::i32 t2 = (((fl::i32)1 << 27) - x2*x2 - y2*y2) >> 12;
182 if (t2 > 0) {
183 t2 = (t2 * t2) >> 16;
184 t2 = (t2 * t2) >> 16;
186 }
187
188
189
190 fl::i32 n = n0 + n1 + n2;
191 n = ((n >> 8) * 23163) >> 16;
192 return (fl::u16)n + 0x8000;
193}
static fl::i32 grad(fl::u8 hash, fl::i32 x)