1
2BEGIN {
3    if ($ENV{PERL_CORE}) {
4	chdir('t') if -d 't';
5	@INC = $^O eq 'MacOS' ? qw(::lib) : qw(../lib);
6    }
7}
8
9use strict;
10use warnings;
11BEGIN { $| = 1; print "1..8025\n"; }
12my $count = 0;
13sub ok ($;$) {
14    my $p = my $r = shift;
15    if (@_) {
16	my $x = shift;
17	$p = !defined $x ? !defined $r : !defined $r ? 0 : $r eq $x;
18    }
19    print $p ? "ok" : "not ok", ' ', ++$count, "\n";
20}
21
22use Unicode::Collate::Locale;
23
24ok(1);
25
26sub _pack_U   { Unicode::Collate::pack_U(@_) }
27sub _unpack_U { Unicode::Collate::unpack_U(@_) }
28
29#########################
30
31my $objDefault = Unicode::Collate::Locale->
32    new(locale => 'DEFAULT', normalization => undef);
33
34ok($objDefault->getlocale, 'default');
35
36my $objB = Unicode::Collate::Locale->
37    new(locale => 'ZH__big5han', normalization => undef);
38
39ok($objB->getlocale, 'zh__big5han');
40
41my $objG = Unicode::Collate::Locale->
42    new(locale => 'ZH__gb2312han', normalization => undef);
43
44ok($objG->getlocale, 'zh__gb2312han');
45
46my $objJ = Unicode::Collate::Locale->
47    new(locale => 'JA', normalization => undef);
48
49ok($objJ->getlocale, 'ja');
50
51my $objK = Unicode::Collate::Locale->
52    new(locale => 'KO', normalization => undef);
53
54ok($objK->getlocale, 'ko');
55
56my $objP = Unicode::Collate::Locale->
57    new(locale => 'ZH__pinyin', normalization => undef);
58
59ok($objP->getlocale, 'zh__pinyin');
60
61my $objS = Unicode::Collate::Locale->
62    new(locale => 'ZH__stroke', normalization => undef);
63
64ok($objS->getlocale, 'zh__stroke');
65
66my $objZ = Unicode::Collate::Locale->
67    new(locale => 'ZH__zhuyin', normalization => undef);
68
69ok($objZ->getlocale, 'zh__zhuyin');
70
71for my $obj ($objDefault, $objB, $objG, $objJ, $objK, $objP, $objS, $objZ) {
72    $obj->change(level => 3);
73    ok($obj->eq("\x{4E0D}", "\x{F967}"));
74    ok($obj->eq("\x{4E26}", "\x{FA70}"));
75    ok($obj->eq("\x{4E32}", "\x{F905}"));
76    ok($obj->eq("\x{4E38}", "\x{2F801}"));
77    ok($obj->eq("\x{4E39}", "\x{F95E}"));
78    ok($obj->eq("\x{4E3D}", "\x{2F800}"));
79    ok($obj->eq("\x{4E41}", "\x{2F802}"));
80    ok($obj->eq("\x{4E82}", "\x{F91B}"));
81    ok($obj->eq("\x{4E86}", "\x{F9BA}"));
82    ok($obj->eq("\x{4EAE}", "\x{F977}"));
83    ok($obj->eq("\x{4EC0}", "\x{F9FD}"));
84    ok($obj->eq("\x{4ECC}", "\x{2F819}"));
85    ok($obj->eq("\x{4EE4}", "\x{F9A8}"));
86    ok($obj->eq("\x{4F60}", "\x{2F804}"));
87    ok($obj->eq("\x{4F80}", "\x{FA73}"));
88    ok($obj->eq("\x{4F86}", "\x{F92D}"));
89    ok($obj->eq("\x{4F8B}", "\x{F9B5}"));
90    ok($obj->eq("\x{4FAE}", "\x{FA30}"));
91    ok($obj->eq("\x{4FAE}", "\x{2F805}"));
92    ok($obj->eq("\x{4FBB}", "\x{2F806}"));
93    ok($obj->eq("\x{4FBF}", "\x{F965}"));
94    ok($obj->eq("\x{5002}", "\x{2F807}"));
95    ok($obj->eq("\x{502B}", "\x{F9D4}"));
96    ok($obj->eq("\x{507A}", "\x{2F808}"));
97    ok($obj->eq("\x{5099}", "\x{2F809}"));
98    ok($obj->eq("\x{50CF}", "\x{2F80B}"));
99    ok($obj->eq("\x{50DA}", "\x{F9BB}"));
100    ok($obj->eq("\x{50E7}", "\x{FA31}"));
101    ok($obj->eq("\x{50E7}", "\x{2F80A}"));
102    ok($obj->eq("\x{5140}", "\x{FA0C}"));
103    ok($obj->eq("\x{5145}", "\x{FA74}"));
104    ok($obj->eq("\x{514D}", "\x{FA32}"));
105    ok($obj->eq("\x{514D}", "\x{2F80E}"));
106    ok($obj->eq("\x{5154}", "\x{2F80F}"));
107    ok($obj->eq("\x{5164}", "\x{2F810}"));
108    ok($obj->eq("\x{5167}", "\x{2F814}"));
109    ok($obj->eq("\x{5168}", "\x{FA72}"));
110    ok($obj->eq("\x{5169}", "\x{F978}"));
111    ok($obj->eq("\x{516D}", "\x{F9D1}"));
112    ok($obj->eq("\x{5177}", "\x{2F811}"));
113    ok($obj->eq("\x{5180}", "\x{FA75}"));
114    ok($obj->eq("\x{518D}", "\x{2F815}"));
115    ok($obj->eq("\x{5192}", "\x{2F8D2}"));
116    ok($obj->eq("\x{5195}", "\x{2F8D3}"));
117    ok($obj->eq("\x{5197}", "\x{2F817}"));
118    ok($obj->eq("\x{51A4}", "\x{2F818}"));
119    ok($obj->eq("\x{51AC}", "\x{2F81A}"));
120    ok($obj->eq("\x{51B5}", "\x{FA71}"));
121    ok($obj->eq("\x{51B5}", "\x{2F81B}"));
122    ok($obj->eq("\x{51B7}", "\x{F92E}"));
123    ok($obj->eq("\x{51C9}", "\x{F979}"));
124    ok($obj->eq("\x{51CC}", "\x{F955}"));
125    ok($obj->eq("\x{51DC}", "\x{F954}"));
126    ok($obj->eq("\x{51DE}", "\x{FA15}"));
127    ok($obj->eq("\x{51F5}", "\x{2F81D}"));
128    ok($obj->eq("\x{5203}", "\x{2F81E}"));
129    ok($obj->eq("\x{5207}", "\x{FA00}"));
130    ok($obj->eq("\x{5207}", "\x{2F850}"));
131    ok($obj->eq("\x{5217}", "\x{F99C}"));
132    ok($obj->eq("\x{5229}", "\x{F9DD}"));
133    ok($obj->eq("\x{523A}", "\x{F9FF}"));
134    ok($obj->eq("\x{523B}", "\x{2F820}"));
135    ok($obj->eq("\x{5246}", "\x{2F821}"));
136    ok($obj->eq("\x{5272}", "\x{2F822}"));
137    ok($obj->eq("\x{5277}", "\x{2F823}"));
138    ok($obj->eq("\x{5289}", "\x{F9C7}"));
139    ok($obj->eq("\x{529B}", "\x{F98A}"));
140    ok($obj->eq("\x{52A3}", "\x{F99D}"));
141    ok($obj->eq("\x{52B3}", "\x{2F992}"));
142    ok($obj->eq("\x{52C7}", "\x{FA76}"));
143    ok($obj->eq("\x{52C7}", "\x{2F825}"));
144    ok($obj->eq("\x{52C9}", "\x{FA33}"));
145    ok($obj->eq("\x{52C9}", "\x{2F826}"));
146    ok($obj->eq("\x{52D2}", "\x{F952}"));
147    ok($obj->eq("\x{52DE}", "\x{F92F}"));
148    ok($obj->eq("\x{52E4}", "\x{FA34}"));
149    ok($obj->eq("\x{52E4}", "\x{2F827}"));
150    ok($obj->eq("\x{52F5}", "\x{F97F}"));
151    ok($obj->eq("\x{52FA}", "\x{FA77}"));
152    ok($obj->eq("\x{52FA}", "\x{2F828}"));
153    ok($obj->eq("\x{5305}", "\x{2F829}"));
154    ok($obj->eq("\x{5306}", "\x{2F82A}"));
155    ok($obj->eq("\x{5317}", "\x{F963}"));
156    ok($obj->eq("\x{5317}", "\x{2F82B}"));
157    ok($obj->eq("\x{533F}", "\x{F9EB}"));
158    ok($obj->eq("\x{5349}", "\x{2F82C}"));
159    ok($obj->eq("\x{5351}", "\x{FA35}"));
160    ok($obj->eq("\x{5351}", "\x{2F82D}"));
161    ok($obj->eq("\x{535A}", "\x{2F82E}"));
162    ok($obj->eq("\x{5373}", "\x{2F82F}"));
163    ok($obj->eq("\x{5375}", "\x{F91C}"));
164    ok($obj->eq("\x{537D}", "\x{2F830}"));
165    ok($obj->eq("\x{537F}", "\x{2F831}"));
166    ok($obj->eq("\x{537F}", "\x{2F832}"));
167    ok($obj->eq("\x{537F}", "\x{2F833}"));
168    ok($obj->eq("\x{53C3}", "\x{F96B}"));
169    ok($obj->eq("\x{53CA}", "\x{2F836}"));
170    ok($obj->eq("\x{53DF}", "\x{2F837}"));
171    ok($obj->eq("\x{53E5}", "\x{F906}"));
172    ok($obj->eq("\x{53EB}", "\x{2F839}"));
173    ok($obj->eq("\x{53F1}", "\x{2F83A}"));
174    ok($obj->eq("\x{5406}", "\x{2F83B}"));
175    ok($obj->eq("\x{540F}", "\x{F9DE}"));
176    ok($obj->eq("\x{541D}", "\x{F9ED}"));
177    ok($obj->eq("\x{5438}", "\x{2F83D}"));
178    ok($obj->eq("\x{5442}", "\x{F980}"));
179    ok($obj->eq("\x{5448}", "\x{2F83E}"));
180    ok($obj->eq("\x{5468}", "\x{2F83F}"));
181    ok($obj->eq("\x{549E}", "\x{2F83C}"));
182    ok($obj->eq("\x{54A2}", "\x{2F840}"));
183    ok($obj->eq("\x{54BD}", "\x{F99E}"));
184    ok($obj->eq("\x{54F6}", "\x{2F841}"));
185    ok($obj->eq("\x{5510}", "\x{2F842}"));
186    ok($obj->eq("\x{5553}", "\x{2F843}"));
187    ok($obj->eq("\x{5555}", "\x{FA79}"));
188    ok($obj->eq("\x{5563}", "\x{2F844}"));
189    ok($obj->eq("\x{5584}", "\x{2F845}"));
190    ok($obj->eq("\x{5584}", "\x{2F846}"));
191    ok($obj->eq("\x{5587}", "\x{F90B}"));
192    ok($obj->eq("\x{5599}", "\x{FA7A}"));
193    ok($obj->eq("\x{5599}", "\x{2F847}"));
194    ok($obj->eq("\x{559D}", "\x{FA36}"));
195    ok($obj->eq("\x{559D}", "\x{FA78}"));
196    ok($obj->eq("\x{55AB}", "\x{2F848}"));
197    ok($obj->eq("\x{55B3}", "\x{2F849}"));
198    ok($obj->eq("\x{55C0}", "\x{FA0D}"));
199    ok($obj->eq("\x{55C2}", "\x{2F84A}"));
200    ok($obj->eq("\x{55E2}", "\x{FA7B}"));
201    ok($obj->eq("\x{5606}", "\x{FA37}"));
202    ok($obj->eq("\x{5606}", "\x{2F84C}"));
203    ok($obj->eq("\x{5651}", "\x{2F84E}"));
204    ok($obj->eq("\x{5668}", "\x{FA38}"));
205    ok($obj->eq("\x{5674}", "\x{2F84F}"));
206    ok($obj->eq("\x{56F9}", "\x{F9A9}"));
207    ok($obj->eq("\x{5716}", "\x{2F84B}"));
208    ok($obj->eq("\x{5717}", "\x{2F84D}"));
209    ok($obj->eq("\x{578B}", "\x{2F855}"));
210    ok($obj->eq("\x{57CE}", "\x{2F852}"));
211    ok($obj->eq("\x{57F4}", "\x{2F853}"));
212    ok($obj->eq("\x{580D}", "\x{2F854}"));
213    ok($obj->eq("\x{5831}", "\x{2F857}"));
214    ok($obj->eq("\x{5832}", "\x{2F856}"));
215    ok($obj->eq("\x{5840}", "\x{FA39}"));
216    ok($obj->eq("\x{585A}", "\x{FA10}"));
217    ok($obj->eq("\x{585A}", "\x{FA7C}"));
218    ok($obj->eq("\x{585E}", "\x{F96C}"));
219    ok($obj->eq("\x{58A8}", "\x{FA3A}"));
220    ok($obj->eq("\x{58AC}", "\x{2F858}"));
221    ok($obj->eq("\x{58B3}", "\x{FA7D}"));
222    ok($obj->eq("\x{58D8}", "\x{F94A}"));
223    ok($obj->eq("\x{58DF}", "\x{F942}"));
224    ok($obj->eq("\x{58EE}", "\x{2F851}"));
225    ok($obj->eq("\x{58F2}", "\x{2F85A}"));
226    ok($obj->eq("\x{58F7}", "\x{2F85B}"));
227    ok($obj->eq("\x{5906}", "\x{2F85C}"));
228    ok($obj->eq("\x{591A}", "\x{2F85D}"));
229    ok($obj->eq("\x{5922}", "\x{2F85E}"));
230    ok($obj->eq("\x{5944}", "\x{FA7E}"));
231    ok($obj->eq("\x{5948}", "\x{F90C}"));
232    ok($obj->eq("\x{5951}", "\x{F909}"));
233    ok($obj->eq("\x{5954}", "\x{FA7F}"));
234    ok($obj->eq("\x{5962}", "\x{2F85F}"));
235    ok($obj->eq("\x{5973}", "\x{F981}"));
236    ok($obj->eq("\x{59D8}", "\x{2F865}"));
237    ok($obj->eq("\x{59EC}", "\x{2F862}"));
238    ok($obj->eq("\x{5A1B}", "\x{2F863}"));
239    ok($obj->eq("\x{5A27}", "\x{2F864}"));
240    ok($obj->eq("\x{5A62}", "\x{FA80}"));
241    ok($obj->eq("\x{5A66}", "\x{2F866}"));
242    ok($obj->eq("\x{5AB5}", "\x{2F986}"));
243    ok($obj->eq("\x{5B08}", "\x{2F869}"));
244    ok($obj->eq("\x{5B28}", "\x{FA81}"));
245    ok($obj->eq("\x{5B3E}", "\x{2F86A}"));
246    ok($obj->eq("\x{5B3E}", "\x{2F86B}"));
247    ok($obj->eq("\x{5B85}", "\x{FA04}"));
248    ok($obj->eq("\x{5BC3}", "\x{2F86D}"));
249    ok($obj->eq("\x{5BD8}", "\x{2F86E}"));
250    ok($obj->eq("\x{5BE7}", "\x{F95F}"));
251    ok($obj->eq("\x{5BE7}", "\x{F9AA}"));
252    ok($obj->eq("\x{5BE7}", "\x{2F86F}"));
253    ok($obj->eq("\x{5BEE}", "\x{F9BC}"));
254    ok($obj->eq("\x{5BF3}", "\x{2F870}"));
255    ok($obj->eq("\x{5BFF}", "\x{2F872}"));
256    ok($obj->eq("\x{5C06}", "\x{2F873}"));
257    ok($obj->eq("\x{5C22}", "\x{2F875}"));
258    ok($obj->eq("\x{5C3F}", "\x{F9BD}"));
259    ok($obj->eq("\x{5C60}", "\x{2F877}"));
260    ok($obj->eq("\x{5C62}", "\x{F94B}"));
261    ok($obj->eq("\x{5C64}", "\x{FA3B}"));
262    ok($obj->eq("\x{5C65}", "\x{F9DF}"));
263    ok($obj->eq("\x{5C6E}", "\x{FA3C}"));
264    ok($obj->eq("\x{5C6E}", "\x{2F878}"));
265    ok($obj->eq("\x{5C8D}", "\x{2F87A}"));
266    ok($obj->eq("\x{5CC0}", "\x{2F879}"));
267    ok($obj->eq("\x{5D19}", "\x{F9D5}"));
268    ok($obj->eq("\x{5D43}", "\x{2F87C}"));
269    ok($obj->eq("\x{5D50}", "\x{F921}"));
270    ok($obj->eq("\x{5D6B}", "\x{2F87F}"));
271    ok($obj->eq("\x{5D6E}", "\x{2F87E}"));
272    ok($obj->eq("\x{5D7C}", "\x{2F880}"));
273    ok($obj->eq("\x{5DB2}", "\x{2F9F4}"));
274    ok($obj->eq("\x{5DBA}", "\x{F9AB}"));
275    ok($obj->eq("\x{5DE1}", "\x{2F881}"));
276    ok($obj->eq("\x{5DE2}", "\x{2F882}"));
277    ok($obj->eq("\x{5DFD}", "\x{2F884}"));
278    ok($obj->eq("\x{5E28}", "\x{2F885}"));
279    ok($obj->eq("\x{5E3D}", "\x{2F886}"));
280    ok($obj->eq("\x{5E69}", "\x{2F887}"));
281    ok($obj->eq("\x{5E74}", "\x{F98E}"));
282    ok($obj->eq("\x{5EA6}", "\x{FA01}"));
283    ok($obj->eq("\x{5EB0}", "\x{2F88B}"));
284    ok($obj->eq("\x{5EB3}", "\x{2F88C}"));
285    ok($obj->eq("\x{5EB6}", "\x{2F88D}"));
286    ok($obj->eq("\x{5EC9}", "\x{F9A2}"));
287    ok($obj->eq("\x{5ECA}", "\x{F928}"));
288    ok($obj->eq("\x{5ECA}", "\x{2F88E}"));
289    ok($obj->eq("\x{5ED2}", "\x{FA82}"));
290    ok($obj->eq("\x{5ED3}", "\x{FA0B}"));
291    ok($obj->eq("\x{5ED9}", "\x{FA83}"));
292    ok($obj->eq("\x{5EEC}", "\x{F982}"));
293    ok($obj->eq("\x{5EFE}", "\x{2F890}"));
294    ok($obj->eq("\x{5F04}", "\x{F943}"));
295    ok($obj->eq("\x{5F22}", "\x{2F894}"));
296    ok($obj->eq("\x{5F22}", "\x{2F895}"));
297    ok($obj->eq("\x{5F53}", "\x{2F874}"));
298    ok($obj->eq("\x{5F62}", "\x{2F899}"));
299    ok($obj->eq("\x{5F69}", "\x{FA84}"));
300    ok($obj->eq("\x{5F6B}", "\x{2F89A}"));
301    ok($obj->eq("\x{5F8B}", "\x{F9D8}"));
302    ok($obj->eq("\x{5F9A}", "\x{2F89C}"));
303    ok($obj->eq("\x{5FA9}", "\x{F966}"));
304    ok($obj->eq("\x{5FAD}", "\x{FA85}"));
305    ok($obj->eq("\x{5FCD}", "\x{2F89D}"));
306    ok($obj->eq("\x{5FD7}", "\x{2F89E}"));
307    ok($obj->eq("\x{5FF5}", "\x{F9A3}"));
308    ok($obj->eq("\x{5FF9}", "\x{2F89F}"));
309    ok($obj->eq("\x{6012}", "\x{F960}"));
310    ok($obj->eq("\x{601C}", "\x{F9AC}"));
311    ok($obj->eq("\x{6075}", "\x{FA6B}"));
312    ok($obj->eq("\x{6081}", "\x{2F8A0}"));
313    ok($obj->eq("\x{6094}", "\x{FA3D}"));
314    ok($obj->eq("\x{6094}", "\x{2F8A3}"));
315    ok($obj->eq("\x{60C7}", "\x{2F8A5}"));
316    ok($obj->eq("\x{60D8}", "\x{FA86}"));
317    ok($obj->eq("\x{60E1}", "\x{F9B9}"));
318    ok($obj->eq("\x{6108}", "\x{FA88}"));
319    ok($obj->eq("\x{6144}", "\x{F9D9}"));
320    ok($obj->eq("\x{6148}", "\x{2F8A6}"));
321    ok($obj->eq("\x{614C}", "\x{2F8A7}"));
322    ok($obj->eq("\x{614C}", "\x{2F8A9}"));
323    ok($obj->eq("\x{614E}", "\x{FA87}"));
324    ok($obj->eq("\x{614E}", "\x{2F8A8}"));
325    ok($obj->eq("\x{6160}", "\x{FA8A}"));
326    ok($obj->eq("\x{6168}", "\x{FA3E}"));
327    ok($obj->eq("\x{617A}", "\x{2F8AA}"));
328    ok($obj->eq("\x{618E}", "\x{FA3F}"));
329    ok($obj->eq("\x{618E}", "\x{FA89}"));
330    ok($obj->eq("\x{618E}", "\x{2F8AB}"));
331    ok($obj->eq("\x{6190}", "\x{F98F}"));
332    ok($obj->eq("\x{61A4}", "\x{2F8AD}"));
333    ok($obj->eq("\x{61AF}", "\x{2F8AE}"));
334    ok($obj->eq("\x{61B2}", "\x{2F8AC}"));
335    ok($obj->eq("\x{61DE}", "\x{2F8AF}"));
336    ok($obj->eq("\x{61F2}", "\x{FA40}"));
337    ok($obj->eq("\x{61F2}", "\x{FA8B}"));
338    ok($obj->eq("\x{61F2}", "\x{2F8B0}"));
339    ok($obj->eq("\x{61F6}", "\x{F90D}"));
340    ok($obj->eq("\x{61F6}", "\x{2F8B1}"));
341    ok($obj->eq("\x{6200}", "\x{F990}"));
342    ok($obj->eq("\x{6210}", "\x{2F8B2}"));
343    ok($obj->eq("\x{621B}", "\x{2F8B3}"));
344    ok($obj->eq("\x{622E}", "\x{F9D2}"));
345    ok($obj->eq("\x{6234}", "\x{FA8C}"));
346    ok($obj->eq("\x{625D}", "\x{2F8B4}"));
347    ok($obj->eq("\x{62B1}", "\x{2F8B5}"));
348    ok($obj->eq("\x{62C9}", "\x{F925}"));
349    ok($obj->eq("\x{62CF}", "\x{F95B}"));
350    ok($obj->eq("\x{62D3}", "\x{FA02}"));
351    ok($obj->eq("\x{62D4}", "\x{2F8B6}"));
352    ok($obj->eq("\x{62FC}", "\x{2F8BA}"));
353    ok($obj->eq("\x{62FE}", "\x{F973}"));
354    ok($obj->eq("\x{633D}", "\x{2F8B9}"));
355    ok($obj->eq("\x{6350}", "\x{2F8B7}"));
356    ok($obj->eq("\x{6368}", "\x{2F8BB}"));
357    ok($obj->eq("\x{637B}", "\x{F9A4}"));
358    ok($obj->eq("\x{6383}", "\x{2F8BC}"));
359    ok($obj->eq("\x{63A0}", "\x{F975}"));
360    ok($obj->eq("\x{63A9}", "\x{2F8C1}"));
361    ok($obj->eq("\x{63C4}", "\x{FA8D}"));
362    ok($obj->eq("\x{63C5}", "\x{2F8C0}"));
363    ok($obj->eq("\x{63E4}", "\x{2F8BD}"));
364    ok($obj->eq("\x{641C}", "\x{FA8E}"));
365    ok($obj->eq("\x{6422}", "\x{2F8BF}"));
366    ok($obj->eq("\x{6452}", "\x{FA8F}"));
367    ok($obj->eq("\x{6469}", "\x{2F8C3}"));
368    ok($obj->eq("\x{6477}", "\x{2F8C6}"));
369    ok($obj->eq("\x{647E}", "\x{2F8C4}"));
370    ok($obj->eq("\x{649A}", "\x{F991}"));
371    ok($obj->eq("\x{649D}", "\x{2F8C5}"));
372    ok($obj->eq("\x{64C4}", "\x{F930}"));
373    ok($obj->eq("\x{654F}", "\x{FA41}"));
374    ok($obj->eq("\x{654F}", "\x{2F8C8}"));
375    ok($obj->eq("\x{6556}", "\x{FA90}"));
376    ok($obj->eq("\x{656C}", "\x{2F8C9}"));
377    ok($obj->eq("\x{6578}", "\x{F969}"));
378    ok($obj->eq("\x{6599}", "\x{F9BE}"));
379    ok($obj->eq("\x{65C5}", "\x{F983}"));
380    ok($obj->eq("\x{65E2}", "\x{FA42}"));
381    ok($obj->eq("\x{65E3}", "\x{2F8CB}"));
382    ok($obj->eq("\x{6613}", "\x{F9E0}"));
383    ok($obj->eq("\x{6649}", "\x{2F8CD}"));
384    ok($obj->eq("\x{6674}", "\x{FA12}"));
385    ok($obj->eq("\x{6674}", "\x{FA91}"));
386    ok($obj->eq("\x{6688}", "\x{F9C5}"));
387    ok($obj->eq("\x{6691}", "\x{FA43}"));
388    ok($obj->eq("\x{6691}", "\x{2F8CF}"));
389    ok($obj->eq("\x{669C}", "\x{2F8D5}"));
390    ok($obj->eq("\x{66B4}", "\x{FA06}"));
391    ok($obj->eq("\x{66C6}", "\x{F98B}"));
392    ok($obj->eq("\x{66F4}", "\x{F901}"));
393    ok($obj->eq("\x{66F8}", "\x{2F8CC}"));
394    ok($obj->eq("\x{6700}", "\x{2F8D4}"));
395    ok($obj->eq("\x{6717}", "\x{F929}"));
396    ok($obj->eq("\x{6717}", "\x{FA92}"));
397    ok($obj->eq("\x{6717}", "\x{2F8D8}"));
398    ok($obj->eq("\x{671B}", "\x{FA93}"));
399    ok($obj->eq("\x{671B}", "\x{2F8D9}"));
400    ok($obj->eq("\x{6721}", "\x{2F8DA}"));
401    ok($obj->eq("\x{674E}", "\x{F9E1}"));
402    ok($obj->eq("\x{6753}", "\x{2F8DC}"));
403    ok($obj->eq("\x{6756}", "\x{FA94}"));
404    ok($obj->eq("\x{675E}", "\x{2F8DB}"));
405    ok($obj->eq("\x{677B}", "\x{F9C8}"));
406    ok($obj->eq("\x{6785}", "\x{2F8E0}"));
407    ok($obj->eq("\x{6797}", "\x{F9F4}"));
408    ok($obj->eq("\x{67F3}", "\x{F9C9}"));
409    ok($obj->eq("\x{67FA}", "\x{2F8DF}"));
410    ok($obj->eq("\x{6817}", "\x{F9DA}"));
411    ok($obj->eq("\x{681F}", "\x{2F8E5}"));
412    ok($obj->eq("\x{6852}", "\x{2F8E1}"));
413    ok($obj->eq("\x{6881}", "\x{F97A}"));
414    ok($obj->eq("\x{6885}", "\x{FA44}"));
415    ok($obj->eq("\x{6885}", "\x{2F8E2}"));
416    ok($obj->eq("\x{688E}", "\x{2F8E4}"));
417    ok($obj->eq("\x{68A8}", "\x{F9E2}"));
418    ok($obj->eq("\x{6914}", "\x{2F8E6}"));
419    ok($obj->eq("\x{6942}", "\x{2F8E8}"));
420    ok($obj->eq("\x{69A3}", "\x{2F8E9}"));
421    ok($obj->eq("\x{69EA}", "\x{2F8EA}"));
422    ok($obj->eq("\x{6A02}", "\x{F914}"));
423    ok($obj->eq("\x{6A02}", "\x{F95C}"));
424    ok($obj->eq("\x{6A02}", "\x{F9BF}"));
425    ok($obj->eq("\x{6A13}", "\x{F94C}"));
426    ok($obj->eq("\x{6AA8}", "\x{2F8EB}"));
427    ok($obj->eq("\x{6AD3}", "\x{F931}"));
428    ok($obj->eq("\x{6ADB}", "\x{2F8ED}"));
429    ok($obj->eq("\x{6B04}", "\x{F91D}"));
430    ok($obj->eq("\x{6B21}", "\x{2F8EF}"));
431    ok($obj->eq("\x{6B54}", "\x{2F8F1}"));
432    ok($obj->eq("\x{6B72}", "\x{2F8F3}"));
433    ok($obj->eq("\x{6B77}", "\x{F98C}"));
434    ok($obj->eq("\x{6B79}", "\x{FA95}"));
435    ok($obj->eq("\x{6B9F}", "\x{2F8F4}"));
436    ok($obj->eq("\x{6BAE}", "\x{F9A5}"));
437    ok($obj->eq("\x{6BBA}", "\x{F970}"));
438    ok($obj->eq("\x{6BBA}", "\x{FA96}"));
439    ok($obj->eq("\x{6BBA}", "\x{2F8F5}"));
440    ok($obj->eq("\x{6BBB}", "\x{2F8F6}"));
441    ok($obj->eq("\x{6C4E}", "\x{2F8FA}"));
442    ok($obj->eq("\x{6C67}", "\x{2F8FE}"));
443    ok($obj->eq("\x{6C88}", "\x{F972}"));
444    ok($obj->eq("\x{6CBF}", "\x{2F8FC}"));
445    ok($obj->eq("\x{6CCC}", "\x{F968}"));
446    ok($obj->eq("\x{6CCD}", "\x{2F8FD}"));
447    ok($obj->eq("\x{6CE5}", "\x{F9E3}"));
448    ok($obj->eq("\x{6D16}", "\x{2F8FF}"));
449    ok($obj->eq("\x{6D1B}", "\x{F915}"));
450    ok($obj->eq("\x{6D1E}", "\x{FA05}"));
451    ok($obj->eq("\x{6D34}", "\x{2F907}"));
452    ok($obj->eq("\x{6D3E}", "\x{2F900}"));
453    ok($obj->eq("\x{6D41}", "\x{F9CA}"));
454    ok($obj->eq("\x{6D41}", "\x{FA97}"));
455    ok($obj->eq("\x{6D41}", "\x{2F902}"));
456    ok($obj->eq("\x{6D69}", "\x{2F903}"));
457    ok($obj->eq("\x{6D6A}", "\x{F92A}"));
458    ok($obj->eq("\x{6D77}", "\x{FA45}"));
459    ok($obj->eq("\x{6D77}", "\x{2F901}"));
460    ok($obj->eq("\x{6D78}", "\x{2F904}"));
461    ok($obj->eq("\x{6D85}", "\x{2F905}"));
462    ok($obj->eq("\x{6DCB}", "\x{F9F5}"));
463    ok($obj->eq("\x{6DDA}", "\x{F94D}"));
464    ok($obj->eq("\x{6DEA}", "\x{F9D6}"));
465    ok($obj->eq("\x{6DF9}", "\x{2F90E}"));
466    ok($obj->eq("\x{6E1A}", "\x{FA46}"));
467    ok($obj->eq("\x{6E2F}", "\x{2F908}"));
468    ok($obj->eq("\x{6E6E}", "\x{2F909}"));
469    ok($obj->eq("\x{6E9C}", "\x{F9CB}"));
470    ok($obj->eq("\x{6EBA}", "\x{F9EC}"));
471    ok($obj->eq("\x{6EC7}", "\x{2F90C}"));
472    ok($obj->eq("\x{6ECB}", "\x{FA99}"));
473    ok($obj->eq("\x{6ECB}", "\x{2F90B}"));
474    ok($obj->eq("\x{6ED1}", "\x{F904}"));
475    ok($obj->eq("\x{6EDB}", "\x{FA98}"));
476    ok($obj->eq("\x{6F0F}", "\x{F94E}"));
477    ok($obj->eq("\x{6F22}", "\x{FA47}"));
478    ok($obj->eq("\x{6F22}", "\x{FA9A}"));
479    ok($obj->eq("\x{6F23}", "\x{F992}"));
480    ok($obj->eq("\x{6F6E}", "\x{2F90F}"));
481    ok($obj->eq("\x{6FC6}", "\x{2F912}"));
482    ok($obj->eq("\x{6FEB}", "\x{F922}"));
483    ok($obj->eq("\x{6FFE}", "\x{F984}"));
484    ok($obj->eq("\x{701B}", "\x{2F915}"));
485    ok($obj->eq("\x{701E}", "\x{FA9B}"));
486    ok($obj->eq("\x{701E}", "\x{2F914}"));
487    ok($obj->eq("\x{7039}", "\x{2F913}"));
488    ok($obj->eq("\x{704A}", "\x{2F917}"));
489    ok($obj->eq("\x{7070}", "\x{2F835}"));
490    ok($obj->eq("\x{7077}", "\x{2F919}"));
491    ok($obj->eq("\x{707D}", "\x{2F918}"));
492    ok($obj->eq("\x{7099}", "\x{F9FB}"));
493    ok($obj->eq("\x{70AD}", "\x{2F91A}"));
494    ok($obj->eq("\x{70C8}", "\x{F99F}"));
495    ok($obj->eq("\x{70D9}", "\x{F916}"));
496    ok($obj->eq("\x{7145}", "\x{2F91C}"));
497    ok($obj->eq("\x{7149}", "\x{F993}"));
498    ok($obj->eq("\x{716E}", "\x{FA48}"));
499    ok($obj->eq("\x{716E}", "\x{FA9C}"));
500    ok($obj->eq("\x{719C}", "\x{2F91E}"));
501    ok($obj->eq("\x{71CE}", "\x{F9C0}"));
502    ok($obj->eq("\x{71D0}", "\x{F9EE}"));
503    ok($obj->eq("\x{7210}", "\x{F932}"));
504    ok($obj->eq("\x{721B}", "\x{F91E}"));
505    ok($obj->eq("\x{7228}", "\x{2F920}"));
506    ok($obj->eq("\x{722B}", "\x{FA49}"));
507    ok($obj->eq("\x{7235}", "\x{FA9E}"));
508    ok($obj->eq("\x{7235}", "\x{2F921}"));
509    ok($obj->eq("\x{7250}", "\x{2F922}"));
510    ok($obj->eq("\x{7262}", "\x{F946}"));
511    ok($obj->eq("\x{7280}", "\x{2F924}"));
512    ok($obj->eq("\x{7295}", "\x{2F925}"));
513    ok($obj->eq("\x{72AF}", "\x{FA9F}"));
514    ok($obj->eq("\x{72C0}", "\x{F9FA}"));
515    ok($obj->eq("\x{72FC}", "\x{F92B}"));
516    ok($obj->eq("\x{732A}", "\x{FA16}"));
517    ok($obj->eq("\x{732A}", "\x{FAA0}"));
518    ok($obj->eq("\x{7375}", "\x{F9A7}"));
519    ok($obj->eq("\x{737A}", "\x{2F928}"));
520    ok($obj->eq("\x{7387}", "\x{F961}"));
521    ok($obj->eq("\x{7387}", "\x{F9DB}"));
522    ok($obj->eq("\x{738B}", "\x{2F929}"));
523    ok($obj->eq("\x{73A5}", "\x{2F92B}"));
524    ok($obj->eq("\x{73B2}", "\x{F9AD}"));
525    ok($obj->eq("\x{73DE}", "\x{F917}"));
526    ok($obj->eq("\x{7406}", "\x{F9E4}"));
527    ok($obj->eq("\x{7409}", "\x{F9CC}"));
528    ok($obj->eq("\x{7422}", "\x{FA4A}"));
529    ok($obj->eq("\x{7447}", "\x{2F92E}"));
530    ok($obj->eq("\x{745C}", "\x{2F92F}"));
531    ok($obj->eq("\x{7469}", "\x{F9AE}"));
532    ok($obj->eq("\x{7471}", "\x{FAA1}"));
533    ok($obj->eq("\x{7471}", "\x{2F930}"));
534    ok($obj->eq("\x{7485}", "\x{2F931}"));
535    ok($obj->eq("\x{7489}", "\x{F994}"));
536    ok($obj->eq("\x{7498}", "\x{F9EF}"));
537    ok($obj->eq("\x{74CA}", "\x{2F932}"));
538    ok($obj->eq("\x{7506}", "\x{FAA2}"));
539    ok($obj->eq("\x{7524}", "\x{2F934}"));
540    ok($obj->eq("\x{753B}", "\x{FAA3}"));
541    ok($obj->eq("\x{753E}", "\x{2F936}"));
542    ok($obj->eq("\x{7559}", "\x{F9CD}"));
543    ok($obj->eq("\x{7565}", "\x{F976}"));
544    ok($obj->eq("\x{7570}", "\x{F962}"));
545    ok($obj->eq("\x{7570}", "\x{2F938}"));
546    ok($obj->eq("\x{75E2}", "\x{F9E5}"));
547    ok($obj->eq("\x{7610}", "\x{2F93A}"));
548    ok($obj->eq("\x{761D}", "\x{FAA4}"));
549    ok($obj->eq("\x{761F}", "\x{FAA5}"));
550    ok($obj->eq("\x{7642}", "\x{F9C1}"));
551    ok($obj->eq("\x{7669}", "\x{F90E}"));
552    ok($obj->eq("\x{76CA}", "\x{FA17}"));
553    ok($obj->eq("\x{76CA}", "\x{FAA6}"));
554    ok($obj->eq("\x{76DB}", "\x{FAA7}"));
555    ok($obj->eq("\x{76E7}", "\x{F933}"));
556    ok($obj->eq("\x{76F4}", "\x{FAA8}"));
557    ok($obj->eq("\x{76F4}", "\x{2F940}"));
558    ok($obj->eq("\x{7701}", "\x{F96D}"));
559    ok($obj->eq("\x{771E}", "\x{2F945}"));
560    ok($obj->eq("\x{771F}", "\x{2F946}"));
561    ok($obj->eq("\x{771F}", "\x{2F947}"));
562    ok($obj->eq("\x{7740}", "\x{FAAA}"));
563    ok($obj->eq("\x{774A}", "\x{FAA9}"));
564    ok($obj->eq("\x{774A}", "\x{2F948}"));
565    ok($obj->eq("\x{778B}", "\x{2F94A}"));
566    ok($obj->eq("\x{77A7}", "\x{FA9D}"));
567    ok($obj->eq("\x{784E}", "\x{2F94E}"));
568    ok($obj->eq("\x{786B}", "\x{F9CE}"));
569    ok($obj->eq("\x{788C}", "\x{F93B}"));
570    ok($obj->eq("\x{788C}", "\x{2F94F}"));
571    ok($obj->eq("\x{7891}", "\x{FA4B}"));
572    ok($obj->eq("\x{78CA}", "\x{F947}"));
573    ok($obj->eq("\x{78CC}", "\x{FAAB}"));
574    ok($obj->eq("\x{78CC}", "\x{2F950}"));
575    ok($obj->eq("\x{78FB}", "\x{F964}"));
576    ok($obj->eq("\x{792A}", "\x{F985}"));
577    ok($obj->eq("\x{793C}", "\x{FA18}"));
578    ok($obj->eq("\x{793E}", "\x{FA4C}"));
579    ok($obj->eq("\x{7948}", "\x{FA4E}"));
580    ok($obj->eq("\x{7949}", "\x{FA4D}"));
581    ok($obj->eq("\x{7950}", "\x{FA4F}"));
582    ok($obj->eq("\x{7956}", "\x{FA50}"));
583    ok($obj->eq("\x{7956}", "\x{2F953}"));
584    ok($obj->eq("\x{795D}", "\x{FA51}"));
585    ok($obj->eq("\x{795E}", "\x{FA19}"));
586    ok($obj->eq("\x{7965}", "\x{FA1A}"));
587    ok($obj->eq("\x{797F}", "\x{F93C}"));
588    ok($obj->eq("\x{798D}", "\x{FA52}"));
589    ok($obj->eq("\x{798E}", "\x{FA53}"));
590    ok($obj->eq("\x{798F}", "\x{FA1B}"));
591    ok($obj->eq("\x{798F}", "\x{2F956}"));
592    ok($obj->eq("\x{79AE}", "\x{F9B6}"));
593    ok($obj->eq("\x{79CA}", "\x{F995}"));
594    ok($obj->eq("\x{79EB}", "\x{2F957}"));
595    ok($obj->eq("\x{7A1C}", "\x{F956}"));
596    ok($obj->eq("\x{7A40}", "\x{FA54}"));
597    ok($obj->eq("\x{7A40}", "\x{2F959}"));
598    ok($obj->eq("\x{7A4A}", "\x{2F95A}"));
599    ok($obj->eq("\x{7A4F}", "\x{2F95B}"));
600    ok($obj->eq("\x{7A81}", "\x{FA55}"));
601    ok($obj->eq("\x{7AB1}", "\x{FAAC}"));
602    ok($obj->eq("\x{7ACB}", "\x{F9F7}"));
603    ok($obj->eq("\x{7AEE}", "\x{2F95F}"));
604    ok($obj->eq("\x{7B20}", "\x{F9F8}"));
605    ok($obj->eq("\x{7BC0}", "\x{FA56}"));
606    ok($obj->eq("\x{7BC0}", "\x{FAAD}"));
607    ok($obj->eq("\x{7BC6}", "\x{2F962}"));
608    ok($obj->eq("\x{7BC9}", "\x{2F963}"));
609    ok($obj->eq("\x{7C3E}", "\x{F9A6}"));
610    ok($obj->eq("\x{7C60}", "\x{F944}"));
611    ok($obj->eq("\x{7C7B}", "\x{FAAE}"));
612    ok($obj->eq("\x{7C92}", "\x{F9F9}"));
613    ok($obj->eq("\x{7CBE}", "\x{FA1D}"));
614    ok($obj->eq("\x{7CD2}", "\x{2F966}"));
615    ok($obj->eq("\x{7CD6}", "\x{FA03}"));
616    ok($obj->eq("\x{7CE3}", "\x{2F969}"));
617    ok($obj->eq("\x{7CE7}", "\x{F97B}"));
618    ok($obj->eq("\x{7CE8}", "\x{2F968}"));
619    ok($obj->eq("\x{7D00}", "\x{2F96A}"));
620    ok($obj->eq("\x{7D10}", "\x{F9CF}"));
621    ok($obj->eq("\x{7D22}", "\x{F96A}"));
622    ok($obj->eq("\x{7D2F}", "\x{F94F}"));
623    ok($obj->eq("\x{7D5B}", "\x{FAAF}"));
624    ok($obj->eq("\x{7D63}", "\x{2F96C}"));
625    ok($obj->eq("\x{7DA0}", "\x{F93D}"));
626    ok($obj->eq("\x{7DBE}", "\x{F957}"));
627    ok($obj->eq("\x{7DC7}", "\x{2F96E}"));
628    ok($obj->eq("\x{7DF4}", "\x{F996}"));
629    ok($obj->eq("\x{7DF4}", "\x{FA57}"));
630    ok($obj->eq("\x{7DF4}", "\x{FAB0}"));
631    ok($obj->eq("\x{7E02}", "\x{2F96F}"));
632    ok($obj->eq("\x{7E09}", "\x{FA58}"));
633    ok($obj->eq("\x{7E37}", "\x{F950}"));
634    ok($obj->eq("\x{7E41}", "\x{FA59}"));
635    ok($obj->eq("\x{7E45}", "\x{2F970}"));
636    ok($obj->eq("\x{7F3E}", "\x{FAB1}"));
637    ok($obj->eq("\x{7F72}", "\x{FA5A}"));
638    ok($obj->eq("\x{7F79}", "\x{F9E6}"));
639    ok($obj->eq("\x{7F7A}", "\x{2F976}"));
640    ok($obj->eq("\x{7F85}", "\x{F90F}"));
641    ok($obj->eq("\x{7F95}", "\x{2F978}"));
642    ok($obj->eq("\x{7F9A}", "\x{F9AF}"));
643    ok($obj->eq("\x{7FBD}", "\x{FA1E}"));
644    ok($obj->eq("\x{7FFA}", "\x{2F979}"));
645    ok($obj->eq("\x{8001}", "\x{F934}"));
646    ok($obj->eq("\x{8005}", "\x{FA5B}"));
647    ok($obj->eq("\x{8005}", "\x{FAB2}"));
648    ok($obj->eq("\x{8005}", "\x{2F97A}"));
649    ok($obj->eq("\x{8046}", "\x{F9B0}"));
650    ok($obj->eq("\x{8060}", "\x{2F97D}"));
651    ok($obj->eq("\x{806F}", "\x{F997}"));
652    ok($obj->eq("\x{8070}", "\x{2F97F}"));
653    ok($obj->eq("\x{807E}", "\x{F945}"));
654    ok($obj->eq("\x{808B}", "\x{F953}"));
655    ok($obj->eq("\x{80AD}", "\x{2F8D6}"));
656    ok($obj->eq("\x{80B2}", "\x{2F982}"));
657    ok($obj->eq("\x{8103}", "\x{2F983}"));
658    ok($obj->eq("\x{813E}", "\x{2F985}"));
659    ok($obj->eq("\x{81D8}", "\x{F926}"));
660    ok($obj->eq("\x{81E8}", "\x{F9F6}"));
661    ok($obj->eq("\x{81ED}", "\x{FA5C}"));
662    ok($obj->eq("\x{8201}", "\x{2F893}"));
663    ok($obj->eq("\x{8201}", "\x{2F98B}"));
664    ok($obj->eq("\x{8204}", "\x{2F98C}"));
665    ok($obj->eq("\x{8218}", "\x{FA6D}"));
666    ok($obj->eq("\x{826F}", "\x{F97C}"));
667    ok($obj->eq("\x{8279}", "\x{FA5D}"));
668    ok($obj->eq("\x{8279}", "\x{FA5E}"));
669    ok($obj->eq("\x{828B}", "\x{2F990}"));
670    ok($obj->eq("\x{8291}", "\x{2F98F}"));
671    ok($obj->eq("\x{829D}", "\x{2F991}"));
672    ok($obj->eq("\x{82B1}", "\x{2F993}"));
673    ok($obj->eq("\x{82B3}", "\x{2F994}"));
674    ok($obj->eq("\x{82BD}", "\x{2F995}"));
675    ok($obj->eq("\x{82E5}", "\x{F974}"));
676    ok($obj->eq("\x{82E5}", "\x{2F998}"));
677    ok($obj->eq("\x{82E6}", "\x{2F996}"));
678    ok($obj->eq("\x{831D}", "\x{2F999}"));
679    ok($obj->eq("\x{8323}", "\x{2F99C}"));
680    ok($obj->eq("\x{8336}", "\x{F9FE}"));
681    ok($obj->eq("\x{8352}", "\x{FAB3}"));
682    ok($obj->eq("\x{8353}", "\x{2F9A0}"));
683    ok($obj->eq("\x{8363}", "\x{2F99A}"));
684    ok($obj->eq("\x{83AD}", "\x{2F99B}"));
685    ok($obj->eq("\x{83BD}", "\x{2F99D}"));
686    ok($obj->eq("\x{83C9}", "\x{F93E}"));
687    ok($obj->eq("\x{83CA}", "\x{2F9A1}"));
688    ok($obj->eq("\x{83CC}", "\x{2F9A2}"));
689    ok($obj->eq("\x{83DC}", "\x{2F9A3}"));
690    ok($obj->eq("\x{83E7}", "\x{2F99E}"));
691    ok($obj->eq("\x{83EF}", "\x{FAB4}"));
692    ok($obj->eq("\x{83F1}", "\x{F958}"));
693    ok($obj->eq("\x{843D}", "\x{F918}"));
694    ok($obj->eq("\x{8449}", "\x{F96E}"));
695    ok($obj->eq("\x{8457}", "\x{FA5F}"));
696    ok($obj->eq("\x{8457}", "\x{2F99F}"));
697    ok($obj->eq("\x{84EE}", "\x{F999}"));
698    ok($obj->eq("\x{84F1}", "\x{2F9A8}"));
699    ok($obj->eq("\x{84F3}", "\x{2F9A9}"));
700    ok($obj->eq("\x{84FC}", "\x{F9C2}"));
701    ok($obj->eq("\x{8516}", "\x{2F9AA}"));
702    ok($obj->eq("\x{8564}", "\x{2F9AC}"));
703    ok($obj->eq("\x{85CD}", "\x{F923}"));
704    ok($obj->eq("\x{85FA}", "\x{F9F0}"));
705    ok($obj->eq("\x{8606}", "\x{F935}"));
706    ok($obj->eq("\x{8612}", "\x{FA20}"));
707    ok($obj->eq("\x{862D}", "\x{F91F}"));
708    ok($obj->eq("\x{863F}", "\x{F910}"));
709    ok($obj->eq("\x{8650}", "\x{2F9B3}"));
710    ok($obj->eq("\x{865C}", "\x{F936}"));
711    ok($obj->eq("\x{865C}", "\x{2F9B4}"));
712    ok($obj->eq("\x{8667}", "\x{2F9B5}"));
713    ok($obj->eq("\x{8669}", "\x{2F9B6}"));
714    ok($obj->eq("\x{8688}", "\x{2F9B8}"));
715    ok($obj->eq("\x{86A9}", "\x{2F9B7}"));
716    ok($obj->eq("\x{86E2}", "\x{2F9BA}"));
717    ok($obj->eq("\x{870E}", "\x{2F9B9}"));
718    ok($obj->eq("\x{8728}", "\x{2F9BC}"));
719    ok($obj->eq("\x{876B}", "\x{2F9BD}"));
720    ok($obj->eq("\x{8779}", "\x{FAB5}"));
721    ok($obj->eq("\x{8779}", "\x{2F9BB}"));
722    ok($obj->eq("\x{8786}", "\x{2F9BE}"));
723    ok($obj->eq("\x{87BA}", "\x{F911}"));
724    ok($obj->eq("\x{87E1}", "\x{2F9C0}"));
725    ok($obj->eq("\x{8801}", "\x{2F9C1}"));
726    ok($obj->eq("\x{881F}", "\x{F927}"));
727    ok($obj->eq("\x{884C}", "\x{FA08}"));
728    ok($obj->eq("\x{8860}", "\x{2F9C3}"));
729    ok($obj->eq("\x{8863}", "\x{2F9C4}"));
730    ok($obj->eq("\x{88C2}", "\x{F9A0}"));
731    ok($obj->eq("\x{88CF}", "\x{F9E7}"));
732    ok($obj->eq("\x{88D7}", "\x{2F9C6}"));
733    ok($obj->eq("\x{88DE}", "\x{2F9C7}"));
734    ok($obj->eq("\x{88E1}", "\x{F9E8}"));
735    ok($obj->eq("\x{88F8}", "\x{F912}"));
736    ok($obj->eq("\x{88FA}", "\x{2F9C9}"));
737    ok($obj->eq("\x{8910}", "\x{FA60}"));
738    ok($obj->eq("\x{8941}", "\x{FAB6}"));
739    ok($obj->eq("\x{8964}", "\x{F924}"));
740    ok($obj->eq("\x{8986}", "\x{FAB7}"));
741    ok($obj->eq("\x{898B}", "\x{FA0A}"));
742    ok($obj->eq("\x{8996}", "\x{FA61}"));
743    ok($obj->eq("\x{8996}", "\x{FAB8}"));
744    ok($obj->eq("\x{8AA0}", "\x{2F9CF}"));
745    ok($obj->eq("\x{8AAA}", "\x{F96F}"));
746    ok($obj->eq("\x{8AAA}", "\x{F9A1}"));
747    ok($obj->eq("\x{8ABF}", "\x{FAB9}"));
748    ok($obj->eq("\x{8ACB}", "\x{FABB}"));
749    ok($obj->eq("\x{8AD2}", "\x{F97D}"));
750    ok($obj->eq("\x{8AD6}", "\x{F941}"));
751    ok($obj->eq("\x{8AED}", "\x{FABE}"));
752    ok($obj->eq("\x{8AED}", "\x{2F9D0}"));
753    ok($obj->eq("\x{8AF8}", "\x{FA22}"));
754    ok($obj->eq("\x{8AF8}", "\x{FABA}"));
755    ok($obj->eq("\x{8AFE}", "\x{F95D}"));
756    ok($obj->eq("\x{8AFE}", "\x{FABD}"));
757    ok($obj->eq("\x{8B01}", "\x{FA62}"));
758    ok($obj->eq("\x{8B01}", "\x{FABC}"));
759    ok($obj->eq("\x{8B39}", "\x{FA63}"));
760    ok($obj->eq("\x{8B39}", "\x{FABF}"));
761    ok($obj->eq("\x{8B58}", "\x{F9FC}"));
762    ok($obj->eq("\x{8B80}", "\x{F95A}"));
763    ok($obj->eq("\x{8B8A}", "\x{FAC0}"));
764    ok($obj->eq("\x{8B8A}", "\x{2F9D1}"));
765    ok($obj->eq("\x{8C48}", "\x{F900}"));
766    ok($obj->eq("\x{8C55}", "\x{2F9D2}"));
767    ok($obj->eq("\x{8CAB}", "\x{2F9D4}"));
768    ok($obj->eq("\x{8CC1}", "\x{2F9D5}"));
769    ok($obj->eq("\x{8CC2}", "\x{F948}"));
770    ok($obj->eq("\x{8CC8}", "\x{F903}"));
771    ok($obj->eq("\x{8CD3}", "\x{FA64}"));
772    ok($obj->eq("\x{8D08}", "\x{FA65}"));
773    ok($obj->eq("\x{8D08}", "\x{FAC1}"));
774    ok($obj->eq("\x{8D1B}", "\x{2F9D6}"));
775    ok($obj->eq("\x{8D77}", "\x{2F9D7}"));
776    ok($obj->eq("\x{8DBC}", "\x{2F9DB}"));
777    ok($obj->eq("\x{8DCB}", "\x{2F9DA}"));
778    ok($obj->eq("\x{8DEF}", "\x{F937}"));
779    ok($obj->eq("\x{8DF0}", "\x{2F9DC}"));
780    ok($obj->eq("\x{8ECA}", "\x{F902}"));
781    ok($obj->eq("\x{8ED4}", "\x{2F9DE}"));
782    ok($obj->eq("\x{8F26}", "\x{F998}"));
783    ok($obj->eq("\x{8F2A}", "\x{F9D7}"));
784    ok($obj->eq("\x{8F38}", "\x{FAC2}"));
785    ok($obj->eq("\x{8F38}", "\x{2F9DF}"));
786    ok($obj->eq("\x{8F3B}", "\x{FA07}"));
787    ok($obj->eq("\x{8F62}", "\x{F98D}"));
788    ok($obj->eq("\x{8F9E}", "\x{2F98D}"));
789    ok($obj->eq("\x{8FB0}", "\x{F971}"));
790    ok($obj->eq("\x{8FB6}", "\x{FA66}"));
791    ok($obj->eq("\x{9023}", "\x{F99A}"));
792    ok($obj->eq("\x{9038}", "\x{FA25}"));
793    ok($obj->eq("\x{9038}", "\x{FA67}"));
794    ok($obj->eq("\x{9072}", "\x{FAC3}"));
795    ok($obj->eq("\x{907C}", "\x{F9C3}"));
796    ok($obj->eq("\x{908F}", "\x{F913}"));
797    ok($obj->eq("\x{9094}", "\x{2F9E2}"));
798    ok($obj->eq("\x{90CE}", "\x{F92C}"));
799    ok($obj->eq("\x{90DE}", "\x{FA2E}"));
800    ok($obj->eq("\x{90F1}", "\x{2F9E3}"));
801    ok($obj->eq("\x{90FD}", "\x{FA26}"));
802    ok($obj->eq("\x{9111}", "\x{2F9E4}"));
803    ok($obj->eq("\x{911B}", "\x{2F9E6}"));
804    ok($obj->eq("\x{916A}", "\x{F919}"));
805    ok($obj->eq("\x{9199}", "\x{FAC4}"));
806    ok($obj->eq("\x{91B4}", "\x{F9B7}"));
807    ok($obj->eq("\x{91CC}", "\x{F9E9}"));
808    ok($obj->eq("\x{91CF}", "\x{F97E}"));
809    ok($obj->eq("\x{91D1}", "\x{F90A}"));
810    ok($obj->eq("\x{9234}", "\x{F9B1}"));
811    ok($obj->eq("\x{9238}", "\x{2F9E7}"));
812    ok($obj->eq("\x{9276}", "\x{FAC5}"));
813    ok($obj->eq("\x{927C}", "\x{2F9EA}"));
814    ok($obj->eq("\x{92D7}", "\x{2F9E8}"));
815    ok($obj->eq("\x{92D8}", "\x{2F9E9}"));
816    ok($obj->eq("\x{9304}", "\x{F93F}"));
817    ok($obj->eq("\x{934A}", "\x{F99B}"));
818    ok($obj->eq("\x{93F9}", "\x{2F9EB}"));
819    ok($obj->eq("\x{9415}", "\x{2F9EC}"));
820    ok($obj->eq("\x{958B}", "\x{2F9EE}"));
821    ok($obj->eq("\x{95AD}", "\x{F986}"));
822    ok($obj->eq("\x{95B7}", "\x{2F9F0}"));
823    ok($obj->eq("\x{962E}", "\x{F9C6}"));
824    ok($obj->eq("\x{964B}", "\x{F951}"));
825    ok($obj->eq("\x{964D}", "\x{FA09}"));
826    ok($obj->eq("\x{9675}", "\x{F959}"));
827    ok($obj->eq("\x{9678}", "\x{F9D3}"));
828    ok($obj->eq("\x{967C}", "\x{FAC6}"));
829    ok($obj->eq("\x{9686}", "\x{F9DC}"));
830    ok($obj->eq("\x{96A3}", "\x{F9F1}"));
831    ok($obj->eq("\x{96B7}", "\x{FA2F}"));
832    ok($obj->eq("\x{96B8}", "\x{F9B8}"));
833    ok($obj->eq("\x{96C3}", "\x{2F9F3}"));
834    ok($obj->eq("\x{96E2}", "\x{F9EA}"));
835    ok($obj->eq("\x{96E3}", "\x{FA68}"));
836    ok($obj->eq("\x{96E3}", "\x{FAC7}"));
837    ok($obj->eq("\x{96F6}", "\x{F9B2}"));
838    ok($obj->eq("\x{96F7}", "\x{F949}"));
839    ok($obj->eq("\x{9723}", "\x{2F9F5}"));
840    ok($obj->eq("\x{9732}", "\x{F938}"));
841    ok($obj->eq("\x{9748}", "\x{F9B3}"));
842    ok($obj->eq("\x{9756}", "\x{FA1C}"));
843    ok($obj->eq("\x{9756}", "\x{FAC8}"));
844    ok($obj->eq("\x{97DB}", "\x{FAC9}"));
845    ok($obj->eq("\x{97E0}", "\x{2F9FA}"));
846    ok($obj->eq("\x{97FF}", "\x{FA69}"));
847    ok($obj->eq("\x{97FF}", "\x{FACA}"));
848    ok($obj->eq("\x{980B}", "\x{FACB}"));
849    ok($obj->eq("\x{980B}", "\x{2F9FE}"));
850    ok($obj->eq("\x{980B}", "\x{2F9FF}"));
851    ok($obj->eq("\x{9818}", "\x{F9B4}"));
852    ok($obj->eq("\x{9829}", "\x{2FA00}"));
853    ok($obj->eq("\x{983B}", "\x{FA6A}"));
854    ok($obj->eq("\x{983B}", "\x{FACC}"));
855    ok($obj->eq("\x{985E}", "\x{F9D0}"));
856    ok($obj->eq("\x{98E2}", "\x{2FA02}"));
857    ok($obj->eq("\x{98EF}", "\x{FA2A}"));
858    ok($obj->eq("\x{98FC}", "\x{FA2B}"));
859    ok($obj->eq("\x{9928}", "\x{FA2C}"));
860    ok($obj->eq("\x{9929}", "\x{2FA04}"));
861    ok($obj->eq("\x{99A7}", "\x{2FA05}"));
862    ok($obj->eq("\x{99C2}", "\x{2FA06}"));
863    ok($obj->eq("\x{99F1}", "\x{F91A}"));
864    ok($obj->eq("\x{99FE}", "\x{2FA07}"));
865    ok($obj->eq("\x{9A6A}", "\x{F987}"));
866    ok($obj->eq("\x{9B12}", "\x{FACD}"));
867    ok($obj->eq("\x{9B12}", "\x{2FA0A}"));
868    ok($obj->eq("\x{9B6F}", "\x{F939}"));
869    ok($obj->eq("\x{9C40}", "\x{2FA0B}"));
870    ok($obj->eq("\x{9C57}", "\x{F9F2}"));
871    ok($obj->eq("\x{9CFD}", "\x{2FA0C}"));
872    ok($obj->eq("\x{9D67}", "\x{2FA0F}"));
873    ok($obj->eq("\x{9DB4}", "\x{FA2D}"));
874    ok($obj->eq("\x{9DFA}", "\x{F93A}"));
875    ok($obj->eq("\x{9E1E}", "\x{F920}"));
876    ok($obj->eq("\x{9E7F}", "\x{F940}"));
877    ok($obj->eq("\x{9E97}", "\x{F988}"));
878    ok($obj->eq("\x{9E9F}", "\x{F9F3}"));
879    ok($obj->eq("\x{9EBB}", "\x{2FA15}"));
880    ok($obj->eq("\x{9ECE}", "\x{F989}"));
881    ok($obj->eq("\x{9EF9}", "\x{2FA17}"));
882    ok($obj->eq("\x{9EFE}", "\x{2FA18}"));
883    ok($obj->eq("\x{9F05}", "\x{2FA19}"));
884    ok($obj->eq("\x{9F0F}", "\x{2FA1A}"));
885    ok($obj->eq("\x{9F16}", "\x{2FA1B}"));
886    ok($obj->eq("\x{9F3B}", "\x{2FA1C}"));
887    ok($obj->eq("\x{9F43}", "\x{FAD8}"));
888    ok($obj->eq("\x{9F8D}", "\x{F9C4}"));
889    ok($obj->eq("\x{9F8E}", "\x{FAD9}"));
890    ok($obj->eq("\x{9F9C}", "\x{F907}"));
891    ok($obj->eq("\x{9F9C}", "\x{F908}"));
892    ok($obj->eq("\x{9F9C}", "\x{FACE}"));
893    ok($obj->eq("\x{349E}", "\x{2F80C}"));
894    ok($obj->eq("\x{34B9}", "\x{2F813}"));
895    ok($obj->eq("\x{34BB}", "\x{2F9CA}"));
896    ok($obj->eq("\x{34DF}", "\x{2F81F}"));
897    ok($obj->eq("\x{3515}", "\x{2F824}"));
898    ok($obj->eq("\x{36EE}", "\x{2F867}"));
899    ok($obj->eq("\x{36FC}", "\x{2F868}"));
900    ok($obj->eq("\x{3781}", "\x{2F876}"));
901    ok($obj->eq("\x{382F}", "\x{2F883}"));
902    ok($obj->eq("\x{3862}", "\x{2F888}"));
903    ok($obj->eq("\x{387C}", "\x{2F88A}"));
904    ok($obj->eq("\x{38C7}", "\x{2F896}"));
905    ok($obj->eq("\x{38E3}", "\x{2F89B}"));
906    ok($obj->eq("\x{391C}", "\x{2F8A2}"));
907    ok($obj->eq("\x{393A}", "\x{2F8A1}"));
908    ok($obj->eq("\x{3A2E}", "\x{2F8C2}"));
909    ok($obj->eq("\x{3A6C}", "\x{2F8C7}"));
910    ok($obj->eq("\x{3AE4}", "\x{2F8D1}"));
911    ok($obj->eq("\x{3B08}", "\x{2F8D0}"));
912    ok($obj->eq("\x{3B19}", "\x{2F8CE}"));
913    ok($obj->eq("\x{3B49}", "\x{2F8DE}"));
914    ok($obj->eq("\x{3B9D}", "\x{FAD2}"));
915    ok($obj->eq("\x{3B9D}", "\x{2F8E7}"));
916    ok($obj->eq("\x{3C18}", "\x{2F8EE}"));
917    ok($obj->eq("\x{3C4E}", "\x{2F8F2}"));
918    ok($obj->eq("\x{3D33}", "\x{2F90A}"));
919    ok($obj->eq("\x{3D96}", "\x{2F916}"));
920    ok($obj->eq("\x{3EAC}", "\x{2F92A}"));
921    ok($obj->eq("\x{3EB8}", "\x{2F92C}"));
922    ok($obj->eq("\x{3EB8}", "\x{2F92D}"));
923    ok($obj->eq("\x{3F1B}", "\x{2F933}"));
924    ok($obj->eq("\x{3FFC}", "\x{2F93E}"));
925    ok($obj->eq("\x{4008}", "\x{2F93F}"));
926    ok($obj->eq("\x{4018}", "\x{FAD3}"));
927    ok($obj->eq("\x{4039}", "\x{FAD4}"));
928    ok($obj->eq("\x{4039}", "\x{2F949}"));
929    ok($obj->eq("\x{4046}", "\x{2F94B}"));
930    ok($obj->eq("\x{4096}", "\x{2F94C}"));
931    ok($obj->eq("\x{40E3}", "\x{2F951}"));
932    ok($obj->eq("\x{412F}", "\x{2F958}"));
933    ok($obj->eq("\x{4202}", "\x{2F960}"));
934    ok($obj->eq("\x{4227}", "\x{2F964}"));
935    ok($obj->eq("\x{42A0}", "\x{2F967}"));
936    ok($obj->eq("\x{4301}", "\x{2F96D}"));
937    ok($obj->eq("\x{4334}", "\x{2F971}"));
938    ok($obj->eq("\x{4359}", "\x{2F974}"));
939    ok($obj->eq("\x{43D5}", "\x{2F981}"));
940    ok($obj->eq("\x{43D9}", "\x{2F8D7}"));
941    ok($obj->eq("\x{440B}", "\x{2F984}"));
942    ok($obj->eq("\x{446B}", "\x{2F98E}"));
943    ok($obj->eq("\x{452B}", "\x{2F9A7}"));
944    ok($obj->eq("\x{455D}", "\x{2F9AE}"));
945    ok($obj->eq("\x{4561}", "\x{2F9AF}"));
946    ok($obj->eq("\x{456B}", "\x{2F9B2}"));
947    ok($obj->eq("\x{45D7}", "\x{2F9BF}"));
948    ok($obj->eq("\x{45F9}", "\x{2F9C2}"));
949    ok($obj->eq("\x{4635}", "\x{2F9C8}"));
950    ok($obj->eq("\x{46BE}", "\x{2F9CD}"));
951    ok($obj->eq("\x{46C7}", "\x{2F9CE}"));
952    ok($obj->eq("\x{4995}", "\x{2F9EF}"));
953    ok($obj->eq("\x{49E6}", "\x{2F9F2}"));
954    ok($obj->eq("\x{4A6E}", "\x{2F9F8}"));
955    ok($obj->eq("\x{4A76}", "\x{2F9F9}"));
956    ok($obj->eq("\x{4AB2}", "\x{2F9FC}"));
957    ok($obj->eq("\x{4B33}", "\x{2FA03}"));
958    ok($obj->eq("\x{4BCE}", "\x{2FA08}"));
959    ok($obj->eq("\x{4CCE}", "\x{2FA0D}"));
960    ok($obj->eq("\x{4CED}", "\x{2FA0E}"));
961    ok($obj->eq("\x{4CF8}", "\x{2FA11}"));
962    ok($obj->eq("\x{4D56}", "\x{2FA16}"));
963    ok($obj->eq("\x{20122}", "\x{2F803}"));
964    ok($obj->eq("\x{2051C}", "\x{2F812}"));
965    ok($obj->eq("\x{20525}", "\x{2F91B}"));
966    ok($obj->eq("\x{2054B}", "\x{2F816}"));
967    ok($obj->eq("\x{2063A}", "\x{2F80D}"));
968    ok($obj->eq("\x{20804}", "\x{2F9D9}"));
969    ok($obj->eq("\x{208DE}", "\x{2F9DD}"));
970    ok($obj->eq("\x{20A2C}", "\x{2F834}"));
971    ok($obj->eq("\x{20B63}", "\x{2F838}"));
972    ok($obj->eq("\x{214E4}", "\x{2F859}"));
973    ok($obj->eq("\x{216A8}", "\x{2F860}"));
974    ok($obj->eq("\x{216EA}", "\x{2F861}"));
975    ok($obj->eq("\x{219C8}", "\x{2F86C}"));
976    ok($obj->eq("\x{21B18}", "\x{2F871}"));
977    ok($obj->eq("\x{21D0B}", "\x{2F8F8}"));
978    ok($obj->eq("\x{21DE4}", "\x{2F87B}"));
979    ok($obj->eq("\x{21DE6}", "\x{2F87D}"));
980    ok($obj->eq("\x{22183}", "\x{2F889}"));
981    ok($obj->eq("\x{2219F}", "\x{2F939}"));
982    ok($obj->eq("\x{22331}", "\x{2F891}"));
983    ok($obj->eq("\x{22331}", "\x{2F892}"));
984    ok($obj->eq("\x{226D4}", "\x{2F8A4}"));
985    ok($obj->eq("\x{22844}", "\x{FAD0}"));
986    ok($obj->eq("\x{2284A}", "\x{FACF}"));
987    ok($obj->eq("\x{22B0C}", "\x{2F8B8}"));
988    ok($obj->eq("\x{22BF1}", "\x{2F8BE}"));
989    ok($obj->eq("\x{2300A}", "\x{2F8CA}"));
990    ok($obj->eq("\x{232B8}", "\x{2F897}"));
991    ok($obj->eq("\x{2335F}", "\x{2F980}"));
992    ok($obj->eq("\x{23393}", "\x{2F989}"));
993    ok($obj->eq("\x{2339C}", "\x{2F98A}"));
994    ok($obj->eq("\x{233C3}", "\x{2F8DD}"));
995    ok($obj->eq("\x{233D5}", "\x{FAD1}"));
996    ok($obj->eq("\x{2346D}", "\x{2F8E3}"));
997    ok($obj->eq("\x{236A3}", "\x{2F8EC}"));
998    ok($obj->eq("\x{238A7}", "\x{2F8F0}"));
999    ok($obj->eq("\x{23A8D}", "\x{2F8F7}"));
1000    ok($obj->eq("\x{23AFA}", "\x{2F8F9}"));
1001    ok($obj->eq("\x{23CBC}", "\x{2F8FB}"));
1002    ok($obj->eq("\x{23D1E}", "\x{2F906}"));
1003    ok($obj->eq("\x{23ED1}", "\x{2F90D}"));
1004    ok($obj->eq("\x{23F5E}", "\x{2F910}"));
1005    ok($obj->eq("\x{23F8E}", "\x{2F911}"));
1006    ok($obj->eq("\x{24263}", "\x{2F91D}"));
1007    ok($obj->eq("\x{242EE}", "\x{FA6C}"));
1008    ok($obj->eq("\x{243AB}", "\x{2F91F}"));
1009    ok($obj->eq("\x{24608}", "\x{2F923}"));
1010    ok($obj->eq("\x{24735}", "\x{2F926}"));
1011    ok($obj->eq("\x{24814}", "\x{2F927}"));
1012    ok($obj->eq("\x{24C36}", "\x{2F935}"));
1013    ok($obj->eq("\x{24C92}", "\x{2F937}"));
1014    ok($obj->eq("\x{24FA1}", "\x{2F93B}"));
1015    ok($obj->eq("\x{24FB8}", "\x{2F93C}"));
1016    ok($obj->eq("\x{25044}", "\x{2F93D}"));
1017    ok($obj->eq("\x{250F2}", "\x{2F942}"));
1018    ok($obj->eq("\x{250F3}", "\x{2F941}"));
1019    ok($obj->eq("\x{25119}", "\x{2F943}"));
1020    ok($obj->eq("\x{25133}", "\x{2F944}"));
1021    ok($obj->eq("\x{25249}", "\x{FAD5}"));
1022    ok($obj->eq("\x{2541D}", "\x{2F94D}"));
1023    ok($obj->eq("\x{25626}", "\x{2F952}"));
1024    ok($obj->eq("\x{2569A}", "\x{2F954}"));
1025    ok($obj->eq("\x{256C5}", "\x{2F955}"));
1026    ok($obj->eq("\x{2597C}", "\x{2F95C}"));
1027    ok($obj->eq("\x{25AA7}", "\x{2F95D}"));
1028    ok($obj->eq("\x{25AA7}", "\x{2F95E}"));
1029    ok($obj->eq("\x{25BAB}", "\x{2F961}"));
1030    ok($obj->eq("\x{25C80}", "\x{2F965}"));
1031    ok($obj->eq("\x{25CD0}", "\x{FAD6}"));
1032    ok($obj->eq("\x{25F86}", "\x{2F96B}"));
1033    ok($obj->eq("\x{261DA}", "\x{2F898}"));
1034    ok($obj->eq("\x{26228}", "\x{2F972}"));
1035    ok($obj->eq("\x{26247}", "\x{2F973}"));
1036    ok($obj->eq("\x{262D9}", "\x{2F975}"));
1037    ok($obj->eq("\x{2633E}", "\x{2F977}"));
1038    ok($obj->eq("\x{264DA}", "\x{2F97B}"));
1039    ok($obj->eq("\x{26523}", "\x{2F97C}"));
1040    ok($obj->eq("\x{265A8}", "\x{2F97E}"));
1041    ok($obj->eq("\x{267A7}", "\x{2F987}"));
1042    ok($obj->eq("\x{267B5}", "\x{2F988}"));
1043    ok($obj->eq("\x{26B3C}", "\x{2F997}"));
1044    ok($obj->eq("\x{26C36}", "\x{2F9A4}"));
1045    ok($obj->eq("\x{26CD5}", "\x{2F9A6}"));
1046    ok($obj->eq("\x{26D6B}", "\x{2F9A5}"));
1047    ok($obj->eq("\x{26F2C}", "\x{2F9AD}"));
1048    ok($obj->eq("\x{26FB1}", "\x{2F9B0}"));
1049    ok($obj->eq("\x{270D2}", "\x{2F9B1}"));
1050    ok($obj->eq("\x{273CA}", "\x{2F9AB}"));
1051    ok($obj->eq("\x{27667}", "\x{2F9C5}"));
1052    ok($obj->eq("\x{278AE}", "\x{2F9CB}"));
1053    ok($obj->eq("\x{27966}", "\x{2F9CC}"));
1054    ok($obj->eq("\x{27CA8}", "\x{2F9D3}"));
1055    ok($obj->eq("\x{27ED3}", "\x{FAD7}"));
1056    ok($obj->eq("\x{27F2F}", "\x{2F9D8}"));
1057    ok($obj->eq("\x{285D2}", "\x{2F9E0}"));
1058    ok($obj->eq("\x{285ED}", "\x{2F9E1}"));
1059    ok($obj->eq("\x{2872E}", "\x{2F9E5}"));
1060    ok($obj->eq("\x{28BFA}", "\x{2F9ED}"));
1061    ok($obj->eq("\x{28D77}", "\x{2F9F1}"));
1062    ok($obj->eq("\x{29145}", "\x{2F9F6}"));
1063    ok($obj->eq("\x{291DF}", "\x{2F81C}"));
1064    ok($obj->eq("\x{2921A}", "\x{2F9F7}"));
1065    ok($obj->eq("\x{2940A}", "\x{2F9FB}"));
1066    ok($obj->eq("\x{29496}", "\x{2F9FD}"));
1067    ok($obj->eq("\x{295B6}", "\x{2FA01}"));
1068    ok($obj->eq("\x{29B30}", "\x{2FA09}"));
1069    ok($obj->eq("\x{2A0CE}", "\x{2FA10}"));
1070    ok($obj->eq("\x{2A105}", "\x{2FA12}"));
1071    ok($obj->eq("\x{2A20E}", "\x{2FA13}"));
1072    ok($obj->eq("\x{2A291}", "\x{2FA14}"));
1073    ok($obj->eq("\x{2A392}", "\x{2F88F}"));
1074    ok($obj->eq("\x{2A600}", "\x{2FA1D}"));
1075}
1076