### ----------------------------------------------------
### -- Number::More
### -- Licenses: Artistic-2.0
### -- Authors: Tom Browder <tbrowder@acm.org>
### -- File: t/6-auto-transform-checks.t
### ----------------------------------------------------
### -- Chunk 2 of 3
base("110000000100101", 2, 30, :$suffix), "RAD_base-30", "base 30; test 198";
is rebase("60045", 8, 30, :$suffix), "RAD_base-30", "base 30; test 199";
is rebase("6025", 16, 30, :$suffix), "RAD_base-30", "base 30; test 200";

is rebase(27355, 10, 31), "SED", "base 31; test 201";
is rebase("110101011011011", 2, 31), "SED", "base 31; test 202";
is rebase("65333", 8, 31), "SED", "base 31; test 203";
is rebase("6ADB", 16, 31), "SED", "base 31; test 204";

# add the suffix
is rebase(27355, 10, 31, :$suffix), "SED_base-31", "base 31; test 205";
is rebase("110101011011011", 2, 31, :$suffix), "SED_base-31", "base 31; test 206";
is rebase("65333", 8, 31, :$suffix), "SED_base-31", "base 31; test 207";
is rebase("6ADB", 16, 31, :$suffix), "SED_base-31", "base 31; test 208";

is rebase(30027, 10, 32), "TAB", "base 32; test 209";
is rebase("111010101001011", 2, 32), "TAB", "base 32; test 210";
is rebase("72513", 8, 32), "TAB", "base 32; test 211";
is rebase("754B", 16, 32), "TAB", "base 32; test 212";

# add the suffix
is rebase(30027, 10, 32, :$suffix), "TAB_base-32", "base 32; test 213";
is rebase("111010101001011", 2, 32, :$suffix), "TAB_base-32", "base 32; test 214";
is rebase("72513", 8, 32, :$suffix), "TAB_base-32", "base 32; test 215";
is rebase("754B", 16, 32, :$suffix), "TAB_base-32", "base 32; test 216";

is rebase(33011, 10, 33), "UAB", "base 33; test 217";
is rebase("1000000011110011", 2, 33), "UAB", "base 33; test 218";
is rebase("100363", 8, 33), "UAB", "base 33; test 219";
is rebase("80F3", 16, 33), "UAB", "base 33; test 220";

# add the suffix
is rebase(33011, 10, 33, :$suffix), "UAB_base-33", "base 33; test 221";
is rebase("1000000011110011", 2, 33, :$suffix), "UAB_base-33", "base 33; test 222";
is rebase("100363", 8, 33, :$suffix), "UAB_base-33", "base 33; test 223";
is rebase("80F3", 16, 33, :$suffix), "UAB_base-33", "base 33; test 224";

is rebase(37837, 10, 34), "WOT", "base 34; test 225";
is rebase("1001001111001101", 2, 34), "WOT", "base 34; test 226";
is rebase("111715", 8, 34), "WOT", "base 34; test 227";
is rebase("93CD", 16, 34), "WOT", "base 34; test 228";

# add the suffix
is rebase(37837, 10, 34, :$suffix), "WOT_base-34", "base 34; test 229";
is rebase("1001001111001101", 2, 34, :$suffix), "WOT_base-34", "base 34; test 230";
is rebase("111715", 8, 34, :$suffix), "WOT_base-34", "base 34; test 231";
is rebase("93CD", 16, 34, :$suffix), "WOT_base-34", "base 34; test 232";

is rebase(42520, 10, 35), "YOU", "base 35; test 233";
is rebase("1010011000011000", 2, 35), "YOU", "base 35; test 234";
is rebase("123030", 8, 35), "YOU", "base 35; test 235";
is rebase("A618", 16, 35), "YOU", "base 35; test 236";

# add the suffix
is rebase(42520, 10, 35, :$suffix), "YOU_base-35", "base 35; test 237";
is rebase("1010011000011000", 2, 35, :$suffix), "YOU_base-35", "base 35; test 238";
is rebase("123030", 8, 35, :$suffix), "YOU_base-35", "base 35; test 239";
is rebase("A618", 16, 35, :$suffix), "YOU_base-35", "base 35; test 240";

is rebase(44027, 10, 36), "XYZ", "base 36; test 241";
is rebase("1010101111111011", 2, 36), "XYZ", "base 36; test 242";
is rebase("125773", 8, 36), "XYZ", "base 36; test 243";
is rebase("ABFB", 16, 36), "XYZ", "base 36; test 244";

# add the suffix
is rebase(44027, 10, 36, :$suffix), "XYZ_base-36", "base 36; test 245";
is rebase("1010101111111011", 2, 36, :$suffix), "XYZ_base-36", "base 36; test 246";
is rebase("125773", 8, 36, :$suffix), "XYZ_base-36", "base 36; test 247";
is rebase("ABFB", 16, 36, :$suffix), "XYZ_base-36", "base 36; test 248";

is rebase(49258, 10, 37), "ZaB", "base 37; test 249";
is rebase("1100000001101010", 2, 37), "ZaB", "base 37; test 250";
is rebase("140152", 8, 37), "ZaB", "base 37; test 251";
is rebase("C06A", 16, 37), "ZaB", "base 37; test 252";

# add the suffix
is rebase(49258, 10, 37, :$suffix), "ZaB_base-37", "base 37; test 253";
is rebase("1100000001101010", 2, 37, :$suffix), "ZaB_base-37", "base 37; test 254";
is rebase("140152", 8, 37, :$suffix), "ZaB_base-37", "base 37; test 255";
is rebase("C06A", 16, 37, :$suffix), "ZaB_base-37", "base 37; test 256";

is rebase(23065, 10, 38), "Fab", "base 38; test 257";
is rebase("101101000011001", 2, 38), "Fab", "base 38; test 258";
is rebase("55031", 8, 38), "Fab", "base 38; test 259";
is rebase("5A19", 16, 38), "Fab", "base 38; test 260";

# add the suffix
is rebase(23065, 10, 38, :$suffix), "Fab_base-38", "base 38; test 261";
is rebase("101101000011001", 2, 38, :$suffix), "Fab_base-38", "base 38; test 262";
is rebase("55031", 8, 38, :$suffix), "Fab_base-38", "base 38; test 263";
is rebase("5A19", 16, 38, :$suffix), "Fab_base-38", "base 38; test 264";

is rebase(58217, 10, 39), "cAT", "base 39; test 265";
is rebase("1110001101101001", 2, 39), "cAT", "base 39; test 266";
is rebase("161551", 8, 39), "cAT", "base 39; test 267";
is rebase("E369", 16, 39), "cAT", "base 39; test 268";

# add the suffix
is rebase(58217, 10, 39, :$suffix), "cAT_base-39", "base 39; test 269";
is rebase("1110001101101001", 2, 39, :$suffix), "cAT_base-39", "base 39; test 270";
is rebase("161551", 8, 39, :$suffix), "cAT_base-39", "base 39; test 271";
is rebase("E369", 16, 39, :$suffix), "cAT_base-39", "base 39; test 272";

is rebase(63377, 10, 40), "dOH", "base 40; test 273";
is rebase("1111011110010001", 2, 40), "dOH", "base 40; test 274";
is rebase("173621", 8, 40), "dOH", "base 40; test 275";
is rebase("F791", 16, 40), "dOH", "base 40; test 276";

# add the suffix
is rebase(63377, 10, 40, :$suffix), "dOH_base-40", "base 40; test 277";
is rebase("1111011110010001", 2, 40, :$suffix), "dOH_base-40", "base 40; test 278";
is rebase("173621", 8, 40, :$suffix), "dOH_base-40", "base 40; test 279";
is rebase("F791", 16, 40, :$suffix), "dOH_base-40", "base 40; test 280";

is rebase(58823, 10, 41), "YeT", "base 41; test 281";
is rebase("1110010111000111", 2, 41), "YeT", "base 41; test 282";
is rebase("162707", 8, 41), "YeT", "base 41; test 283";
is rebase("E5C7", 16, 41), "YeT", "base 41; test 284";

# add the suffix
is rebase(58823, 10, 41, :$suffix), "YeT_base-41", "base 41; test 285";
is rebase("1110010111000111", 2, 41, :$suffix), "YeT_base-41", "base 41; test 286";
is rebase("162707", 8, 41, :$suffix), "YeT_base-41", "base 41; test 287";
is rebase("E5C7", 16, 41, :$suffix), "YeT_base-41", "base 41; test 288";

is rebase(48257, 10, 42), "REf", "base 42; test 289";
is rebase("1011110010000001", 2, 42), "REf", "base 42; test 290";
is rebase("136201", 8, 42), "REf", "base 42; test 291";
is rebase("BC81", 16, 42), "REf", "base 42; test 292";

# add the suffix
is rebase(48257, 10, 42, :$suffix), "REf_base-42", "base 42; test 293";
is rebase("1011110010000001", 2, 42, :$suffix), "REf_base-42", "base 42; test 294";
is rebase("136201", 8, 42, :$suffix), "REf_base-42", "base 42; test 295";
is rebase("BC81", 16, 42, :$suffix), "REf_base-42", "base 42; test 296";

is rebase(27708, 10, 43), "EgG", "base 43; test 297";
is rebase("110110000111100", 2, 43), "EgG", "base 43; test 298";
is rebase("66074", 8, 43), "EgG", "base 43; test 299";
is rebase("6C3C", 16, 43), "EgG", "base 43; test 300";

# add the suffix
is rebase(27708, 10, 43, :$suffix), "EgG_base-43", "base 43; test 301";
is rebase("110110000111100", 2, 43, :$suffix), "EgG_base-43", "base 43; test 302";
is rebase("66074", 8, 43, :$suffix), "EgG_base-43", "base 43; test 303";
is rebase("6C3C", 16, 43, :$suffix), "EgG_base-43", "base 43; test 304";

is rebase(71616, 10, 44), "ahS", "base 44; test 305";
is rebase("10001011111000000", 2, 44), "ahS", "base 44; test 306";
is rebase("213700", 8, 44), "ahS", "base 44; test 307";
is rebase("117C0", 16, 44), "ahS", "base 44; test 308";

# add the suffix
is rebase(71616, 10, 44, :$suffix), "ahS_base-44", "base 44; test 309";
is rebase("10001011111000000", 2, 44, :$suffix), "ahS_base-44", "base 44; test 310";
is rebase("213700", 8, 44, :$suffix), "ahS_base-44", "base 44; test 311";
is rebase("117C0", 16, 44, :$suffix), "ahS_base-44", "base 44; test 312";

is rebase(89654, 10, 45), "iCE", "base 45; test 313";
is rebase("10101111000110110", 2, 45), "iCE", "base 45; test 314";
is rebase("257066", 8, 45), "iCE", "base 45; test 315";
is rebase("15E36", 16, 45), "iCE", "base 45; test 316";

# add the suffix
is rebase(89654, 10, 45, :$suffix), "iCE_base-45", "base 45; test 317";
is rebase("10101111000110110", 2, 45, :$suffix), "iCE_base-45", "base 45; test 318";
is rebase("257066", 8, 45, :$suffix), "iCE_base-45", "base 45; test 319";
is rebase("15E36", 16, 45, :$suffix), "iCE_base-45", "base 45; test 320";

is rebase(57637, 10, 46), "RAj", "base 46; test 321";
is rebase("1110000100100101", 2, 46), "RAj", "base 46; test 322";
is rebase("160445", 8, 46), "RAj", "base 46; test 323";
is rebase("E125", 16, 46), "RAj", "base 46; test 324";

# add the suffix
is rebase(57637, 10, 46, :$suffix), "RAj_base-46", "base 46; test 325";
is rebase("1110000100100101", 2, 46, :$suffix), "RAj_base-46", "base 46; test 326";
is rebase("160445", 8, 46, :$suffix), "RAj_base-46", "base 46; test 327";
is rebase("E125", 16, 46, :$suffix), "RAj_base-46", "base 46; test 328";

is rebase(40231, 10, 47), "I9k", "base 47; test 329";
is rebase("1001110100100111", 2, 47), "I9k", "base 47; test 330";
is rebase("116447", 8, 47), "I9k", "base 47; test 331";
is rebase("9D27", 16, 47), "I9k", "base 47; test 332";

# add the suffix
is rebase(40231, 10, 47, :$suffix), "I9k_base-47", "base 47; test 333";
is rebase("1001110100100111", 2, 47, :$suffix), "I9k_base-47", "base 47; test 334";
is rebase("116447", 8, 47, :$suffix), "I9k_base-47", "base 47; test 335";
is rebase("9D27", 16, 47, :$suffix), "I9k_base-47", "base 47; test 336";

is rebase(25314, 10, 48), "AlI", "base 48; test 337";
is rebase("110001011100010", 2, 48), "AlI", "base 48; test 338";
is rebase("61342", 8, 48), "AlI", "base 48; test 339";
is rebase("62E2", 16, 48), "AlI", "base 48; test 340";

# add the suffix
is rebase(25314, 10, 48, :$suffix), "AlI_base-48", "base 48; test 341";
is rebase("110001011100010", 2, 48, :$suffix), "AlI_base-48", "base 48; test 342";
is rebase("61342", 8, 48, :$suffix), "AlI_base-48", "base 48; test 343";
is rebase("62E2", 16, 48, :$suffix), "AlI_base-48", "base 48; test 344";

is rebase(115248, 10, 49), "m00", "base 49; test 345";
is rebase("11100001000110000", 2, 49), "m00", "base 49; test 346";
is rebase("341060", 8, 49), "m00", "base 49; test 347";
is rebase("1C230", 16, 49), "m00", "base 49; test 348";

# add the suffix
is rebase(115248, 10, 49, :$suffix), "m00_base-49", "base 49; test 349";
is rebase("11100001000110000", 2, 49, :$suffix), "m00_base-49", "base 49; test 350";
is rebase("341060", 8, 49, :$suffix), "m00_base-49", "base 49; test 351";
is rebase("1C230", 16, 49, :$suffix), "m00_base-49", "base 49; test 352";

is rebase(2649, 10, 50), "12n", "base 50; test 353";
is rebase("101001011001", 2, 50), "12n", "base 50; test 354";
is rebase("5131", 8, 50), "12n", "base 50; test 355";
is rebase("A59", 16, 50), "12n", "base 50; test 356";

# add the suffix
is rebase(2649, 10, 50, :$suffix), "12n_base-50", "base 50; test 357";
is rebase("101001011001", 2, 50, :$suffix), "12n_base-50", "base 50; test 358";
is rebase("5131", 8, 50, :$suffix), "12n_base-50", "base 50; test 359";
is rebase("A59", 16, 50, :$suffix), "12n_base-50", "base 50; test 360";

is rebase(130589, 10, 51), "oAT", "base 51; test 361";
is rebase("11111111000011101", 2, 51), "oAT", "base 51; test 362";
is rebase("377035", 8, 51), "oAT", "base 51; test 363";
is rebase("1FE1D", 16, 51), "oAT", "base 51; test 364";

# add the suffix
is rebase(130589, 10, 51, :$suffix), "oAT_base-51", "base 51; test 365";
is rebase("11111111000011101", 2, 51, :$suffix), "oAT_base-51", "base 51; test 366";
is rebase("377035", 8, 51, :$suffix), "oAT_base-51", "base 51; test 367";
is rebase("1FE1D", 16, 51, :$suffix), "oAT_base-51", "base 51; test 368";

is rebase(29706, 10, 52), "ApE", "base 52; test 369";
is rebase("111010000001010", 2, 52), "ApE", "base 52; test 370";
is rebase("72012", 8, 52), "ApE", "base 52; test 371";
is rebase("740A", 16, 52), "ApE", "base 52; test 372";

# add the suffix
is rebase(29706, 10, 52, :$suffix), "ApE_base-52", "base 52; test 373";
is rebase("111010000001010", 2, 52, :$suffix), "ApE_base-52", "base 52; test 374";
is rebase("72012", 8, 52, :$suffix), "ApE_base-52", "base 52; test 375";
is rebase("740A", 16, 52, :$suffix), "ApE_base-52", "base 52; test 376";

is rebase(6041, 10, 53), "27q", "base 53; test 377";
is rebase("1011110011001", 2, 53), "27q", "base 53; test 378";
is rebase("13631", 8, 53), "27q", "base 53; test 379";
is rebase("1799", 16, 53), "27q", "base 53; test 380";

# add the suffix
is rebase(6041, 10, 53, :$suffix), "27q_base-53", "base 53; test 381";
is rebase("1011110011001", 2, 53, :$suffix), "27q_base-53", "base 53; test 382";
is rebase("13631", 8, 53, :$suffix), "27q_base-53", "base 53; test 383";
is rebase("1799", 16, 53, :$suffix), "27q_base-53", "base 53; test 384";

is rebase(72880, 10, 54), "OrY", "base 54; test 385";
is rebase("10001110010110000", 2, 54), "OrY", "base 54; test 386";
is rebase("216260", 8, 54), "OrY", "base 54; test 387";
is rebase("11CB0", 16, 54), "OrY", "base 54; test 388";

# add the suffix
is rebase(72880, 10, 54, :$suffix), "OrY_base-54", "base 54; test 389";
is rebase("10001110010110000", 2, 54, :$suffix), "OrY_base-54", "base 54; test 390";
is rebase("216260", 8, 54, :$suffix), "OrY_base-54", "base 54; test 391";
is rebase("11CB0", 16, 54, :$suffix), "OrY_base-54", "base 54; test 392";

is rebase(43944, 10, 55), "ESs", "base 55; test 393";
is rebase("1010101110101000", 2, 55), "ESs", "base 55; test 394";
is rebase("125650", 8, 55), "ESs", "base 55; test 395";
is rebase("ABA8", 16, 55), "ESs", "base 55; test 396";

# add the suffix
is rebase(43944, 10, 55, :$suffix), "ESs_base-55", "base 55; test 39