xref: /openbsd-src/gnu/usr.bin/perl/cpan/Unicode-Collate/t/loc_jait.t (revision 256a93a44f36679bee503f12e49566c2183f6181) 
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..759\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 $objJa = Unicode::Collate::Locale->
32    new(locale => 'JA', normalization => undef);
33
34ok($objJa->getlocale, 'ja');
35
36$objJa->change(level => 2);
37
38ok($objJa->eq("\x{30A1}\x{30FD}", "\x{30A1}\x{30A2}"));
39ok($objJa->eq("\x{30A2}\x{30FD}", "\x{30A2}\x{30A2}"));
40ok($objJa->eq("\x{30A3}\x{30FD}", "\x{30A3}\x{30A4}"));
41ok($objJa->eq("\x{30A4}\x{30FD}", "\x{30A4}\x{30A4}"));
42ok($objJa->eq("\x{30A5}\x{30FD}", "\x{30A5}\x{30A6}"));
43ok($objJa->eq("\x{30A6}\x{30FD}", "\x{30A6}\x{30A6}"));
44ok($objJa->eq("\x{30A7}\x{30FD}", "\x{30A7}\x{30A8}"));
45ok($objJa->eq("\x{30A8}\x{30FD}", "\x{30A8}\x{30A8}"));
46ok($objJa->eq("\x{30A9}\x{30FD}", "\x{30A9}\x{30AA}"));
47ok($objJa->eq("\x{30AA}\x{30FD}", "\x{30AA}\x{30AA}"));
48ok($objJa->eq("\x{30AB}\x{30FD}", "\x{30AB}\x{30AB}"));
49ok($objJa->eq("\x{30AC}\x{30FD}", "\x{30AC}\x{30AB}"));
50ok($objJa->eq("\x{30AD}\x{30FD}", "\x{30AD}\x{30AD}"));
51ok($objJa->eq("\x{30AE}\x{30FD}", "\x{30AE}\x{30AD}"));
52ok($objJa->eq("\x{30AF}\x{30FD}", "\x{30AF}\x{30AF}"));
53ok($objJa->eq("\x{30B0}\x{30FD}", "\x{30B0}\x{30AF}"));
54ok($objJa->eq("\x{30B1}\x{30FD}", "\x{30B1}\x{30B1}"));
55ok($objJa->eq("\x{30B2}\x{30FD}", "\x{30B2}\x{30B1}"));
56ok($objJa->eq("\x{30B3}\x{30FD}", "\x{30B3}\x{30B3}"));
57ok($objJa->eq("\x{30B4}\x{30FD}", "\x{30B4}\x{30B3}"));
58ok($objJa->eq("\x{30B5}\x{30FD}", "\x{30B5}\x{30B5}"));
59ok($objJa->eq("\x{30B6}\x{30FD}", "\x{30B6}\x{30B5}"));
60ok($objJa->eq("\x{30B7}\x{30FD}", "\x{30B7}\x{30B7}"));
61ok($objJa->eq("\x{30B8}\x{30FD}", "\x{30B8}\x{30B7}"));
62ok($objJa->eq("\x{30B9}\x{30FD}", "\x{30B9}\x{30B9}"));
63ok($objJa->eq("\x{30BA}\x{30FD}", "\x{30BA}\x{30B9}"));
64ok($objJa->eq("\x{30BB}\x{30FD}", "\x{30BB}\x{30BB}"));
65ok($objJa->eq("\x{30BC}\x{30FD}", "\x{30BC}\x{30BB}"));
66ok($objJa->eq("\x{30BD}\x{30FD}", "\x{30BD}\x{30BD}"));
67ok($objJa->eq("\x{30BE}\x{30FD}", "\x{30BE}\x{30BD}"));
68ok($objJa->eq("\x{30BF}\x{30FD}", "\x{30BF}\x{30BF}"));
69ok($objJa->eq("\x{30C0}\x{30FD}", "\x{30C0}\x{30BF}"));
70ok($objJa->eq("\x{30C1}\x{30FD}", "\x{30C1}\x{30C1}"));
71ok($objJa->eq("\x{30C2}\x{30FD}", "\x{30C2}\x{30C1}"));
72ok($objJa->eq("\x{30C3}\x{30FD}", "\x{30C3}\x{30C4}"));
73ok($objJa->eq("\x{30C4}\x{30FD}", "\x{30C4}\x{30C4}"));
74ok($objJa->eq("\x{30C5}\x{30FD}", "\x{30C5}\x{30C4}"));
75ok($objJa->eq("\x{30C6}\x{30FD}", "\x{30C6}\x{30C6}"));
76ok($objJa->eq("\x{30C7}\x{30FD}", "\x{30C7}\x{30C6}"));
77ok($objJa->eq("\x{30C8}\x{30FD}", "\x{30C8}\x{30C8}"));
78ok($objJa->eq("\x{30C9}\x{30FD}", "\x{30C9}\x{30C8}"));
79ok($objJa->eq("\x{30CA}\x{30FD}", "\x{30CA}\x{30CA}"));
80ok($objJa->eq("\x{30CB}\x{30FD}", "\x{30CB}\x{30CB}"));
81ok($objJa->eq("\x{30CC}\x{30FD}", "\x{30CC}\x{30CC}"));
82ok($objJa->eq("\x{30CD}\x{30FD}", "\x{30CD}\x{30CD}"));
83ok($objJa->eq("\x{30CE}\x{30FD}", "\x{30CE}\x{30CE}"));
84ok($objJa->eq("\x{30CF}\x{30FD}", "\x{30CF}\x{30CF}"));
85ok($objJa->eq("\x{30D0}\x{30FD}", "\x{30D0}\x{30CF}"));
86ok($objJa->eq("\x{30D1}\x{30FD}", "\x{30D1}\x{30CF}"));
87ok($objJa->eq("\x{30D2}\x{30FD}", "\x{30D2}\x{30D2}"));
88ok($objJa->eq("\x{30D3}\x{30FD}", "\x{30D3}\x{30D2}"));
89ok($objJa->eq("\x{30D4}\x{30FD}", "\x{30D4}\x{30D2}"));
90ok($objJa->eq("\x{30D5}\x{30FD}", "\x{30D5}\x{30D5}"));
91ok($objJa->eq("\x{30D6}\x{30FD}", "\x{30D6}\x{30D5}"));
92ok($objJa->eq("\x{30D7}\x{30FD}", "\x{30D7}\x{30D5}"));
93ok($objJa->eq("\x{30D8}\x{30FD}", "\x{30D8}\x{30D8}"));
94ok($objJa->eq("\x{30D9}\x{30FD}", "\x{30D9}\x{30D8}"));
95ok($objJa->eq("\x{30DA}\x{30FD}", "\x{30DA}\x{30D8}"));
96ok($objJa->eq("\x{30DB}\x{30FD}", "\x{30DB}\x{30DB}"));
97ok($objJa->eq("\x{30DC}\x{30FD}", "\x{30DC}\x{30DB}"));
98ok($objJa->eq("\x{30DD}\x{30FD}", "\x{30DD}\x{30DB}"));
99ok($objJa->eq("\x{30DE}\x{30FD}", "\x{30DE}\x{30DE}"));
100ok($objJa->eq("\x{30DF}\x{30FD}", "\x{30DF}\x{30DF}"));
101ok($objJa->eq("\x{30E0}\x{30FD}", "\x{30E0}\x{30E0}"));
102ok($objJa->eq("\x{30E1}\x{30FD}", "\x{30E1}\x{30E1}"));
103ok($objJa->eq("\x{30E2}\x{30FD}", "\x{30E2}\x{30E2}"));
104ok($objJa->eq("\x{30E3}\x{30FD}", "\x{30E3}\x{30E4}"));
105ok($objJa->eq("\x{30E4}\x{30FD}", "\x{30E4}\x{30E4}"));
106ok($objJa->eq("\x{30E5}\x{30FD}", "\x{30E5}\x{30E6}"));
107ok($objJa->eq("\x{30E6}\x{30FD}", "\x{30E6}\x{30E6}"));
108ok($objJa->eq("\x{30E7}\x{30FD}", "\x{30E7}\x{30E8}"));
109ok($objJa->eq("\x{30E8}\x{30FD}", "\x{30E8}\x{30E8}"));
110ok($objJa->eq("\x{30E9}\x{30FD}", "\x{30E9}\x{30E9}"));
111ok($objJa->eq("\x{30EA}\x{30FD}", "\x{30EA}\x{30EA}"));
112ok($objJa->eq("\x{30EB}\x{30FD}", "\x{30EB}\x{30EB}"));
113ok($objJa->eq("\x{30EC}\x{30FD}", "\x{30EC}\x{30EC}"));
114ok($objJa->eq("\x{30ED}\x{30FD}", "\x{30ED}\x{30ED}"));
115ok($objJa->eq("\x{30EE}\x{30FD}", "\x{30EE}\x{30EF}"));
116ok($objJa->eq("\x{30EF}\x{30FD}", "\x{30EF}\x{30EF}"));
117ok($objJa->eq("\x{30F0}\x{30FD}", "\x{30F0}\x{30F0}"));
118ok($objJa->eq("\x{30F1}\x{30FD}", "\x{30F1}\x{30F1}"));
119ok($objJa->eq("\x{30F2}\x{30FD}", "\x{30F2}\x{30F2}"));
120ok($objJa->eq("\x{30F3}\x{30FD}", "\x{30F3}\x{30F3}"));
121ok($objJa->eq("\x{30F4}\x{30FD}", "\x{30F4}\x{30A6}"));
122ok($objJa->eq("\x{30F5}\x{30FD}", "\x{30F5}\x{30AB}"));
123ok($objJa->eq("\x{30F6}\x{30FD}", "\x{30F6}\x{30B1}"));
124ok($objJa->eq("\x{30F7}\x{30FD}", "\x{30F7}\x{30EF}"));
125ok($objJa->eq("\x{30F8}\x{30FD}", "\x{30F8}\x{30F0}"));
126ok($objJa->eq("\x{30F9}\x{30FD}", "\x{30F9}\x{30F1}"));
127ok($objJa->eq("\x{30FA}\x{30FD}", "\x{30FA}\x{30F2}"));
128ok($objJa->eq("\x{31F0}\x{30FD}", "\x{31F0}\x{30AF}"));
129ok($objJa->eq("\x{31F1}\x{30FD}", "\x{31F1}\x{30B7}"));
130ok($objJa->eq("\x{31F2}\x{30FD}", "\x{31F2}\x{30B9}"));
131ok($objJa->eq("\x{31F3}\x{30FD}", "\x{31F3}\x{30C8}"));
132ok($objJa->eq("\x{31F4}\x{30FD}", "\x{31F4}\x{30CC}"));
133ok($objJa->eq("\x{31F5}\x{30FD}", "\x{31F5}\x{30CF}"));
134ok($objJa->eq("\x{31F6}\x{30FD}", "\x{31F6}\x{30D2}"));
135ok($objJa->eq("\x{31F7}\x{30FD}", "\x{31F7}\x{30D5}"));
136ok($objJa->eq("\x{31F8}\x{30FD}", "\x{31F8}\x{30D8}"));
137ok($objJa->eq("\x{31F9}\x{30FD}", "\x{31F9}\x{30DB}"));
138ok($objJa->eq("\x{31FA}\x{30FD}", "\x{31FA}\x{30E0}"));
139ok($objJa->eq("\x{31FB}\x{30FD}", "\x{31FB}\x{30E9}"));
140ok($objJa->eq("\x{31FC}\x{30FD}", "\x{31FC}\x{30EA}"));
141ok($objJa->eq("\x{31FD}\x{30FD}", "\x{31FD}\x{30EB}"));
142ok($objJa->eq("\x{31FE}\x{30FD}", "\x{31FE}\x{30EC}"));
143ok($objJa->eq("\x{31FF}\x{30FD}", "\x{31FF}\x{30ED}"));
144
145# 108
146
147$objJa->change(level => 3);
148
149ok($objJa->lt("\x{30A1}\x{30FD}", "\x{30A1}\x{30A2}"));
150ok($objJa->lt("\x{30A2}\x{30FD}", "\x{30A2}\x{30A2}"));
151ok($objJa->lt("\x{30A3}\x{30FD}", "\x{30A3}\x{30A4}"));
152ok($objJa->lt("\x{30A4}\x{30FD}", "\x{30A4}\x{30A4}"));
153ok($objJa->lt("\x{30A5}\x{30FD}", "\x{30A5}\x{30A6}"));
154ok($objJa->lt("\x{30A6}\x{30FD}", "\x{30A6}\x{30A6}"));
155ok($objJa->lt("\x{30A7}\x{30FD}", "\x{30A7}\x{30A8}"));
156ok($objJa->lt("\x{30A8}\x{30FD}", "\x{30A8}\x{30A8}"));
157ok($objJa->lt("\x{30A9}\x{30FD}", "\x{30A9}\x{30AA}"));
158ok($objJa->lt("\x{30AA}\x{30FD}", "\x{30AA}\x{30AA}"));
159ok($objJa->lt("\x{30AB}\x{30FD}", "\x{30AB}\x{30AB}"));
160ok($objJa->lt("\x{30AC}\x{30FD}", "\x{30AC}\x{30AB}"));
161ok($objJa->lt("\x{30AD}\x{30FD}", "\x{30AD}\x{30AD}"));
162ok($objJa->lt("\x{30AE}\x{30FD}", "\x{30AE}\x{30AD}"));
163ok($objJa->lt("\x{30AF}\x{30FD}", "\x{30AF}\x{30AF}"));
164ok($objJa->lt("\x{30B0}\x{30FD}", "\x{30B0}\x{30AF}"));
165ok($objJa->lt("\x{30B1}\x{30FD}", "\x{30B1}\x{30B1}"));
166ok($objJa->lt("\x{30B2}\x{30FD}", "\x{30B2}\x{30B1}"));
167ok($objJa->lt("\x{30B3}\x{30FD}", "\x{30B3}\x{30B3}"));
168ok($objJa->lt("\x{30B4}\x{30FD}", "\x{30B4}\x{30B3}"));
169ok($objJa->lt("\x{30B5}\x{30FD}", "\x{30B5}\x{30B5}"));
170ok($objJa->lt("\x{30B6}\x{30FD}", "\x{30B6}\x{30B5}"));
171ok($objJa->lt("\x{30B7}\x{30FD}", "\x{30B7}\x{30B7}"));
172ok($objJa->lt("\x{30B8}\x{30FD}", "\x{30B8}\x{30B7}"));
173ok($objJa->lt("\x{30B9}\x{30FD}", "\x{30B9}\x{30B9}"));
174ok($objJa->lt("\x{30BA}\x{30FD}", "\x{30BA}\x{30B9}"));
175ok($objJa->lt("\x{30BB}\x{30FD}", "\x{30BB}\x{30BB}"));
176ok($objJa->lt("\x{30BC}\x{30FD}", "\x{30BC}\x{30BB}"));
177ok($objJa->lt("\x{30BD}\x{30FD}", "\x{30BD}\x{30BD}"));
178ok($objJa->lt("\x{30BE}\x{30FD}", "\x{30BE}\x{30BD}"));
179ok($objJa->lt("\x{30BF}\x{30FD}", "\x{30BF}\x{30BF}"));
180ok($objJa->lt("\x{30C0}\x{30FD}", "\x{30C0}\x{30BF}"));
181ok($objJa->lt("\x{30C1}\x{30FD}", "\x{30C1}\x{30C1}"));
182ok($objJa->lt("\x{30C2}\x{30FD}", "\x{30C2}\x{30C1}"));
183ok($objJa->lt("\x{30C3}\x{30FD}", "\x{30C3}\x{30C4}"));
184ok($objJa->lt("\x{30C4}\x{30FD}", "\x{30C4}\x{30C4}"));
185ok($objJa->lt("\x{30C5}\x{30FD}", "\x{30C5}\x{30C4}"));
186ok($objJa->lt("\x{30C6}\x{30FD}", "\x{30C6}\x{30C6}"));
187ok($objJa->lt("\x{30C7}\x{30FD}", "\x{30C7}\x{30C6}"));
188ok($objJa->lt("\x{30C8}\x{30FD}", "\x{30C8}\x{30C8}"));
189ok($objJa->lt("\x{30C9}\x{30FD}", "\x{30C9}\x{30C8}"));
190ok($objJa->lt("\x{30CA}\x{30FD}", "\x{30CA}\x{30CA}"));
191ok($objJa->lt("\x{30CB}\x{30FD}", "\x{30CB}\x{30CB}"));
192ok($objJa->lt("\x{30CC}\x{30FD}", "\x{30CC}\x{30CC}"));
193ok($objJa->lt("\x{30CD}\x{30FD}", "\x{30CD}\x{30CD}"));
194ok($objJa->lt("\x{30CE}\x{30FD}", "\x{30CE}\x{30CE}"));
195ok($objJa->lt("\x{30CF}\x{30FD}", "\x{30CF}\x{30CF}"));
196ok($objJa->lt("\x{30D0}\x{30FD}", "\x{30D0}\x{30CF}"));
197ok($objJa->lt("\x{30D1}\x{30FD}", "\x{30D1}\x{30CF}"));
198ok($objJa->lt("\x{30D2}\x{30FD}", "\x{30D2}\x{30D2}"));
199ok($objJa->lt("\x{30D3}\x{30FD}", "\x{30D3}\x{30D2}"));
200ok($objJa->lt("\x{30D4}\x{30FD}", "\x{30D4}\x{30D2}"));
201ok($objJa->lt("\x{30D5}\x{30FD}", "\x{30D5}\x{30D5}"));
202ok($objJa->lt("\x{30D6}\x{30FD}", "\x{30D6}\x{30D5}"));
203ok($objJa->lt("\x{30D7}\x{30FD}", "\x{30D7}\x{30D5}"));
204ok($objJa->lt("\x{30D8}\x{30FD}", "\x{30D8}\x{30D8}"));
205ok($objJa->lt("\x{30D9}\x{30FD}", "\x{30D9}\x{30D8}"));
206ok($objJa->lt("\x{30DA}\x{30FD}", "\x{30DA}\x{30D8}"));
207ok($objJa->lt("\x{30DB}\x{30FD}", "\x{30DB}\x{30DB}"));
208ok($objJa->lt("\x{30DC}\x{30FD}", "\x{30DC}\x{30DB}"));
209ok($objJa->lt("\x{30DD}\x{30FD}", "\x{30DD}\x{30DB}"));
210ok($objJa->lt("\x{30DE}\x{30FD}", "\x{30DE}\x{30DE}"));
211ok($objJa->lt("\x{30DF}\x{30FD}", "\x{30DF}\x{30DF}"));
212ok($objJa->lt("\x{30E0}\x{30FD}", "\x{30E0}\x{30E0}"));
213ok($objJa->lt("\x{30E1}\x{30FD}", "\x{30E1}\x{30E1}"));
214ok($objJa->lt("\x{30E2}\x{30FD}", "\x{30E2}\x{30E2}"));
215ok($objJa->lt("\x{30E3}\x{30FD}", "\x{30E3}\x{30E4}"));
216ok($objJa->lt("\x{30E4}\x{30FD}", "\x{30E4}\x{30E4}"));
217ok($objJa->lt("\x{30E5}\x{30FD}", "\x{30E5}\x{30E6}"));
218ok($objJa->lt("\x{30E6}\x{30FD}", "\x{30E6}\x{30E6}"));
219ok($objJa->lt("\x{30E7}\x{30FD}", "\x{30E7}\x{30E8}"));
220ok($objJa->lt("\x{30E8}\x{30FD}", "\x{30E8}\x{30E8}"));
221ok($objJa->lt("\x{30E9}\x{30FD}", "\x{30E9}\x{30E9}"));
222ok($objJa->lt("\x{30EA}\x{30FD}", "\x{30EA}\x{30EA}"));
223ok($objJa->lt("\x{30EB}\x{30FD}", "\x{30EB}\x{30EB}"));
224ok($objJa->lt("\x{30EC}\x{30FD}", "\x{30EC}\x{30EC}"));
225ok($objJa->lt("\x{30ED}\x{30FD}", "\x{30ED}\x{30ED}"));
226ok($objJa->lt("\x{30EE}\x{30FD}", "\x{30EE}\x{30EF}"));
227ok($objJa->lt("\x{30EF}\x{30FD}", "\x{30EF}\x{30EF}"));
228ok($objJa->lt("\x{30F0}\x{30FD}", "\x{30F0}\x{30F0}"));
229ok($objJa->lt("\x{30F1}\x{30FD}", "\x{30F1}\x{30F1}"));
230ok($objJa->lt("\x{30F2}\x{30FD}", "\x{30F2}\x{30F2}"));
231ok($objJa->lt("\x{30F3}\x{30FD}", "\x{30F3}\x{30F3}"));
232ok($objJa->lt("\x{30F4}\x{30FD}", "\x{30F4}\x{30A6}"));
233ok($objJa->lt("\x{30F5}\x{30FD}", "\x{30F5}\x{30AB}"));
234ok($objJa->lt("\x{30F6}\x{30FD}", "\x{30F6}\x{30B1}"));
235ok($objJa->lt("\x{30F7}\x{30FD}", "\x{30F7}\x{30EF}"));
236ok($objJa->lt("\x{30F8}\x{30FD}", "\x{30F8}\x{30F0}"));
237ok($objJa->lt("\x{30F9}\x{30FD}", "\x{30F9}\x{30F1}"));
238ok($objJa->lt("\x{30FA}\x{30FD}", "\x{30FA}\x{30F2}"));
239ok($objJa->lt("\x{31F0}\x{30FD}", "\x{31F0}\x{30AF}"));
240ok($objJa->lt("\x{31F1}\x{30FD}", "\x{31F1}\x{30B7}"));
241ok($objJa->lt("\x{31F2}\x{30FD}", "\x{31F2}\x{30B9}"));
242ok($objJa->lt("\x{31F3}\x{30FD}", "\x{31F3}\x{30C8}"));
243ok($objJa->lt("\x{31F4}\x{30FD}", "\x{31F4}\x{30CC}"));
244ok($objJa->lt("\x{31F5}\x{30FD}", "\x{31F5}\x{30CF}"));
245ok($objJa->lt("\x{31F6}\x{30FD}", "\x{31F6}\x{30D2}"));
246ok($objJa->lt("\x{31F7}\x{30FD}", "\x{31F7}\x{30D5}"));
247ok($objJa->lt("\x{31F8}\x{30FD}", "\x{31F8}\x{30D8}"));
248ok($objJa->lt("\x{31F9}\x{30FD}", "\x{31F9}\x{30DB}"));
249ok($objJa->lt("\x{31FA}\x{30FD}", "\x{31FA}\x{30E0}"));
250ok($objJa->lt("\x{31FB}\x{30FD}", "\x{31FB}\x{30E9}"));
251ok($objJa->lt("\x{31FC}\x{30FD}", "\x{31FC}\x{30EA}"));
252ok($objJa->lt("\x{31FD}\x{30FD}", "\x{31FD}\x{30EB}"));
253ok($objJa->lt("\x{31FE}\x{30FD}", "\x{31FE}\x{30EC}"));
254ok($objJa->lt("\x{31FF}\x{30FD}", "\x{31FF}\x{30ED}"));
255
256# 214
257
258ok($objJa->eq("\x{3041}\x{309D}", "\x{30A1}\x{30FD}"));
259ok($objJa->eq("\x{3042}\x{309D}", "\x{30A2}\x{30FD}"));
260ok($objJa->eq("\x{3043}\x{309D}", "\x{30A3}\x{30FD}"));
261ok($objJa->eq("\x{3044}\x{309D}", "\x{30A4}\x{30FD}"));
262ok($objJa->eq("\x{3045}\x{309D}", "\x{30A5}\x{30FD}"));
263ok($objJa->eq("\x{3046}\x{309D}", "\x{30A6}\x{30FD}"));
264ok($objJa->eq("\x{3047}\x{309D}", "\x{30A7}\x{30FD}"));
265ok($objJa->eq("\x{3048}\x{309D}", "\x{30A8}\x{30FD}"));
266ok($objJa->eq("\x{3049}\x{309D}", "\x{30A9}\x{30FD}"));
267ok($objJa->eq("\x{304A}\x{309D}", "\x{30AA}\x{30FD}"));
268ok($objJa->eq("\x{304B}\x{309D}", "\x{30AB}\x{30FD}"));
269ok($objJa->eq("\x{304C}\x{309D}", "\x{30AC}\x{30FD}"));
270ok($objJa->eq("\x{304D}\x{309D}", "\x{30AD}\x{30FD}"));
271ok($objJa->eq("\x{304E}\x{309D}", "\x{30AE}\x{30FD}"));
272ok($objJa->eq("\x{304F}\x{309D}", "\x{30AF}\x{30FD}"));
273ok($objJa->eq("\x{3050}\x{309D}", "\x{30B0}\x{30FD}"));
274ok($objJa->eq("\x{3051}\x{309D}", "\x{30B1}\x{30FD}"));
275ok($objJa->eq("\x{3052}\x{309D}", "\x{30B2}\x{30FD}"));
276ok($objJa->eq("\x{3053}\x{309D}", "\x{30B3}\x{30FD}"));
277ok($objJa->eq("\x{3054}\x{309D}", "\x{30B4}\x{30FD}"));
278ok($objJa->eq("\x{3055}\x{309D}", "\x{30B5}\x{30FD}"));
279ok($objJa->eq("\x{3056}\x{309D}", "\x{30B6}\x{30FD}"));
280ok($objJa->eq("\x{3057}\x{309D}", "\x{30B7}\x{30FD}"));
281ok($objJa->eq("\x{3058}\x{309D}", "\x{30B8}\x{30FD}"));
282ok($objJa->eq("\x{3059}\x{309D}", "\x{30B9}\x{30FD}"));
283ok($objJa->eq("\x{305A}\x{309D}", "\x{30BA}\x{30FD}"));
284ok($objJa->eq("\x{305B}\x{309D}", "\x{30BB}\x{30FD}"));
285ok($objJa->eq("\x{305C}\x{309D}", "\x{30BC}\x{30FD}"));
286ok($objJa->eq("\x{305D}\x{309D}", "\x{30BD}\x{30FD}"));
287ok($objJa->eq("\x{305E}\x{309D}", "\x{30BE}\x{30FD}"));
288ok($objJa->eq("\x{305F}\x{309D}", "\x{30BF}\x{30FD}"));
289ok($objJa->eq("\x{3060}\x{309D}", "\x{30C0}\x{30FD}"));
290ok($objJa->eq("\x{3061}\x{309D}", "\x{30C1}\x{30FD}"));
291ok($objJa->eq("\x{3062}\x{309D}", "\x{30C2}\x{30FD}"));
292ok($objJa->eq("\x{3063}\x{309D}", "\x{30C3}\x{30FD}"));
293ok($objJa->eq("\x{3064}\x{309D}", "\x{30C4}\x{30FD}"));
294ok($objJa->eq("\x{3065}\x{309D}", "\x{30C5}\x{30FD}"));
295ok($objJa->eq("\x{3066}\x{309D}", "\x{30C6}\x{30FD}"));
296ok($objJa->eq("\x{3067}\x{309D}", "\x{30C7}\x{30FD}"));
297ok($objJa->eq("\x{3068}\x{309D}", "\x{30C8}\x{30FD}"));
298ok($objJa->eq("\x{3069}\x{309D}", "\x{30C9}\x{30FD}"));
299ok($objJa->eq("\x{306A}\x{309D}", "\x{30CA}\x{30FD}"));
300ok($objJa->eq("\x{306B}\x{309D}", "\x{30CB}\x{30FD}"));
301ok($objJa->eq("\x{306C}\x{309D}", "\x{30CC}\x{30FD}"));
302ok($objJa->eq("\x{306D}\x{309D}", "\x{30CD}\x{30FD}"));
303ok($objJa->eq("\x{306E}\x{309D}", "\x{30CE}\x{30FD}"));
304ok($objJa->eq("\x{306F}\x{309D}", "\x{30CF}\x{30FD}"));
305ok($objJa->eq("\x{3070}\x{309D}", "\x{30D0}\x{30FD}"));
306ok($objJa->eq("\x{3071}\x{309D}", "\x{30D1}\x{30FD}"));
307ok($objJa->eq("\x{3072}\x{309D}", "\x{30D2}\x{30FD}"));
308ok($objJa->eq("\x{3073}\x{309D}", "\x{30D3}\x{30FD}"));
309ok($objJa->eq("\x{3074}\x{309D}", "\x{30D4}\x{30FD}"));
310ok($objJa->eq("\x{3075}\x{309D}", "\x{30D5}\x{30FD}"));
311ok($objJa->eq("\x{3076}\x{309D}", "\x{30D6}\x{30FD}"));
312ok($objJa->eq("\x{3077}\x{309D}", "\x{30D7}\x{30FD}"));
313ok($objJa->eq("\x{3078}\x{309D}", "\x{30D8}\x{30FD}"));
314ok($objJa->eq("\x{3079}\x{309D}", "\x{30D9}\x{30FD}"));
315ok($objJa->eq("\x{307A}\x{309D}", "\x{30DA}\x{30FD}"));
316ok($objJa->eq("\x{307B}\x{309D}", "\x{30DB}\x{30FD}"));
317ok($objJa->eq("\x{307C}\x{309D}", "\x{30DC}\x{30FD}"));
318ok($objJa->eq("\x{307D}\x{309D}", "\x{30DD}\x{30FD}"));
319ok($objJa->eq("\x{307E}\x{309D}", "\x{30DE}\x{30FD}"));
320ok($objJa->eq("\x{307F}\x{309D}", "\x{30DF}\x{30FD}"));
321ok($objJa->eq("\x{3080}\x{309D}", "\x{30E0}\x{30FD}"));
322ok($objJa->eq("\x{3081}\x{309D}", "\x{30E1}\x{30FD}"));
323ok($objJa->eq("\x{3082}\x{309D}", "\x{30E2}\x{30FD}"));
324ok($objJa->eq("\x{3083}\x{309D}", "\x{30E3}\x{30FD}"));
325ok($objJa->eq("\x{3084}\x{309D}", "\x{30E4}\x{30FD}"));
326ok($objJa->eq("\x{3085}\x{309D}", "\x{30E5}\x{30FD}"));
327ok($objJa->eq("\x{3086}\x{309D}", "\x{30E6}\x{30FD}"));
328ok($objJa->eq("\x{3087}\x{309D}", "\x{30E7}\x{30FD}"));
329ok($objJa->eq("\x{3088}\x{309D}", "\x{30E8}\x{30FD}"));
330ok($objJa->eq("\x{3089}\x{309D}", "\x{30E9}\x{30FD}"));
331ok($objJa->eq("\x{308A}\x{309D}", "\x{30EA}\x{30FD}"));
332ok($objJa->eq("\x{308B}\x{309D}", "\x{30EB}\x{30FD}"));
333ok($objJa->eq("\x{308C}\x{309D}", "\x{30EC}\x{30FD}"));
334ok($objJa->eq("\x{308D}\x{309D}", "\x{30ED}\x{30FD}"));
335ok($objJa->eq("\x{308E}\x{309D}", "\x{30EE}\x{30FD}"));
336ok($objJa->eq("\x{308F}\x{309D}", "\x{30EF}\x{30FD}"));
337ok($objJa->eq("\x{3090}\x{309D}", "\x{30F0}\x{30FD}"));
338ok($objJa->eq("\x{3091}\x{309D}", "\x{30F1}\x{30FD}"));
339ok($objJa->eq("\x{3092}\x{309D}", "\x{30F2}\x{30FD}"));
340ok($objJa->eq("\x{3093}\x{309D}", "\x{30F3}\x{30FD}"));
341ok($objJa->eq("\x{3094}\x{309D}", "\x{30F4}\x{30FD}"));
342ok($objJa->eq("\x{3095}\x{309D}", "\x{30F5}\x{30FD}"));
343ok($objJa->eq("\x{3096}\x{309D}", "\x{30F6}\x{30FD}"));
344
345# 300
346
347$objJa->change(level => 4);
348
349$objJa->change(variable => 'Non-ignorable');
350
351ok($objJa->lt("\x{3041}\x{309D}", "\x{30A1}\x{30FD}"));
352ok($objJa->lt("\x{3042}\x{309D}", "\x{30A2}\x{30FD}"));
353ok($objJa->lt("\x{3043}\x{309D}", "\x{30A3}\x{30FD}"));
354ok($objJa->lt("\x{3044}\x{309D}", "\x{30A4}\x{30FD}"));
355ok($objJa->lt("\x{3045}\x{309D}", "\x{30A5}\x{30FD}"));
356ok($objJa->lt("\x{3046}\x{309D}", "\x{30A6}\x{30FD}"));
357ok($objJa->lt("\x{3047}\x{309D}", "\x{30A7}\x{30FD}"));
358ok($objJa->lt("\x{3048}\x{309D}", "\x{30A8}\x{30FD}"));
359ok($objJa->lt("\x{3049}\x{309D}", "\x{30A9}\x{30FD}"));
360ok($objJa->lt("\x{304A}\x{309D}", "\x{30AA}\x{30FD}"));
361ok($objJa->lt("\x{304B}\x{309D}", "\x{30AB}\x{30FD}"));
362ok($objJa->lt("\x{304C}\x{309D}", "\x{30AC}\x{30FD}"));
363ok($objJa->lt("\x{304D}\x{309D}", "\x{30AD}\x{30FD}"));
364ok($objJa->lt("\x{304E}\x{309D}", "\x{30AE}\x{30FD}"));
365ok($objJa->lt("\x{304F}\x{309D}", "\x{30AF}\x{30FD}"));
366ok($objJa->lt("\x{3050}\x{309D}", "\x{30B0}\x{30FD}"));
367ok($objJa->lt("\x{3051}\x{309D}", "\x{30B1}\x{30FD}"));
368ok($objJa->lt("\x{3052}\x{309D}", "\x{30B2}\x{30FD}"));
369ok($objJa->lt("\x{3053}\x{309D}", "\x{30B3}\x{30FD}"));
370ok($objJa->lt("\x{3054}\x{309D}", "\x{30B4}\x{30FD}"));
371ok($objJa->lt("\x{3055}\x{309D}", "\x{30B5}\x{30FD}"));
372ok($objJa->lt("\x{3056}\x{309D}", "\x{30B6}\x{30FD}"));
373ok($objJa->lt("\x{3057}\x{309D}", "\x{30B7}\x{30FD}"));
374ok($objJa->lt("\x{3058}\x{309D}", "\x{30B8}\x{30FD}"));
375ok($objJa->lt("\x{3059}\x{309D}", "\x{30B9}\x{30FD}"));
376ok($objJa->lt("\x{305A}\x{309D}", "\x{30BA}\x{30FD}"));
377ok($objJa->lt("\x{305B}\x{309D}", "\x{30BB}\x{30FD}"));
378ok($objJa->lt("\x{305C}\x{309D}", "\x{30BC}\x{30FD}"));
379ok($objJa->lt("\x{305D}\x{309D}", "\x{30BD}\x{30FD}"));
380ok($objJa->lt("\x{305E}\x{309D}", "\x{30BE}\x{30FD}"));
381ok($objJa->lt("\x{305F}\x{309D}", "\x{30BF}\x{30FD}"));
382ok($objJa->lt("\x{3060}\x{309D}", "\x{30C0}\x{30FD}"));
383ok($objJa->lt("\x{3061}\x{309D}", "\x{30C1}\x{30FD}"));
384ok($objJa->lt("\x{3062}\x{309D}", "\x{30C2}\x{30FD}"));
385ok($objJa->lt("\x{3063}\x{309D}", "\x{30C3}\x{30FD}"));
386ok($objJa->lt("\x{3064}\x{309D}", "\x{30C4}\x{30FD}"));
387ok($objJa->lt("\x{3065}\x{309D}", "\x{30C5}\x{30FD}"));
388ok($objJa->lt("\x{3066}\x{309D}", "\x{30C6}\x{30FD}"));
389ok($objJa->lt("\x{3067}\x{309D}", "\x{30C7}\x{30FD}"));
390ok($objJa->lt("\x{3068}\x{309D}", "\x{30C8}\x{30FD}"));
391ok($objJa->lt("\x{3069}\x{309D}", "\x{30C9}\x{30FD}"));
392ok($objJa->lt("\x{306A}\x{309D}", "\x{30CA}\x{30FD}"));
393ok($objJa->lt("\x{306B}\x{309D}", "\x{30CB}\x{30FD}"));
394ok($objJa->lt("\x{306C}\x{309D}", "\x{30CC}\x{30FD}"));
395ok($objJa->lt("\x{306D}\x{309D}", "\x{30CD}\x{30FD}"));
396ok($objJa->lt("\x{306E}\x{309D}", "\x{30CE}\x{30FD}"));
397ok($objJa->lt("\x{306F}\x{309D}", "\x{30CF}\x{30FD}"));
398ok($objJa->lt("\x{3070}\x{309D}", "\x{30D0}\x{30FD}"));
399ok($objJa->lt("\x{3071}\x{309D}", "\x{30D1}\x{30FD}"));
400ok($objJa->lt("\x{3072}\x{309D}", "\x{30D2}\x{30FD}"));
401ok($objJa->lt("\x{3073}\x{309D}", "\x{30D3}\x{30FD}"));
402ok($objJa->lt("\x{3074}\x{309D}", "\x{30D4}\x{30FD}"));
403ok($objJa->lt("\x{3075}\x{309D}", "\x{30D5}\x{30FD}"));
404ok($objJa->lt("\x{3076}\x{309D}", "\x{30D6}\x{30FD}"));
405ok($objJa->lt("\x{3077}\x{309D}", "\x{30D7}\x{30FD}"));
406ok($objJa->lt("\x{3078}\x{309D}", "\x{30D8}\x{30FD}"));
407ok($objJa->lt("\x{3079}\x{309D}", "\x{30D9}\x{30FD}"));
408ok($objJa->lt("\x{307A}\x{309D}", "\x{30DA}\x{30FD}"));
409ok($objJa->lt("\x{307B}\x{309D}", "\x{30DB}\x{30FD}"));
410ok($objJa->lt("\x{307C}\x{309D}", "\x{30DC}\x{30FD}"));
411ok($objJa->lt("\x{307D}\x{309D}", "\x{30DD}\x{30FD}"));
412ok($objJa->lt("\x{307E}\x{309D}", "\x{30DE}\x{30FD}"));
413ok($objJa->lt("\x{307F}\x{309D}", "\x{30DF}\x{30FD}"));
414ok($objJa->lt("\x{3080}\x{309D}", "\x{30E0}\x{30FD}"));
415ok($objJa->lt("\x{3081}\x{309D}", "\x{30E1}\x{30FD}"));
416ok($objJa->lt("\x{3082}\x{309D}", "\x{30E2}\x{30FD}"));
417ok($objJa->lt("\x{3083}\x{309D}", "\x{30E3}\x{30FD}"));
418ok($objJa->lt("\x{3084}\x{309D}", "\x{30E4}\x{30FD}"));
419ok($objJa->lt("\x{3085}\x{309D}", "\x{30E5}\x{30FD}"));
420ok($objJa->lt("\x{3086}\x{309D}", "\x{30E6}\x{30FD}"));
421ok($objJa->lt("\x{3087}\x{309D}", "\x{30E7}\x{30FD}"));
422ok($objJa->lt("\x{3088}\x{309D}", "\x{30E8}\x{30FD}"));
423ok($objJa->lt("\x{3089}\x{309D}", "\x{30E9}\x{30FD}"));
424ok($objJa->lt("\x{308A}\x{309D}", "\x{30EA}\x{30FD}"));
425ok($objJa->lt("\x{308B}\x{309D}", "\x{30EB}\x{30FD}"));
426ok($objJa->lt("\x{308C}\x{309D}", "\x{30EC}\x{30FD}"));
427ok($objJa->lt("\x{308D}\x{309D}", "\x{30ED}\x{30FD}"));
428ok($objJa->lt("\x{308E}\x{309D}", "\x{30EE}\x{30FD}"));
429ok($objJa->lt("\x{308F}\x{309D}", "\x{30EF}\x{30FD}"));
430ok($objJa->lt("\x{3090}\x{309D}", "\x{30F0}\x{30FD}"));
431ok($objJa->lt("\x{3091}\x{309D}", "\x{30F1}\x{30FD}"));
432ok($objJa->lt("\x{3092}\x{309D}", "\x{30F2}\x{30FD}"));
433ok($objJa->lt("\x{3093}\x{309D}", "\x{30F3}\x{30FD}"));
434ok($objJa->lt("\x{3094}\x{309D}", "\x{30F4}\x{30FD}"));
435ok($objJa->lt("\x{3095}\x{309D}", "\x{30F5}\x{30FD}"));
436ok($objJa->lt("\x{3096}\x{309D}", "\x{30F6}\x{30FD}"));
437
438# 386
439
440my $vs = "\x{3099}";
441
442ok($objJa->eq("\x{30A1}\x{30FD}", "\x{FF67}\x{30FD}"));
443ok($objJa->eq("\x{30A2}\x{30FD}", "\x{FF71}\x{30FD}"));
444ok($objJa->eq("\x{30A3}\x{30FD}", "\x{FF68}\x{30FD}"));
445ok($objJa->eq("\x{30A4}\x{30FD}", "\x{FF72}\x{30FD}"));
446ok($objJa->eq("\x{30A5}\x{30FD}", "\x{FF69}\x{30FD}"));
447ok($objJa->eq("\x{30A5}\x{30FE}", "\x{30A5}\x{30FD}".$vs));
448ok($objJa->eq("\x{FF69}\x{30FE}", "\x{FF69}\x{30FD}".$vs));
449ok($objJa->eq("\x{3045}\x{309E}", "\x{3045}\x{309D}".$vs));
450ok($objJa->eq("\x{30A6}\x{30FD}", "\x{FF73}\x{30FD}"));
451ok($objJa->eq("\x{30A6}\x{30FE}", "\x{30A6}\x{30FD}".$vs));
452ok($objJa->eq("\x{FF73}\x{30FE}", "\x{FF73}\x{30FD}".$vs));
453ok($objJa->eq("\x{3046}\x{309E}", "\x{3046}\x{309D}".$vs));
454ok($objJa->eq("\x{30A7}\x{30FD}", "\x{FF6A}\x{30FD}"));
455ok($objJa->eq("\x{30A8}\x{30FD}", "\x{FF74}\x{30FD}"));
456ok($objJa->eq("\x{30A9}\x{30FD}", "\x{FF6B}\x{30FD}"));
457ok($objJa->eq("\x{30AA}\x{30FD}", "\x{FF75}\x{30FD}"));
458ok($objJa->eq("\x{30AB}\x{30FD}", "\x{FF76}\x{30FD}"));
459ok($objJa->eq("\x{30AB}\x{30FE}", "\x{30AB}\x{30FD}".$vs));
460ok($objJa->eq("\x{FF76}\x{30FE}", "\x{FF76}\x{30FD}".$vs));
461ok($objJa->eq("\x{304B}\x{309E}", "\x{304B}\x{309D}".$vs));
462ok($objJa->eq("\x{30AC}\x{30FD}", "\x{30AB}\x{3099}\x{30FD}"));
463ok($objJa->eq("\x{30AC}\x{30FD}", "\x{FF76}\x{FF9E}\x{30FD}"));
464ok($objJa->eq("\x{304C}\x{309D}", "\x{304B}\x{3099}\x{309D}"));
465ok($objJa->eq("\x{30AC}\x{30FE}", "\x{30AC}\x{30FD}".$vs));
466ok($objJa->eq("\x{30AB}\x{3099}\x{30FE}", "\x{30AB}\x{3099}\x{30FD}".$vs));
467ok($objJa->eq("\x{FF76}\x{FF9E}\x{30FE}", "\x{FF76}\x{FF9E}\x{30FD}".$vs));
468ok($objJa->eq("\x{304C}\x{309E}", "\x{304C}\x{309D}".$vs));
469ok($objJa->eq("\x{304B}\x{3099}\x{309E}", "\x{304B}\x{3099}\x{309D}".$vs));
470ok($objJa->eq("\x{30AD}\x{30FD}", "\x{FF77}\x{30FD}"));
471ok($objJa->eq("\x{30AD}\x{30FE}", "\x{30AD}\x{30FD}".$vs));
472ok($objJa->eq("\x{FF77}\x{30FE}", "\x{FF77}\x{30FD}".$vs));
473ok($objJa->eq("\x{304D}\x{309E}", "\x{304D}\x{309D}".$vs));
474ok($objJa->eq("\x{30AE}\x{30FD}", "\x{30AD}\x{3099}\x{30FD}"));
475ok($objJa->eq("\x{30AE}\x{30FD}", "\x{FF77}\x{FF9E}\x{30FD}"));
476ok($objJa->eq("\x{304E}\x{309D}", "\x{304D}\x{3099}\x{309D}"));
477ok($objJa->eq("\x{30AE}\x{30FE}", "\x{30AE}\x{30FD}".$vs));
478ok($objJa->eq("\x{30AD}\x{3099}\x{30FE}", "\x{30AD}\x{3099}\x{30FD}".$vs));
479ok($objJa->eq("\x{FF77}\x{FF9E}\x{30FE}", "\x{FF77}\x{FF9E}\x{30FD}".$vs));
480ok($objJa->eq("\x{304E}\x{309E}", "\x{304E}\x{309D}".$vs));
481ok($objJa->eq("\x{304D}\x{3099}\x{309E}", "\x{304D}\x{3099}\x{309D}".$vs));
482ok($objJa->eq("\x{30AF}\x{30FD}", "\x{FF78}\x{30FD}"));
483ok($objJa->eq("\x{30AF}\x{30FE}", "\x{30AF}\x{30FD}".$vs));
484ok($objJa->eq("\x{FF78}\x{30FE}", "\x{FF78}\x{30FD}".$vs));
485ok($objJa->eq("\x{304F}\x{309E}", "\x{304F}\x{309D}".$vs));
486ok($objJa->eq("\x{30B0}\x{30FD}", "\x{30AF}\x{3099}\x{30FD}"));
487ok($objJa->eq("\x{30B0}\x{30FD}", "\x{FF78}\x{FF9E}\x{30FD}"));
488ok($objJa->eq("\x{3050}\x{309D}", "\x{304F}\x{3099}\x{309D}"));
489ok($objJa->eq("\x{30B0}\x{30FE}", "\x{30B0}\x{30FD}".$vs));
490ok($objJa->eq("\x{30AF}\x{3099}\x{30FE}", "\x{30AF}\x{3099}\x{30FD}".$vs));
491ok($objJa->eq("\x{FF78}\x{FF9E}\x{30FE}", "\x{FF78}\x{FF9E}\x{30FD}".$vs));
492ok($objJa->eq("\x{3050}\x{309E}", "\x{3050}\x{309D}".$vs));
493ok($objJa->eq("\x{304F}\x{3099}\x{309E}", "\x{304F}\x{3099}\x{309D}".$vs));
494ok($objJa->eq("\x{30B1}\x{30FD}", "\x{FF79}\x{30FD}"));
495ok($objJa->eq("\x{30B1}\x{30FE}", "\x{30B1}\x{30FD}".$vs));
496ok($objJa->eq("\x{FF79}\x{30FE}", "\x{FF79}\x{30FD}".$vs));
497ok($objJa->eq("\x{3051}\x{309E}", "\x{3051}\x{309D}".$vs));
498ok($objJa->eq("\x{30B2}\x{30FD}", "\x{30B1}\x{3099}\x{30FD}"));
499ok($objJa->eq("\x{30B2}\x{30FD}", "\x{FF79}\x{FF9E}\x{30FD}"));
500ok($objJa->eq("\x{3052}\x{309D}", "\x{3051}\x{3099}\x{309D}"));
501ok($objJa->eq("\x{30B2}\x{30FE}", "\x{30B2}\x{30FD}".$vs));
502ok($objJa->eq("\x{30B1}\x{3099}\x{30FE}", "\x{30B1}\x{3099}\x{30FD}".$vs));
503ok($objJa->eq("\x{FF79}\x{FF9E}\x{30FE}", "\x{FF79}\x{FF9E}\x{30FD}".$vs));
504ok($objJa->eq("\x{3052}\x{309E}", "\x{3052}\x{309D}".$vs));
505ok($objJa->eq("\x{3051}\x{3099}\x{309E}", "\x{3051}\x{3099}\x{309D}".$vs));
506ok($objJa->eq("\x{30B3}\x{30FD}", "\x{FF7A}\x{30FD}"));
507ok($objJa->eq("\x{30B3}\x{30FE}", "\x{30B3}\x{30FD}".$vs));
508ok($objJa->eq("\x{FF7A}\x{30FE}", "\x{FF7A}\x{30FD}".$vs));
509ok($objJa->eq("\x{3053}\x{309E}", "\x{3053}\x{309D}".$vs));
510ok($objJa->eq("\x{30B4}\x{30FD}", "\x{30B3}\x{3099}\x{30FD}"));
511ok($objJa->eq("\x{30B4}\x{30FD}", "\x{FF7A}\x{FF9E}\x{30FD}"));
512ok($objJa->eq("\x{3054}\x{309D}", "\x{3053}\x{3099}\x{309D}"));
513ok($objJa->eq("\x{30B4}\x{30FE}", "\x{30B4}\x{30FD}".$vs));
514ok($objJa->eq("\x{30B3}\x{3099}\x{30FE}", "\x{30B3}\x{3099}\x{30FD}".$vs));
515ok($objJa->eq("\x{FF7A}\x{FF9E}\x{30FE}", "\x{FF7A}\x{FF9E}\x{30FD}".$vs));
516ok($objJa->eq("\x{3054}\x{309E}", "\x{3054}\x{309D}".$vs));
517ok($objJa->eq("\x{3053}\x{3099}\x{309E}", "\x{3053}\x{3099}\x{309D}".$vs));
518ok($objJa->eq("\x{30B5}\x{30FD}", "\x{FF7B}\x{30FD}"));
519ok($objJa->eq("\x{30B5}\x{30FE}", "\x{30B5}\x{30FD}".$vs));
520ok($objJa->eq("\x{FF7B}\x{30FE}", "\x{FF7B}\x{30FD}".$vs));
521ok($objJa->eq("\x{3055}\x{309E}", "\x{3055}\x{309D}".$vs));
522ok($objJa->eq("\x{30B6}\x{30FD}", "\x{30B5}\x{3099}\x{30FD}"));
523ok($objJa->eq("\x{30B6}\x{30FD}", "\x{FF7B}\x{FF9E}\x{30FD}"));
524ok($objJa->eq("\x{3056}\x{309D}", "\x{3055}\x{3099}\x{309D}"));
525ok($objJa->eq("\x{30B6}\x{30FE}", "\x{30B6}\x{30FD}".$vs));
526ok($objJa->eq("\x{30B5}\x{3099}\x{30FE}", "\x{30B5}\x{3099}\x{30FD}".$vs));
527ok($objJa->eq("\x{FF7B}\x{FF9E}\x{30FE}", "\x{FF7B}\x{FF9E}\x{30FD}".$vs));
528ok($objJa->eq("\x{3056}\x{309E}", "\x{3056}\x{309D}".$vs));
529ok($objJa->eq("\x{3055}\x{3099}\x{309E}", "\x{3055}\x{3099}\x{309D}".$vs));
530ok($objJa->eq("\x{30B7}\x{30FD}", "\x{FF7C}\x{30FD}"));
531ok($objJa->eq("\x{30B7}\x{30FE}", "\x{30B7}\x{30FD}".$vs));
532ok($objJa->eq("\x{FF7C}\x{30FE}", "\x{FF7C}\x{30FD}".$vs));
533ok($objJa->eq("\x{3057}\x{309E}", "\x{3057}\x{309D}".$vs));
534ok($objJa->eq("\x{30B8}\x{30FD}", "\x{30B7}\x{3099}\x{30FD}"));
535ok($objJa->eq("\x{30B8}\x{30FD}", "\x{FF7C}\x{FF9E}\x{30FD}"));
536ok($objJa->eq("\x{3058}\x{309D}", "\x{3057}\x{3099}\x{309D}"));
537ok($objJa->eq("\x{30B8}\x{30FE}", "\x{30B8}\x{30FD}".$vs));
538ok($objJa->eq("\x{30B7}\x{3099}\x{30FE}", "\x{30B7}\x{3099}\x{30FD}".$vs));
539ok($objJa->eq("\x{FF7C}\x{FF9E}\x{30FE}", "\x{FF7C}\x{FF9E}\x{30FD}".$vs));
540ok($objJa->eq("\x{3058}\x{309E}", "\x{3058}\x{309D}".$vs));
541ok($objJa->eq("\x{3057}\x{3099}\x{309E}", "\x{3057}\x{3099}\x{309D}".$vs));
542ok($objJa->eq("\x{30B9}\x{30FD}", "\x{FF7D}\x{30FD}"));
543ok($objJa->eq("\x{30B9}\x{30FE}", "\x{30B9}\x{30FD}".$vs));
544ok($objJa->eq("\x{FF7D}\x{30FE}", "\x{FF7D}\x{30FD}".$vs));
545ok($objJa->eq("\x{3059}\x{309E}", "\x{3059}\x{309D}".$vs));
546ok($objJa->eq("\x{30BA}\x{30FD}", "\x{30B9}\x{3099}\x{30FD}"));
547ok($objJa->eq("\x{30BA}\x{30FD}", "\x{FF7D}\x{FF9E}\x{30FD}"));
548ok($objJa->eq("\x{305A}\x{309D}", "\x{3059}\x{3099}\x{309D}"));
549ok($objJa->eq("\x{30BA}\x{30FE}", "\x{30BA}\x{30FD}".$vs));
550ok($objJa->eq("\x{30B9}\x{3099}\x{30FE}", "\x{30B9}\x{3099}\x{30FD}".$vs));
551ok($objJa->eq("\x{FF7D}\x{FF9E}\x{30FE}", "\x{FF7D}\x{FF9E}\x{30FD}".$vs));
552ok($objJa->eq("\x{305A}\x{309E}", "\x{305A}\x{309D}".$vs));
553ok($objJa->eq("\x{3059}\x{3099}\x{309E}", "\x{3059}\x{3099}\x{309D}".$vs));
554ok($objJa->eq("\x{30BB}\x{30FD}", "\x{FF7E}\x{30FD}"));
555ok($objJa->eq("\x{30BB}\x{30FE}", "\x{30BB}\x{30FD}".$vs));
556ok($objJa->eq("\x{FF7E}\x{30FE}", "\x{FF7E}\x{30FD}".$vs));
557ok($objJa->eq("\x{305B}\x{309E}", "\x{305B}\x{309D}".$vs));
558ok($objJa->eq("\x{30BC}\x{30FD}", "\x{30BB}\x{3099}\x{30FD}"));
559ok($objJa->eq("\x{30BC}\x{30FD}", "\x{FF7E}\x{FF9E}\x{30FD}"));
560ok($objJa->eq("\x{305C}\x{309D}", "\x{305B}\x{3099}\x{309D}"));
561ok($objJa->eq("\x{30BC}\x{30FE}", "\x{30BC}\x{30FD}".$vs));
562ok($objJa->eq("\x{30BB}\x{3099}\x{30FE}", "\x{30BB}\x{3099}\x{30FD}".$vs));
563ok($objJa->eq("\x{FF7E}\x{FF9E}\x{30FE}", "\x{FF7E}\x{FF9E}\x{30FD}".$vs));
564ok($objJa->eq("\x{305C}\x{309E}", "\x{305C}\x{309D}".$vs));
565ok($objJa->eq("\x{305B}\x{3099}\x{309E}", "\x{305B}\x{3099}\x{309D}".$vs));
566ok($objJa->eq("\x{30BD}\x{30FD}", "\x{FF7F}\x{30FD}"));
567ok($objJa->eq("\x{30BD}\x{30FE}", "\x{30BD}\x{30FD}".$vs));
568ok($objJa->eq("\x{FF7F}\x{30FE}", "\x{FF7F}\x{30FD}".$vs));
569ok($objJa->eq("\x{305D}\x{309E}", "\x{305D}\x{309D}".$vs));
570ok($objJa->eq("\x{30BE}\x{30FD}", "\x{30BD}\x{3099}\x{30FD}"));
571ok($objJa->eq("\x{30BE}\x{30FD}", "\x{FF7F}\x{FF9E}\x{30FD}"));
572ok($objJa->eq("\x{305E}\x{309D}", "\x{305D}\x{3099}\x{309D}"));
573ok($objJa->eq("\x{30BE}\x{30FE}", "\x{30BE}\x{30FD}".$vs));
574ok($objJa->eq("\x{30BD}\x{3099}\x{30FE}", "\x{30BD}\x{3099}\x{30FD}".$vs));
575ok($objJa->eq("\x{FF7F}\x{FF9E}\x{30FE}", "\x{FF7F}\x{FF9E}\x{30FD}".$vs));
576ok($objJa->eq("\x{305E}\x{309E}", "\x{305E}\x{309D}".$vs));
577ok($objJa->eq("\x{305D}\x{3099}\x{309E}", "\x{305D}\x{3099}\x{309D}".$vs));
578ok($objJa->eq("\x{30BF}\x{30FD}", "\x{FF80}\x{30FD}"));
579ok($objJa->eq("\x{30BF}\x{30FE}", "\x{30BF}\x{30FD}".$vs));
580ok($objJa->eq("\x{FF80}\x{30FE}", "\x{FF80}\x{30FD}".$vs));
581ok($objJa->eq("\x{305F}\x{309E}", "\x{305F}\x{309D}".$vs));
582ok($objJa->eq("\x{30C0}\x{30FD}", "\x{30BF}\x{3099}\x{30FD}"));
583ok($objJa->eq("\x{30C0}\x{30FD}", "\x{FF80}\x{FF9E}\x{30FD}"));
584ok($objJa->eq("\x{3060}\x{309D}", "\x{305F}\x{3099}\x{309D}"));
585ok($objJa->eq("\x{30C0}\x{30FE}", "\x{30C0}\x{30FD}".$vs));
586ok($objJa->eq("\x{30BF}\x{3099}\x{30FE}", "\x{30BF}\x{3099}\x{30FD}".$vs));
587ok($objJa->eq("\x{FF80}\x{FF9E}\x{30FE}", "\x{FF80}\x{FF9E}\x{30FD}".$vs));
588ok($objJa->eq("\x{3060}\x{309E}", "\x{3060}\x{309D}".$vs));
589ok($objJa->eq("\x{305F}\x{3099}\x{309E}", "\x{305F}\x{3099}\x{309D}".$vs));
590ok($objJa->eq("\x{30C1}\x{30FD}", "\x{FF81}\x{30FD}"));
591ok($objJa->eq("\x{30C1}\x{30FE}", "\x{30C1}\x{30FD}".$vs));
592ok($objJa->eq("\x{FF81}\x{30FE}", "\x{FF81}\x{30FD}".$vs));
593ok($objJa->eq("\x{3061}\x{309E}", "\x{3061}\x{309D}".$vs));
594ok($objJa->eq("\x{30C2}\x{30FD}", "\x{30C1}\x{3099}\x{30FD}"));
595ok($objJa->eq("\x{30C2}\x{30FD}", "\x{FF81}\x{FF9E}\x{30FD}"));
596ok($objJa->eq("\x{3062}\x{309D}", "\x{3061}\x{3099}\x{309D}"));
597ok($objJa->eq("\x{30C2}\x{30FE}", "\x{30C2}\x{30FD}".$vs));
598ok($objJa->eq("\x{30C1}\x{3099}\x{30FE}", "\x{30C1}\x{3099}\x{30FD}".$vs));
599ok($objJa->eq("\x{FF81}\x{FF9E}\x{30FE}", "\x{FF81}\x{FF9E}\x{30FD}".$vs));
600ok($objJa->eq("\x{3062}\x{309E}", "\x{3062}\x{309D}".$vs));
601ok($objJa->eq("\x{3061}\x{3099}\x{309E}", "\x{3061}\x{3099}\x{309D}".$vs));
602ok($objJa->eq("\x{30C3}\x{30FD}", "\x{FF6F}\x{30FD}"));
603ok($objJa->eq("\x{30C3}\x{30FE}", "\x{30C3}\x{30FD}".$vs));
604ok($objJa->eq("\x{FF6F}\x{30FE}", "\x{FF6F}\x{30FD}".$vs));
605ok($objJa->eq("\x{3063}\x{309E}", "\x{3063}\x{309D}".$vs));
606ok($objJa->eq("\x{30C4}\x{30FD}", "\x{FF82}\x{30FD}"));
607ok($objJa->eq("\x{30C4}\x{30FE}", "\x{30C4}\x{30FD}".$vs));
608ok($objJa->eq("\x{FF82}\x{30FE}", "\x{FF82}\x{30FD}".$vs));
609ok($objJa->eq("\x{3064}\x{309E}", "\x{3064}\x{309D}".$vs));
610ok($objJa->eq("\x{30C5}\x{30FD}", "\x{30C4}\x{3099}\x{30FD}"));
611ok($objJa->eq("\x{30C5}\x{30FD}", "\x{FF82}\x{FF9E}\x{30FD}"));
612ok($objJa->eq("\x{3065}\x{309D}", "\x{3064}\x{3099}\x{309D}"));
613ok($objJa->eq("\x{30C5}\x{30FE}", "\x{30C5}\x{30FD}".$vs));
614ok($objJa->eq("\x{30C4}\x{3099}\x{30FE}", "\x{30C4}\x{3099}\x{30FD}".$vs));
615ok($objJa->eq("\x{FF82}\x{FF9E}\x{30FE}", "\x{FF82}\x{FF9E}\x{30FD}".$vs));
616ok($objJa->eq("\x{3065}\x{309E}", "\x{3065}\x{309D}".$vs));
617ok($objJa->eq("\x{3064}\x{3099}\x{309E}", "\x{3064}\x{3099}\x{309D}".$vs));
618ok($objJa->eq("\x{30C6}\x{30FD}", "\x{FF83}\x{30FD}"));
619ok($objJa->eq("\x{30C6}\x{30FE}", "\x{30C6}\x{30FD}".$vs));
620ok($objJa->eq("\x{FF83}\x{30FE}", "\x{FF83}\x{30FD}".$vs));
621ok($objJa->eq("\x{3066}\x{309E}", "\x{3066}\x{309D}".$vs));
622ok($objJa->eq("\x{30C7}\x{30FD}", "\x{30C6}\x{3099}\x{30FD}"));
623ok($objJa->eq("\x{30C7}\x{30FD}", "\x{FF83}\x{FF9E}\x{30FD}"));
624ok($objJa->eq("\x{3067}\x{309D}", "\x{3066}\x{3099}\x{309D}"));
625ok($objJa->eq("\x{30C7}\x{30FE}", "\x{30C7}\x{30FD}".$vs));
626ok($objJa->eq("\x{30C6}\x{3099}\x{30FE}", "\x{30C6}\x{3099}\x{30FD}".$vs));
627ok($objJa->eq("\x{FF83}\x{FF9E}\x{30FE}", "\x{FF83}\x{FF9E}\x{30FD}".$vs));
628ok($objJa->eq("\x{3067}\x{309E}", "\x{3067}\x{309D}".$vs));
629ok($objJa->eq("\x{3066}\x{3099}\x{309E}", "\x{3066}\x{3099}\x{309D}".$vs));
630ok($objJa->eq("\x{30C8}\x{30FD}", "\x{FF84}\x{30FD}"));
631ok($objJa->eq("\x{30C8}\x{30FE}", "\x{30C8}\x{30FD}".$vs));
632ok($objJa->eq("\x{FF84}\x{30FE}", "\x{FF84}\x{30FD}".$vs));
633ok($objJa->eq("\x{3068}\x{309E}", "\x{3068}\x{309D}".$vs));
634ok($objJa->eq("\x{30C9}\x{30FD}", "\x{30C8}\x{3099}\x{30FD}"));
635ok($objJa->eq("\x{30C9}\x{30FD}", "\x{FF84}\x{FF9E}\x{30FD}"));
636ok($objJa->eq("\x{3069}\x{309D}", "\x{3068}\x{3099}\x{309D}"));
637ok($objJa->eq("\x{30C9}\x{30FE}", "\x{30C9}\x{30FD}".$vs));
638ok($objJa->eq("\x{30C8}\x{3099}\x{30FE}", "\x{30C8}\x{3099}\x{30FD}".$vs));
639ok($objJa->eq("\x{FF84}\x{FF9E}\x{30FE}", "\x{FF84}\x{FF9E}\x{30FD}".$vs));
640ok($objJa->eq("\x{3069}\x{309E}", "\x{3069}\x{309D}".$vs));
641ok($objJa->eq("\x{3068}\x{3099}\x{309E}", "\x{3068}\x{3099}\x{309D}".$vs));
642ok($objJa->eq("\x{30CA}\x{30FD}", "\x{FF85}\x{30FD}"));
643ok($objJa->eq("\x{30CB}\x{30FD}", "\x{FF86}\x{30FD}"));
644ok($objJa->eq("\x{30CC}\x{30FD}", "\x{FF87}\x{30FD}"));
645ok($objJa->eq("\x{30CD}\x{30FD}", "\x{FF88}\x{30FD}"));
646ok($objJa->eq("\x{30CE}\x{30FD}", "\x{FF89}\x{30FD}"));
647ok($objJa->eq("\x{30CF}\x{30FD}", "\x{FF8A}\x{30FD}"));
648ok($objJa->eq("\x{30CF}\x{30FE}", "\x{30CF}\x{30FD}".$vs));
649ok($objJa->eq("\x{FF8A}\x{30FE}", "\x{FF8A}\x{30FD}".$vs));
650ok($objJa->eq("\x{306F}\x{309E}", "\x{306F}\x{309D}".$vs));
651ok($objJa->eq("\x{30D0}\x{30FD}", "\x{30CF}\x{3099}\x{30FD}"));
652ok($objJa->eq("\x{30D0}\x{30FD}", "\x{FF8A}\x{FF9E}\x{30FD}"));
653ok($objJa->eq("\x{3070}\x{309D}", "\x{306F}\x{3099}\x{309D}"));
654ok($objJa->eq("\x{30D0}\x{30FE}", "\x{30D0}\x{30FD}".$vs));
655ok($objJa->eq("\x{30CF}\x{3099}\x{30FE}", "\x{30CF}\x{3099}\x{30FD}".$vs));
656ok($objJa->eq("\x{FF8A}\x{FF9E}\x{30FE}", "\x{FF8A}\x{FF9E}\x{30FD}".$vs));
657ok($objJa->eq("\x{3070}\x{309E}", "\x{3070}\x{309D}".$vs));
658ok($objJa->eq("\x{306F}\x{3099}\x{309E}", "\x{306F}\x{3099}\x{309D}".$vs));
659ok($objJa->eq("\x{30D1}\x{30FD}", "\x{30CF}\x{309A}\x{30FD}"));
660ok($objJa->eq("\x{30D1}\x{30FD}", "\x{FF8A}\x{FF9F}\x{30FD}"));
661ok($objJa->eq("\x{3071}\x{309D}", "\x{306F}\x{309A}\x{309D}"));
662ok($objJa->eq("\x{30D1}\x{30FE}", "\x{30D1}\x{30FD}".$vs));
663ok($objJa->eq("\x{30CF}\x{309A}\x{30FE}", "\x{30CF}\x{309A}\x{30FD}".$vs));
664ok($objJa->eq("\x{FF8A}\x{FF9F}\x{30FE}", "\x{FF8A}\x{FF9F}\x{30FD}".$vs));
665ok($objJa->eq("\x{3071}\x{309E}", "\x{3071}\x{309D}".$vs));
666ok($objJa->eq("\x{306F}\x{309A}\x{309E}", "\x{306F}\x{309A}\x{309D}".$vs));
667ok($objJa->eq("\x{30D2}\x{30FD}", "\x{FF8B}\x{30FD}"));
668ok($objJa->eq("\x{30D2}\x{30FE}", "\x{30D2}\x{30FD}".$vs));
669ok($objJa->eq("\x{FF8B}\x{30FE}", "\x{FF8B}\x{30FD}".$vs));
670ok($objJa->eq("\x{3072}\x{309E}", "\x{3072}\x{309D}".$vs));
671ok($objJa->eq("\x{30D3}\x{30FD}", "\x{30D2}\x{3099}\x{30FD}"));
672ok($objJa->eq("\x{30D3}\x{30FD}", "\x{FF8B}\x{FF9E}\x{30FD}"));
673ok($objJa->eq("\x{3073}\x{309D}", "\x{3072}\x{3099}\x{309D}"));
674ok($objJa->eq("\x{30D3}\x{30FE}", "\x{30D3}\x{30FD}".$vs));
675ok($objJa->eq("\x{30D2}\x{3099}\x{30FE}", "\x{30D2}\x{3099}\x{30FD}".$vs));
676ok($objJa->eq("\x{FF8B}\x{FF9E}\x{30FE}", "\x{FF8B}\x{FF9E}\x{30FD}".$vs));
677ok($objJa->eq("\x{3073}\x{309E}", "\x{3073}\x{309D}".$vs));
678ok($objJa->eq("\x{3072}\x{3099}\x{309E}", "\x{3072}\x{3099}\x{309D}".$vs));
679ok($objJa->eq("\x{30D4}\x{30FD}", "\x{30D2}\x{309A}\x{30FD}"));
680ok($objJa->eq("\x{30D4}\x{30FD}", "\x{FF8B}\x{FF9F}\x{30FD}"));
681ok($objJa->eq("\x{3074}\x{309D}", "\x{3072}\x{309A}\x{309D}"));
682ok($objJa->eq("\x{30D4}\x{30FE}", "\x{30D4}\x{30FD}".$vs));
683ok($objJa->eq("\x{30D2}\x{309A}\x{30FE}", "\x{30D2}\x{309A}\x{30FD}".$vs));
684ok($objJa->eq("\x{FF8B}\x{FF9F}\x{30FE}", "\x{FF8B}\x{FF9F}\x{30FD}".$vs));
685ok($objJa->eq("\x{3074}\x{309E}", "\x{3074}\x{309D}".$vs));
686ok($objJa->eq("\x{3072}\x{309A}\x{309E}", "\x{3072}\x{309A}\x{309D}".$vs));
687ok($objJa->eq("\x{30D5}\x{30FD}", "\x{FF8C}\x{30FD}"));
688ok($objJa->eq("\x{30D5}\x{30FE}", "\x{30D5}\x{30FD}".$vs));
689ok($objJa->eq("\x{FF8C}\x{30FE}", "\x{FF8C}\x{30FD}".$vs));
690ok($objJa->eq("\x{3075}\x{309E}", "\x{3075}\x{309D}".$vs));
691ok($objJa->eq("\x{30D6}\x{30FD}", "\x{30D5}\x{3099}\x{30FD}"));
692ok($objJa->eq("\x{30D6}\x{30FD}", "\x{FF8C}\x{FF9E}\x{30FD}"));
693ok($objJa->eq("\x{3076}\x{309D}", "\x{3075}\x{3099}\x{309D}"));
694ok($objJa->eq("\x{30D6}\x{30FE}", "\x{30D6}\x{30FD}".$vs));
695ok($objJa->eq("\x{30D5}\x{3099}\x{30FE}", "\x{30D5}\x{3099}\x{30FD}".$vs));
696ok($objJa->eq("\x{FF8C}\x{FF9E}\x{30FE}", "\x{FF8C}\x{FF9E}\x{30FD}".$vs));
697ok($objJa->eq("\x{3076}\x{309E}", "\x{3076}\x{309D}".$vs));
698ok($objJa->eq("\x{3075}\x{3099}\x{309E}", "\x{3075}\x{3099}\x{309D}".$vs));
699ok($objJa->eq("\x{30D7}\x{30FD}", "\x{30D5}\x{309A}\x{30FD}"));
700ok($objJa->eq("\x{30D7}\x{30FD}", "\x{FF8C}\x{FF9F}\x{30FD}"));
701ok($objJa->eq("\x{3077}\x{309D}", "\x{3075}\x{309A}\x{309D}"));
702ok($objJa->eq("\x{30D7}\x{30FE}", "\x{30D7}\x{30FD}".$vs));
703ok($objJa->eq("\x{30D5}\x{309A}\x{30FE}", "\x{30D5}\x{309A}\x{30FD}".$vs));
704ok($objJa->eq("\x{FF8C}\x{FF9F}\x{30FE}", "\x{FF8C}\x{FF9F}\x{30FD}".$vs));
705ok($objJa->eq("\x{3077}\x{309E}", "\x{3077}\x{309D}".$vs));
706ok($objJa->eq("\x{3075}\x{309A}\x{309E}", "\x{3075}\x{309A}\x{309D}".$vs));
707ok($objJa->eq("\x{30D8}\x{30FD}", "\x{FF8D}\x{30FD}"));
708ok($objJa->eq("\x{30D8}\x{30FE}", "\x{30D8}\x{30FD}".$vs));
709ok($objJa->eq("\x{FF8D}\x{30FE}", "\x{FF8D}\x{30FD}".$vs));
710ok($objJa->eq("\x{3078}\x{309E}", "\x{3078}\x{309D}".$vs));
711ok($objJa->eq("\x{30D9}\x{30FD}", "\x{30D8}\x{3099}\x{30FD}"));
712ok($objJa->eq("\x{30D9}\x{30FD}", "\x{FF8D}\x{FF9E}\x{30FD}"));
713ok($objJa->eq("\x{3079}\x{309D}", "\x{3078}\x{3099}\x{309D}"));
714ok($objJa->eq("\x{30D9}\x{30FE}", "\x{30D9}\x{30FD}".$vs));
715ok($objJa->eq("\x{30D8}\x{3099}\x{30FE}", "\x{30D8}\x{3099}\x{30FD}".$vs));
716ok($objJa->eq("\x{FF8D}\x{FF9E}\x{30FE}", "\x{FF8D}\x{FF9E}\x{30FD}".$vs));
717ok($objJa->eq("\x{3079}\x{309E}", "\x{3079}\x{309D}".$vs));
718ok($objJa->eq("\x{3078}\x{3099}\x{309E}", "\x{3078}\x{3099}\x{309D}".$vs));
719ok($objJa->eq("\x{30DA}\x{30FD}", "\x{30D8}\x{309A}\x{30FD}"));
720ok($objJa->eq("\x{30DA}\x{30FD}", "\x{FF8D}\x{FF9F}\x{30FD}"));
721ok($objJa->eq("\x{307A}\x{309D}", "\x{3078}\x{309A}\x{309D}"));
722ok($objJa->eq("\x{30DA}\x{30FE}", "\x{30DA}\x{30FD}".$vs));
723ok($objJa->eq("\x{30D8}\x{309A}\x{30FE}", "\x{30D8}\x{309A}\x{30FD}".$vs));
724ok($objJa->eq("\x{FF8D}\x{FF9F}\x{30FE}", "\x{FF8D}\x{FF9F}\x{30FD}".$vs));
725ok($objJa->eq("\x{307A}\x{309E}", "\x{307A}\x{309D}".$vs));
726ok($objJa->eq("\x{3078}\x{309A}\x{309E}", "\x{3078}\x{309A}\x{309D}".$vs));
727ok($objJa->eq("\x{30DB}\x{30FD}", "\x{FF8E}\x{30FD}"));
728ok($objJa->eq("\x{30DB}\x{30FE}", "\x{30DB}\x{30FD}".$vs));
729ok($objJa->eq("\x{FF8E}\x{30FE}", "\x{FF8E}\x{30FD}".$vs));
730ok($objJa->eq("\x{307B}\x{309E}", "\x{307B}\x{309D}".$vs));
731ok($objJa->eq("\x{30DC}\x{30FD}", "\x{30DB}\x{3099}\x{30FD}"));
732ok($objJa->eq("\x{30DC}\x{30FD}", "\x{FF8E}\x{FF9E}\x{30FD}"));
733ok($objJa->eq("\x{307C}\x{309D}", "\x{307B}\x{3099}\x{309D}"));
734ok($objJa->eq("\x{30DC}\x{30FE}", "\x{30DC}\x{30FD}".$vs));
735ok($objJa->eq("\x{30DB}\x{3099}\x{30FE}", "\x{30DB}\x{3099}\x{30FD}".$vs));
736ok($objJa->eq("\x{FF8E}\x{FF9E}\x{30FE}", "\x{FF8E}\x{FF9E}\x{30FD}".$vs));
737ok($objJa->eq("\x{307C}\x{309E}", "\x{307C}\x{309D}".$vs));
738ok($objJa->eq("\x{307B}\x{3099}\x{309E}", "\x{307B}\x{3099}\x{309D}".$vs));
739ok($objJa->eq("\x{30DD}\x{30FD}", "\x{30DB}\x{309A}\x{30FD}"));
740ok($objJa->eq("\x{30DD}\x{30FD}", "\x{FF8E}\x{FF9F}\x{30FD}"));
741ok($objJa->eq("\x{307D}\x{309D}", "\x{307B}\x{309A}\x{309D}"));
742ok($objJa->eq("\x{30DD}\x{30FE}", "\x{30DD}\x{30FD}".$vs));
743ok($objJa->eq("\x{30DB}\x{309A}\x{30FE}", "\x{30DB}\x{309A}\x{30FD}".$vs));
744ok($objJa->eq("\x{FF8E}\x{FF9F}\x{30FE}", "\x{FF8E}\x{FF9F}\x{30FD}".$vs));
745ok($objJa->eq("\x{307D}\x{309E}", "\x{307D}\x{309D}".$vs));
746ok($objJa->eq("\x{307B}\x{309A}\x{309E}", "\x{307B}\x{309A}\x{309D}".$vs));
747ok($objJa->eq("\x{30DE}\x{30FD}", "\x{FF8F}\x{30FD}"));
748ok($objJa->eq("\x{30DF}\x{30FD}", "\x{FF90}\x{30FD}"));
749ok($objJa->eq("\x{30E0}\x{30FD}", "\x{FF91}\x{30FD}"));
750ok($objJa->eq("\x{30E1}\x{30FD}", "\x{FF92}\x{30FD}"));
751ok($objJa->eq("\x{30E2}\x{30FD}", "\x{FF93}\x{30FD}"));
752ok($objJa->eq("\x{30E3}\x{30FD}", "\x{FF6C}\x{30FD}"));
753ok($objJa->eq("\x{30E4}\x{30FD}", "\x{FF94}\x{30FD}"));
754ok($objJa->eq("\x{30E5}\x{30FD}", "\x{FF6D}\x{30FD}"));
755ok($objJa->eq("\x{30E6}\x{30FD}", "\x{FF95}\x{30FD}"));
756ok($objJa->eq("\x{30E7}\x{30FD}", "\x{FF6E}\x{30FD}"));
757ok($objJa->eq("\x{30E8}\x{30FD}", "\x{FF96}\x{30FD}"));
758ok($objJa->eq("\x{30E9}\x{30FD}", "\x{FF97}\x{30FD}"));
759ok($objJa->eq("\x{30EA}\x{30FD}", "\x{FF98}\x{30FD}"));
760ok($objJa->eq("\x{30EB}\x{30FD}", "\x{FF99}\x{30FD}"));
761ok($objJa->eq("\x{30EC}\x{30FD}", "\x{FF9A}\x{30FD}"));
762ok($objJa->eq("\x{30ED}\x{30FD}", "\x{FF9B}\x{30FD}"));
763ok($objJa->eq("\x{30EE}\x{30FE}", "\x{30EE}\x{30FD}".$vs));
764ok($objJa->eq("\x{308E}\x{309E}", "\x{308E}\x{309D}".$vs));
765ok($objJa->eq("\x{30EF}\x{30FD}", "\x{FF9C}\x{30FD}"));
766ok($objJa->eq("\x{30EF}\x{30FE}", "\x{30EF}\x{30FD}".$vs));
767ok($objJa->eq("\x{FF9C}\x{30FE}", "\x{FF9C}\x{30FD}".$vs));
768ok($objJa->eq("\x{308F}\x{309E}", "\x{308F}\x{309D}".$vs));
769ok($objJa->eq("\x{30F0}\x{30FE}", "\x{30F0}\x{30FD}".$vs));
770ok($objJa->eq("\x{3090}\x{309E}", "\x{3090}\x{309D}".$vs));
771ok($objJa->eq("\x{30F1}\x{30FE}", "\x{30F1}\x{30FD}".$vs));
772ok($objJa->eq("\x{3091}\x{309E}", "\x{3091}\x{309D}".$vs));
773ok($objJa->eq("\x{30F2}\x{30FD}", "\x{FF66}\x{30FD}"));
774ok($objJa->eq("\x{30F2}\x{30FE}", "\x{30F2}\x{30FD}".$vs));
775ok($objJa->eq("\x{FF66}\x{30FE}", "\x{FF66}\x{30FD}".$vs));
776ok($objJa->eq("\x{3092}\x{309E}", "\x{3092}\x{309D}".$vs));
777ok($objJa->eq("\x{30F3}\x{30FD}", "\x{FF9D}\x{30FD}"));
778ok($objJa->eq("\x{30F4}\x{30FD}", "\x{30A6}\x{3099}\x{30FD}"));
779ok($objJa->eq("\x{30F4}\x{30FD}", "\x{FF73}\x{FF9E}\x{30FD}"));
780ok($objJa->eq("\x{3094}\x{309D}", "\x{3046}\x{3099}\x{309D}"));
781ok($objJa->eq("\x{30F4}\x{30FE}", "\x{30F4}\x{30FD}".$vs));
782ok($objJa->eq("\x{30A6}\x{3099}\x{30FE}", "\x{30A6}\x{3099}\x{30FD}".$vs));
783ok($objJa->eq("\x{FF73}\x{FF9E}\x{30FE}", "\x{FF73}\x{FF9E}\x{30FD}".$vs));
784ok($objJa->eq("\x{3094}\x{309E}", "\x{3094}\x{309D}".$vs));
785ok($objJa->eq("\x{3046}\x{3099}\x{309E}", "\x{3046}\x{3099}\x{309D}".$vs));
786ok($objJa->eq("\x{30F5}\x{30FE}", "\x{30F5}\x{30FD}".$vs));
787ok($objJa->eq("\x{3095}\x{309E}", "\x{3095}\x{309D}".$vs));
788ok($objJa->eq("\x{30F6}\x{30FE}", "\x{30F6}\x{30FD}".$vs));
789ok($objJa->eq("\x{3096}\x{309E}", "\x{3096}\x{309D}".$vs));
790ok($objJa->eq("\x{30F7}\x{30FD}", "\x{30EF}\x{3099}\x{30FD}"));
791ok($objJa->eq("\x{30F7}\x{30FD}", "\x{FF9C}\x{FF9E}\x{30FD}"));
792ok($objJa->eq("\x{30F7}\x{30FE}", "\x{30F7}\x{30FD}".$vs));
793ok($objJa->eq("\x{30EF}\x{3099}\x{30FE}", "\x{30EF}\x{3099}\x{30FD}".$vs));
794ok($objJa->eq("\x{FF9C}\x{FF9E}\x{30FE}", "\x{FF9C}\x{FF9E}\x{30FD}".$vs));
795ok($objJa->eq("\x{30F8}\x{30FD}", "\x{30F0}\x{3099}\x{30FD}"));
796ok($objJa->eq("\x{30F8}\x{30FE}", "\x{30F8}\x{30FD}".$vs));
797ok($objJa->eq("\x{30F0}\x{3099}\x{30FE}", "\x{30F0}\x{3099}\x{30FD}".$vs));
798ok($objJa->eq("\x{30F9}\x{30FD}", "\x{30F1}\x{3099}\x{30FD}"));
799ok($objJa->eq("\x{30F9}\x{30FE}", "\x{30F9}\x{30FD}".$vs));
800ok($objJa->eq("\x{30F1}\x{3099}\x{30FE}", "\x{30F1}\x{3099}\x{30FD}".$vs));
801ok($objJa->eq("\x{30FA}\x{30FD}", "\x{30F2}\x{3099}\x{30FD}"));
802ok($objJa->eq("\x{30FA}\x{30FD}", "\x{FF66}\x{FF9E}\x{30FD}"));
803ok($objJa->eq("\x{30FA}\x{30FE}", "\x{30FA}\x{30FD}".$vs));
804ok($objJa->eq("\x{30F2}\x{3099}\x{30FE}", "\x{30F2}\x{3099}\x{30FD}".$vs));
805ok($objJa->eq("\x{FF66}\x{FF9E}\x{30FE}", "\x{FF66}\x{FF9E}\x{30FD}".$vs));
806ok($objJa->eq("\x{31F0}\x{30FE}", "\x{31F0}\x{30FD}".$vs));
807ok($objJa->eq("\x{31F1}\x{30FE}", "\x{31F1}\x{30FD}".$vs));
808ok($objJa->eq("\x{31F2}\x{30FE}", "\x{31F2}\x{30FD}".$vs));
809ok($objJa->eq("\x{31F3}\x{30FE}", "\x{31F3}\x{30FD}".$vs));
810ok($objJa->eq("\x{31F5}\x{30FE}", "\x{31F5}\x{30FD}".$vs));
811ok($objJa->eq("\x{31F6}\x{30FE}", "\x{31F6}\x{30FD}".$vs));
812ok($objJa->eq("\x{31F7}\x{30FE}", "\x{31F7}\x{30FD}".$vs));
813ok($objJa->eq("\x{31F8}\x{30FE}", "\x{31F8}\x{30FD}".$vs));
814ok($objJa->eq("\x{31F9}\x{30FE}", "\x{31F9}\x{30FD}".$vs));
815
816# 759
817