/*

 * Copyright (c) 2003, 2019, Oracle and/or its affiliates. All rights reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.  Oracle designates this

 * particular file as subject to the "Classpath" exception as provided

 * by Oracle in the LICENSE file that accompanied this code.

 *

 * This code is distributed in the hope that it will be useful, but WITHOUT

 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

package java.lang;

/** The CharacterData class encapsulates the large tables once found in

 *  java.lang.Character. 

 */

class CharacterData01 extends CharacterData {

    /* The character properties are currently encoded into 32 bits in the following manner:

        1 bit   mirrored property

        4 bits  directionality property

        9 bits  signed offset used for converting case

        1 bit   if 1, adding the signed offset converts the character to lowercase

        1 bit   if 1, subtracting the signed offset converts the character to uppercase

        1 bit   if 1, this character has a titlecase equivalent (possibly itself)

        3 bits  0  may not be part of an identifier

                1  ignorable control; may continue a Unicode identifier or Java identifier

                2  may continue a Java identifier but not a Unicode identifier (unused)

                3  may continue a Unicode identifier or Java identifier

                4  is a Java whitespace character

                5  may start or continue a Java identifier;

                   may continue but not start a Unicode identifier (underscores)

                6  may start or continue a Java identifier but not a Unicode identifier ($)

                7  may start or continue a Unicode identifier or Java identifier

                Thus:

                   5, 6, 7 may start a Java identifier

                   1, 2, 3, 5, 6, 7 may continue a Java identifier

                   7 may start a Unicode identifier

                   1, 3, 5, 7 may continue a Unicode identifier

                   1 is ignorable within an identifier

                   4 is Java whitespace

        2 bits  0  this character has no numeric property

                1  adding the digit offset to the character code and then

                   masking with 0x1F will produce the desired numeric value

                2  this character has a "strange" numeric value

                3  a Java supradecimal digit: adding the digit offset to the

                   character code, then masking with 0x1F, then adding 10

                   will produce the desired numeric value

        5 bits  digit offset

        5 bits  character type

        The encoding of character properties is subject to change at any time.

     */

    int getProperties(int ch) {

        char offset = (char)ch;

        int props = $$Lookup(offset);

        return props;

    }

    int getPropertiesEx(int ch) {

        char offset = (char)ch;

        int props = $$LookupEx(offset);

        return props;

    }

    int getType(int ch) {

        int props = getProperties(ch);

        return (props & $$maskType);

    }

    boolean isOtherLowercase(int ch) {

        int props = getPropertiesEx(ch);

        return (props & $$maskOtherLowercase) != 0;

    }

    boolean isOtherUppercase(int ch) {

        int props = getPropertiesEx(ch);

        return (props & $$maskOtherUppercase) != 0;

    }

    boolean isOtherAlphabetic(int ch) {

        int props = getPropertiesEx(ch);

        return (props & $$maskOtherAlphabetic) != 0;

    }

    boolean isIdeographic(int ch) {

        int props = getPropertiesEx(ch);

        return (props & $$maskIdeographic) != 0;

    }

    boolean isJavaIdentifierStart(int ch) {

        int props = getProperties(ch);

        return ((props & $$maskIdentifierInfo) >= $$lowJavaStart);

    }

    boolean isJavaIdentifierPart(int ch) {

        int props = getProperties(ch);

        return ((props & $$nonzeroJavaPart) != 0);

    }

    boolean isUnicodeIdentifierStart(int ch) {

        return (getPropertiesEx(ch) & $$maskIDStart) != 0 ||

               ch == 0x2E2F;

    }

    boolean isUnicodeIdentifierPart(int ch) {

        return (getPropertiesEx(ch) & $$maskIDContinue) != 0 ||

               isIdentifierIgnorable(ch) ||

               ch == 0x2E2F;

    }

    boolean isIdentifierIgnorable(int ch) {

        int props = getProperties(ch);

        return ((props & $$maskIdentifierInfo) == $$valueIgnorable);

    }

    int toLowerCase(int ch) {

        int mapChar = ch;

        int val = getProperties(ch);

        if ((val & $$maskLowerCase) != 0) {

            int offset = val << $$shiftCaseOffsetSign >> ($$shiftCaseOffsetSign+$$shiftCaseOffset);

            mapChar = ch + offset;

        }

        return  mapChar;

    }

    int toUpperCase(int ch) {

        int mapChar = ch;

        int val = getProperties(ch);

        if ((val & $$maskUpperCase) != 0) {

            int offset = val  << $$shiftCaseOffsetSign >> ($$shiftCaseOffsetSign+$$shiftCaseOffset);

            mapChar =  ch - offset;

        }

        return  mapChar;

    }

    int toTitleCase(int ch) {

        int mapChar = ch;

        int val = getProperties(ch);

        if ((val & $$maskTitleCase) != 0) {

            // There is a titlecase equivalent.  Perform further checks:

            if ((val & $$maskUpperCase) == 0) {

                // The character does not have an uppercase equivalent, so it must

                // already be uppercase; so add 1 to get the titlecase form.

                mapChar = ch + 1;

            }

            else if ((val & $$maskLowerCase) == 0) {

                // The character does not have a lowercase equivalent, so it must

                // already be lowercase; so subtract 1 to get the titlecase form.

                mapChar = ch - 1;

            }

            // else {

            // The character has both an uppercase equivalent and a lowercase

            // equivalent, so it must itself be a titlecase form; return it.

            // return ch;

            //}

        }

        else if ((val & $$maskUpperCase) != 0) {

            // This character has no titlecase equivalent but it does have an

            // uppercase equivalent, so use that (subtract the signed case offset).

            mapChar = toUpperCase(ch);

        }

        return  mapChar;

    }

    int digit(int ch, int radix) {

        int value = -1;

        if (radix >= Character.MIN_RADIX && radix <= Character.MAX_RADIX) {

            int val = getProperties(ch);

            int kind = val & $$maskType;

            if (kind == Character.DECIMAL_DIGIT_NUMBER) {

                value = ch + ((val & $$maskDigitOffset) >> $$shiftDigitOffset) & $$maskDigit;

            }

            else if ((val & $$maskNumericType) == $$valueJavaSupradecimal) {

                // Java supradecimal digit

                value = (ch + ((val & $$maskDigitOffset) >> $$shiftDigitOffset) & $$maskDigit) + 10;

            }

        }

        return (value < radix) ? value : -1;

    }

    int getNumericValue(int ch) {

        int val = getProperties(ch);

        int retval = -1;

        switch (val & $$maskNumericType) {

        default: // cannot occur

        case ($$valueNotNumeric):         // not numeric

            retval = -1;

            break;

        case ($$valueDigit):              // simple numeric

            retval = ch + ((val & $$maskDigitOffset) >> $$shiftDigitOffset) & $$maskDigit;

            break;

        case ($$valueStrangeNumeric)      :       // "strange" numeric

            switch(ch) {

            case 0x10113: retval = 40; break;      // AEGEAN NUMBER FORTY

            case 0x10114: retval = 50; break;      // AEGEAN NUMBER FIFTY

            case 0x10115: retval = 60; break;      // AEGEAN NUMBER SIXTY

            case 0x10116: retval = 70; break;      // AEGEAN NUMBER SEVENTY

            case 0x10117: retval = 80; break;      // AEGEAN NUMBER EIGHTY

            case 0x10118: retval = 90; break;      // AEGEAN NUMBER NINETY

            case 0x10119: retval = 100; break;     // AEGEAN NUMBER ONE HUNDRED

            case 0x1011A: retval = 200; break;     // AEGEAN NUMBER TWO HUNDRED

            case 0x1011B: retval = 300; break;     // AEGEAN NUMBER THREE HUNDRED

            case 0x1011C: retval = 400; break;     // AEGEAN NUMBER FOUR HUNDRED

            case 0x1011D: retval = 500; break;     // AEGEAN NUMBER FIVE HUNDRED

            case 0x1011E: retval = 600; break;     // AEGEAN NUMBER SIX HUNDRED

            case 0x1011F: retval = 700; break;     // AEGEAN NUMBER SEVEN HUNDRED

            case 0x10120: retval = 800; break;     // AEGEAN NUMBER EIGHT HUNDRED

            case 0x10121: retval = 900; break;     // AEGEAN NUMBER NINE HUNDRED

            case 0x10122: retval = 1000; break;    // AEGEAN NUMBER ONE THOUSAND

            case 0x10123: retval = 2000; break;    // AEGEAN NUMBER TWO THOUSAND

            case 0x10124: retval = 3000; break;    // AEGEAN NUMBER THREE THOUSAND

            case 0x10125: retval = 4000; break;    // AEGEAN NUMBER FOUR THOUSAND

            case 0x10126: retval = 5000; break;    // AEGEAN NUMBER FIVE THOUSAND

            case 0x10127: retval = 6000; break;    // AEGEAN NUMBER SIX THOUSAND

            case 0x10128: retval = 7000; break;    // AEGEAN NUMBER SEVEN THOUSAND

            case 0x10129: retval = 8000; break;    // AEGEAN NUMBER EIGHT THOUSAND

            case 0x1012A: retval = 9000; break;    // AEGEAN NUMBER NINE THOUSAND

            case 0x1012B: retval = 10000; break;   // AEGEAN NUMBER TEN THOUSAND

            case 0x1012C: retval = 20000; break;   // AEGEAN NUMBER TWENTY THOUSAND

            case 0x1012D: retval = 30000; break;   // AEGEAN NUMBER THIRTY THOUSAND

            case 0x1012E: retval = 40000; break;   // AEGEAN NUMBER FORTY THOUSAND

            case 0x1012F: retval = 50000; break;   // AEGEAN NUMBER FIFTY THOUSAND

            case 0x10130: retval = 60000; break;   // AEGEAN NUMBER SIXTY THOUSAND

            case 0x10131: retval = 70000; break;   // AEGEAN NUMBER SEVENTY THOUSAND

            case 0x10132: retval = 80000; break;   // AEGEAN NUMBER EIGHTY THOUSAND

            case 0x10133: retval = 90000; break;   // AEGEAN NUMBER NINETY THOUSAND

            case 0x10144: retval = 50; break;      // GREEK ACROPHONIC ATTIC FIFTY

            case 0x10145: retval = 500; break;     // GREEK ACROPHONIC ATTIC FIVE HUNDRED

            case 0x10146: retval = 5000; break;    // GREEK ACROPHONIC ATTIC FIVE THOUSAND

            case 0x10147: retval = 50000; break;   // GREEK ACROPHONIC ATTIC FIFTY THOUSAND

            case 0x1014A: retval = 50; break;      // GREEK ACROPHONIC ATTIC FIFTY TALENTS

            case 0x1014B: retval = 100; break;     // GREEK ACROPHONIC ATTIC ONE HUNDRED TALENTS

            case 0x1014C: retval = 500; break;     // GREEK ACROPHONIC ATTIC FIVE HUNDRED TALENTS

            case 0x1014D: retval = 1000; break;    // GREEK ACROPHONIC ATTIC ONE THOUSAND TALENTS

            case 0x1014E: retval = 5000; break;    // GREEK ACROPHONIC ATTIC FIVE THOUSAND TALENTS

            case 0x10151: retval = 50; break;      // GREEK ACROPHONIC ATTIC FIFTY STATERS

            case 0x10152: retval = 100; break;     // GREEK ACROPHONIC ATTIC ONE HUNDRED STATERS

            case 0x10153: retval = 500; break;     // GREEK ACROPHONIC ATTIC FIVE HUNDRED STATERS

            case 0x10154: retval = 1000; break;    // GREEK ACROPHONIC ATTIC ONE THOUSAND STATERS

            case 0x10155: retval = 10000; break;   // GREEK ACROPHONIC ATTIC TEN THOUSAND STATERS

            case 0x10156: retval = 50000; break;   // GREEK ACROPHONIC ATTIC FIFTY THOUSAND STATERS

            case 0x10166: retval = 50; break;      // GREEK ACROPHONIC TROEZENIAN FIFTY

            case 0x10167: retval = 50; break;      // GREEK ACROPHONIC TROEZENIAN FIFTY ALTERNATE FORM

            case 0x10168: retval = 50; break;      // GREEK ACROPHONIC HERMIONIAN FIFTY

            case 0x10169: retval = 50; break;      // GREEK ACROPHONIC THESPIAN FIFTY

            case 0x1016A: retval = 100; break;     // GREEK ACROPHONIC THESPIAN ONE HUNDRED

            case 0x1016B: retval = 300; break;     // GREEK ACROPHONIC THESPIAN THREE HUNDRED

            case 0x1016C: retval = 500; break;     // GREEK ACROPHONIC EPIDAUREAN FIVE HUNDRED

            case 0x1016D: retval = 500; break;     // GREEK ACROPHONIC TROEZENIAN FIVE HUNDRED

            case 0x1016E: retval = 500; break;     // GREEK ACROPHONIC THESPIAN FIVE HUNDRED

            case 0x1016F: retval = 500; break;     // GREEK ACROPHONIC CARYSTIAN FIVE HUNDRED

            case 0x10170: retval = 500; break;     // GREEK ACROPHONIC NAXIAN FIVE HUNDRED

            case 0x10171: retval = 1000; break;    // GREEK ACROPHONIC THESPIAN ONE THOUSAND

            case 0x10172: retval = 5000; break;    // GREEK ACROPHONIC THESPIAN FIVE THOUSAND

            case 0x10174: retval = 50; break;      // GREEK ACROPHONIC STRATIAN FIFTY MNAS

            case 0x102ED: retval = 40; break;      // COPTIC EPACT NUMBER FORTY

            case 0x102EE: retval = 50; break;      // COPTIC EPACT NUMBER FIFTY

            case 0x102EF: retval = 60; break;      // COPTIC EPACT NUMBER SIXTY

            case 0x102F0: retval = 70; break;      // COPTIC EPACT NUMBER SEVENTY

            case 0x102F1: retval = 80; break;      // COPTIC EPACT NUMBER EIGHTY

            case 0x102F2: retval = 90; break;      // COPTIC EPACT NUMBER NINETY

            case 0x102F3: retval = 100; break;     // COPTIC EPACT NUMBER ONE HUNDRED

            case 0x102F4: retval = 200; break;     // COPTIC EPACT NUMBER TWO HUNDRED

            case 0x102F5: retval = 300; break;     // COPTIC EPACT NUMBER THREE HUNDRED

            case 0x102F6: retval = 400; break;     // COPTIC EPACT NUMBER FOUR HUNDRED

            case 0x102F7: retval = 500; break;     // COPTIC EPACT NUMBER FIVE HUNDRED

            case 0x102F8: retval = 600; break;     // COPTIC EPACT NUMBER SIX HUNDRED

            case 0x102F9: retval = 700; break;     // COPTIC EPACT NUMBER SEVEN HUNDRED

            case 0x102FA: retval = 800; break;     // COPTIC EPACT NUMBER EIGHT HUNDRED

            case 0x102FB: retval = 900; break;     // COPTIC EPACT NUMBER NINE HUNDRED

            case 0x10323: retval = 50; break;      // OLD ITALIC NUMERAL FIFTY

            case 0x10341: retval = 90; break;      // GOTHIC LETTER NINETY

            case 0x1034A: retval = 900; break;     // GOTHIC LETTER NINE HUNDRED

            case 0x103D5: retval = 100; break;     // OLD PERSIAN NUMBER HUNDRED

            case 0x1085D: retval = 100; break;     // IMPERIAL ARAMAIC NUMBER ONE HUNDRED

            case 0x1085E: retval = 1000; break;    // IMPERIAL ARAMAIC NUMBER ONE THOUSAND

            case 0x1085F: retval = 10000; break;   // IMPERIAL ARAMAIC NUMBER TEN THOUSAND

            case 0x108AF: retval = 100; break;     // NABATAEAN NUMBER ONE HUNDRED

            case 0x108FF: retval = 100; break;     // HATRAN NUMBER ONE HUNDRED

            case 0x10919: retval = 100; break;     // PHOENICIAN NUMBER ONE HUNDRED

            case 0x109CC: retval = 40; break;      // MEROITIC CURSIVE NUMBER FORTY

            case 0x109CD: retval = 50; break;      // MEROITIC CURSIVE NUMBER FIFTY

            case 0x109CE: retval = 60; break;      // MEROITIC CURSIVE NUMBER SIXTY

            case 0x109CF: retval = 70; break;      // MEROITIC CURSIVE NUMBER SEVENTY

            case 0x109D2: retval = 100; break;     // MEROITIC CURSIVE NUMBER ONE HUNDRED

            case 0x109D3: retval = 200; break;     // MEROITIC CURSIVE NUMBER TWO HUNDRED

            case 0x109D4: retval = 300; break;     // MEROITIC CURSIVE NUMBER THREE HUNDRED

            case 0x109D5: retval = 400; break;     // MEROITIC CURSIVE NUMBER FOUR HUNDRED

            case 0x109D6: retval = 500; break;     // MEROITIC CURSIVE NUMBER FIVE HUNDRED

            case 0x109D7: retval = 600; break;     // MEROITIC CURSIVE NUMBER SIX HUNDRED

            case 0x109D8: retval = 700; break;     // MEROITIC CURSIVE NUMBER SEVEN HUNDRED

            case 0x109D9: retval = 800; break;     // MEROITIC CURSIVE NUMBER EIGHT HUNDRED

            case 0x109DA: retval = 900; break;     // MEROITIC CURSIVE NUMBER NINE HUNDRED

            case 0x109DB: retval = 1000; break;    // MEROITIC CURSIVE NUMBER ONE THOUSAND

            case 0x109DC: retval = 2000; break;    // MEROITIC CURSIVE NUMBER TWO THOUSAND

            case 0x109DD: retval = 3000; break;    // MEROITIC CURSIVE NUMBER THREE THOUSAND

            case 0x109DE: retval = 4000; break;    // MEROITIC CURSIVE NUMBER FOUR THOUSAND

            case 0x109DF: retval = 5000; break;    // MEROITIC CURSIVE NUMBER FIVE THOUSAND

            case 0x109E0: retval = 6000; break;    // MEROITIC CURSIVE NUMBER SIX THOUSAND

            case 0x109E1: retval = 7000; break;    // MEROITIC CURSIVE NUMBER SEVEN THOUSAND

            case 0x109E2: retval = 8000; break;    // MEROITIC CURSIVE NUMBER EIGHT THOUSAND

            case 0x109E3: retval = 9000; break;    // MEROITIC CURSIVE NUMBER NINE THOUSAND

            case 0x109E4: retval = 10000; break;   // MEROITIC CURSIVE NUMBER TEN THOUSAND

            case 0x109E5: retval = 20000; break;   // MEROITIC CURSIVE NUMBER TWENTY THOUSAND

            case 0x109E6: retval = 30000; break;   // MEROITIC CURSIVE NUMBER THIRTY THOUSAND

            case 0x109E7: retval = 40000; break;   // MEROITIC CURSIVE NUMBER FORTY THOUSAND

            case 0x109E8: retval = 50000; break;   // MEROITIC CURSIVE NUMBER FIFTY THOUSAND

            case 0x109E9: retval = 60000; break;   // MEROITIC CURSIVE NUMBER SIXTY THOUSAND

            case 0x109EA: retval = 70000; break;   // MEROITIC CURSIVE NUMBER SEVENTY THOUSAND

            case 0x109EB: retval = 80000; break;   // MEROITIC CURSIVE NUMBER EIGHTY THOUSAND

            case 0x109EC: retval = 90000; break;   // MEROITIC CURSIVE NUMBER NINETY THOUSAND

            case 0x109ED: retval = 100000; break;  // MEROITIC CURSIVE NUMBER ONE HUNDRED THOUSAND

            case 0x109EE: retval = 200000; break;  // MEROITIC CURSIVE NUMBER TWO HUNDRED THOUSAND

            case 0x109EF: retval = 300000; break;  // MEROITIC CURSIVE NUMBER THREE HUNDRED THOUSAND

            case 0x109F0: retval = 400000; break;  // MEROITIC CURSIVE NUMBER FOUR HUNDRED THOUSAND

            case 0x109F1: retval = 500000; break;  // MEROITIC CURSIVE NUMBER FIVE HUNDRED THOUSAND

            case 0x109F2: retval = 600000; break;  // MEROITIC CURSIVE NUMBER SIX HUNDRED THOUSAND

            case 0x109F3: retval = 700000; break;  // MEROITIC CURSIVE NUMBER SEVEN HUNDRED THOUSAND

            case 0x109F4: retval = 800000; break;  // MEROITIC CURSIVE NUMBER EIGHT HUNDRED THOUSAND

            case 0x109F5: retval = 900000; break;  // MEROITIC CURSIVE NUMBER NINE HUNDRED THOUSAND

            case 0x10A46: retval = 100; break;     // KHAROSHTHI NUMBER ONE HUNDRED

            case 0x10A47: retval = 1000; break;    // KHAROSHTHI NUMBER ONE THOUSAND

            case 0x10A7E: retval = 50; break;      // OLD SOUTH ARABIAN NUMBER FIFTY

            case 0x10AEF: retval = 100; break;     // MANICHAEAN NUMBER ONE HUNDRED

            case 0x10B5E: retval = 100; break;     // INSCRIPTIONAL PARTHIAN NUMBER ONE HUNDRED

            case 0x10B5F: retval = 1000; break;    // INSCRIPTIONAL PARTHIAN NUMBER ONE THOUSAND

            case 0x10B7E: retval = 100; break;     // INSCRIPTIONAL PAHLAVI NUMBER ONE HUNDRED

            case 0x10B7F: retval = 1000; break;    // INSCRIPTIONAL PAHLAVI NUMBER ONE THOUSAND

            case 0x10BAF: retval = 100; break;     // PSALTER PAHLAVI NUMBER ONE HUNDRED

            case 0x10CFD: retval = 50; break;      // OLD HUNGARIAN NUMBER FIFTY

            case 0x10CFE: retval = 100; break;     // OLD HUNGARIAN NUMBER ONE HUNDRED

            case 0x10CFF: retval = 1000; break;    // OLD HUNGARIAN NUMBER ONE THOUSAND

            case 0x10E6C: retval = 40; break;      // RUMI NUMBER FORTY

            case 0x10E6D: retval = 50; break;      // RUMI NUMBER FIFTY

            case 0x10E6E: retval = 60; break;      // RUMI NUMBER SIXTY

            case 0x10E6F: retval = 70; break;      // RUMI NUMBER SEVENTY

            case 0x10E70: retval = 80; break;      // RUMI NUMBER EIGHTY

            case 0x10E71: retval = 90; break;      // RUMI NUMBER NINETY

            case 0x10E72: retval = 100; break;     // RUMI NUMBER ONE HUNDRED

            case 0x10E73: retval = 200; break;     // RUMI NUMBER TWO HUNDRED

            case 0x10E74: retval = 300; break;     // RUMI NUMBER THREE HUNDRED

            case 0x10E75: retval = 400; break;     // RUMI NUMBER FOUR HUNDRED

            case 0x10E76: retval = 500; break;     // RUMI NUMBER FIVE HUNDRED

            case 0x10E77: retval = 600; break;     // RUMI NUMBER SIX HUNDRED

            case 0x10E78: retval = 700; break;     // RUMI NUMBER SEVEN HUNDRED

            case 0x10E79: retval = 800; break;     // RUMI NUMBER EIGHT HUNDRED

            case 0x10E7A: retval = 900; break;     // RUMI NUMBER NINE HUNDRED

            case 0x10F25: retval = 100; break;     // OLD SOGDIAN NUMBER ONE HUNDRED

            case 0x10F54: retval = 100; break;     // SOGDIAN NUMBER ONE HUNDRED

            case 0x1105E: retval = 40; break;      // BRAHMI NUMBER FORTY

            case 0x1105F: retval = 50; break;      // BRAHMI NUMBER FIFTY

            case 0x11060: retval = 60; break;      // BRAHMI NUMBER SIXTY

            case 0x11061: retval = 70; break;      // BRAHMI NUMBER SEVENTY

            case 0x11062: retval = 80; break;      // BRAHMI NUMBER EIGHTY

            case 0x11063: retval = 90; break;      // BRAHMI NUMBER NINETY

            case 0x11064: retval = 100; break;     // BRAHMI NUMBER ONE HUNDRED

            case 0x11065: retval = 1000; break;    // BRAHMI NUMBER ONE THOUSAND

            case 0x11C66: retval = 40; break;      // BHAIKSUKI NUMBER FORTY

            case 0x11C67: retval = 50; break;      // BHAIKSUKI NUMBER FIFTY

            case 0x11C68: retval = 60; break;      // BHAIKSUKI NUMBER SIXTY

            case 0x11C69: retval = 70; break;      // BHAIKSUKI NUMBER SEVENTY

            case 0x11C6A: retval = 80; break;      // BHAIKSUKI NUMBER EIGHTY

            case 0x11C6B: retval = 90; break;      // BHAIKSUKI NUMBER NINETY

            case 0x11C6C: retval = 100; break;     // BHAIKSUKI HUNDREDS UNIT MARK

            case 0x111ED: retval = 40; break;      // SINHALA ARCHAIC NUMBER FORTY

            case 0x111EE: retval = 50; break;      // SINHALA ARCHAIC NUMBER FIFTY

            case 0x111EF: retval = 60; break;      // SINHALA ARCHAIC NUMBER SIXTY

            case 0x111F0: retval = 70; break;      // SINHALA ARCHAIC NUMBER SEVENTY

            case 0x111F1: retval = 80; break;      // SINHALA ARCHAIC NUMBER EIGHTY

            case 0x111F2: retval = 90; break;      // SINHALA ARCHAIC NUMBER NINETY

            case 0x111F3: retval = 100; break;     // SINHALA ARCHAIC NUMBER ONE HUNDRED

            case 0x111F4: retval = 1000; break;    // SINHALA ARCHAIC NUMBER ONE THOUSAND

            case 0x118ED: retval = 40; break;      // WARANG CITI NUMBER FORTY

            case 0x118EE: retval = 50; break;      // WARANG CITI NUMBER FIFTY

            case 0x118EF: retval = 60; break;      // WARANG CITI NUMBER SIXTY

            case 0x118F0: retval = 70; break;      // WARANG CITI NUMBER SEVENTY

            case 0x118F1: retval = 80; break;      // WARANG CITI NUMBER EIGHTY

            case 0x118F2: retval = 90; break;      // WARANG CITI NUMBER NINETY

            case 0x12432: retval = 216000; break;  // CUNEIFORM NUMERIC SIGN SHAR2 TIMES GAL PLUS DISH

            case 0x12433: retval = 432000; break;  // CUNEIFORM NUMERIC SIGN SHAR2 TIMES GAL PLUS MIN

            case 0x12467: retval = 40; break;      // CUNEIFORM NUMERIC SIGN ELAMITE FORTY

            case 0x12468: retval = 50; break;      // CUNEIFORM NUMERIC SIGN ELAMITE FIFTY

            case 0x16B5C: retval = 100; break;     // PAHAWH HMONG NUMBER HUNDREDS

            case 0x16B5D: retval = 10000; break;   // PAHAWH HMONG NUMBER TEN THOUSANDS

            case 0x16B5E: retval = 1000000; break; // PAHAWH HMONG NUMBER MILLIONS

            case 0x16B5F: retval = 100000000; break;// PAHAWH HMONG NUMBER HUNDRED MILLIONS

            case 0x1D36C: retval = 40; break;      // COUNTING ROD TENS DIGIT FOUR

            case 0x1D36D: retval = 50; break;      // COUNTING ROD TENS DIGIT FIVE

            case 0x1D36E: retval = 60; break;      // COUNTING ROD TENS DIGIT SIX

            case 0x1D36F: retval = 70; break;      // COUNTING ROD TENS DIGIT SEVEN

            case 0x1D370: retval = 80; break;      // COUNTING ROD TENS DIGIT EIGHT

            case 0x1D371: retval = 90; break;      // COUNTING ROD TENS DIGIT NINE

            case 0x1EC7D: retval = 40; break;      // INDIC SIYAQ NUMBER FORTY

            case 0x1EC7E: retval = 50; break;      // INDIC SIYAQ NUMBER FIFTY

            case 0x1EC7F: retval = 60; break;      // INDIC SIYAQ NUMBER SIXTY

            case 0X1EC80: retval = 70; break;      // INDIC SIYAQ NUMBER SEVENTY

            case 0X1EC81: retval = 80; break;      // INDIC SIYAQ NUMBER EIGHTY

            case 0X1EC82: retval = 90; break;      // INDIC SIYAQ NUMBER NINETY

            case 0X1EC83: retval = 100; break;     // INDIC SIYAQ NUMBER ONE HUNDRED

            case 0X1EC84: retval = 200; break;     // INDIC SIYAQ NUMBER TWO HUNDRED

            case 0X1EC85: retval = 300; break;     // INDIC SIYAQ NUMBER THREE HUNDRED

            case 0X1EC86: retval = 400; break;     // INDIC SIYAQ NUMBER FOUR HUNDRED

            case 0X1EC87: retval = 500; break;     // INDIC SIYAQ NUMBER FIVE HUNDRED

            case 0X1EC88: retval = 600; break;     // INDIC SIYAQ NUMBER SIX HUNDRED

            case 0X1EC89: retval = 700; break;     // INDIC SIYAQ NUMBER SEVEN HUNDRED

            case 0X1EC8A: retval = 800; break;     // INDIC SIYAQ NUMBER EIGHT HUNDRED

            case 0X1EC8B: retval = 900; break;     // INDIC SIYAQ NUMBER NINE HUNDRED

            case 0X1EC8C: retval = 1000; break;    // INDIC SIYAQ NUMBER ONE THOUSAND

            case 0X1EC8D: retval = 2000; break;    // INDIC SIYAQ NUMBER TWO THOUSAND

            case 0X1EC8E: retval = 3000; break;    // INDIC SIYAQ NUMBER THREE THOUSAND

            case 0X1EC8F: retval = 4000; break;    // INDIC SIYAQ NUMBER FOUR THOUSAND

            case 0X1EC90: retval = 5000; break;    // INDIC SIYAQ NUMBER FIVE THOUSAND

            case 0X1EC91: retval = 6000; break;    // INDIC SIYAQ NUMBER SIX THOUSAND

            case 0X1EC92: retval = 7000; break;    // INDIC SIYAQ NUMBER SEVEN THOUSAND

            case 0X1EC93: retval = 8000; break;    // INDIC SIYAQ NUMBER EIGHT THOUSAND

            case 0X1EC94: retval = 9000; break;    // INDIC SIYAQ NUMBER NINE THOUSAND

            case 0X1EC95: retval = 10000; break;   // INDIC SIYAQ NUMBER TEN THOUSAND

            case 0X1EC96: retval = 20000; break;   // INDIC SIYAQ NUMBER TWENTY THOUSAND

            case 0X1EC97: retval = 30000; break;   // INDIC SIYAQ NUMBER THIRTY THOUSAND

            case 0X1EC98: retval = 40000; break;   // INDIC SIYAQ NUMBER FORTY THOUSAND

            case 0X1EC99: retval = 50000; break;   // INDIC SIYAQ NUMBER FIFTY THOUSAND

            case 0X1EC9A: retval = 60000; break;   // INDIC SIYAQ NUMBER SIXTY THOUSAND

            case 0X1EC9B: retval = 70000; break;   // INDIC SIYAQ NUMBER SEVENTY THOUSAND

            case 0X1EC9C: retval = 80000; break;   // INDIC SIYAQ NUMBER EIGHTY THOUSAND

            case 0X1EC9D: retval = 90000; break;   // INDIC SIYAQ NUMBER NINETY THOUSAND

            case 0X1EC9E: retval = 100000; break;  // INDIC SIYAQ NUMBER LAKH

            case 0X1EC9F: retval = 200000; break;  // INDIC SIYAQ NUMBER LAKHAN

            case 0X1ECA0: retval = 100000; break;  // INDIC SIYAQ LAKH MARK

            case 0X1ECA1: retval = 10000000; break;// INDIC SIYAQ NUMBER KAROR

            case 0X1ECA2: retval = 20000000; break;// INDIC SIYAQ NUMBER KARORAN

            case 0X1ECB3: retval = 10000; break;   // INDIC SIYAQ NUMBER ALTERNATE TEN THOUSAND

            case 0X1ECB4: retval = 100000; break;  // INDIC SIYAQ NUMBER ALTERNATE LAKH MARK

            case 0X1ED0D: retval = 40; break;      // OTTOMAN SIYAQ NUMBER FORTY

            case 0X1ED0E: retval = 50; break;      // OTTOMAN SIYAQ NUMBER FIFTY

            case 0X1ED0F: retval = 60; break;      // OTTOMAN SIYAQ NUMBER SIXTY

            case 0X1ED10: retval = 70; break;      // OTTOMAN SIYAQ NUMBER SEVENTY

            case 0X1ED11: retval = 80; break;      // OTTOMAN SIYAQ NUMBER EIGHTY

            case 0X1ED12: retval = 90; break;      // OTTOMAN SIYAQ NUMBER NINETY

            case 0X1ED13: retval = 100; break;     // OTTOMAN SIYAQ NUMBER ONE HUNDRED

            case 0X1ED14: retval = 200; break;     // OTTOMAN SIYAQ NUMBER TWO HUNDRED

            case 0X1ED15: retval = 300; break;     // OTTOMAN SIYAQ NUMBER THREE HUNDRED

            case 0X1ED16: retval = 400; break;     // OTTOMAN SIYAQ NUMBER FOUR HUNDRED

            case 0X1ED17: retval = 500; break;     // OTTOMAN SIYAQ NUMBER FIVE HUNDRED

            case 0X1ED18: retval = 600; break;     // OTTOMAN SIYAQ NUMBER SIX HUNDRED

            case 0X1ED19: retval = 700; break;     // OTTOMAN SIYAQ NUMBER SEVEN HUNDRED

            case 0X1ED1A: retval = 800; break;     // OTTOMAN SIYAQ NUMBER EIGHT HUNDRED

            case 0X1ED1B: retval = 900; break;     // OTTOMAN SIYAQ NUMBER NINE HUNDRED

            case 0X1ED1C: retval = 1000; break;    // OTTOMAN SIYAQ NUMBER ONE THOUSAND

            case 0X1ED1D: retval = 2000; break;    // OTTOMAN SIYAQ NUMBER TWO THOUSAND

            case 0X1ED1E: retval = 3000; break;    // OTTOMAN SIYAQ NUMBER THREE THOUSAND

            case 0X1ED1F: retval = 4000; break;    // OTTOMAN SIYAQ NUMBER FOUR THOUSAND

            case 0X1ED20: retval = 5000; break;    // OTTOMAN SIYAQ NUMBER FIVE THOUSAND

            case 0X1ED21: retval = 6000; break;    // OTTOMAN SIYAQ NUMBER SIX THOUSAND

            case 0X1ED22: retval = 7000; break;    // OTTOMAN SIYAQ NUMBER SEVEN THOUSAND

            case 0X1ED23: retval = 8000; break;    // OTTOMAN SIYAQ NUMBER EIGHT THOUSAND

            case 0X1ED24: retval = 9000; break;    // OTTOMAN SIYAQ NUMBER NINE THOUSAND

            case 0X1ED25: retval = 10000; break;   // OTTOMAN SIYAQ NUMBER TEN THOUSAND

            case 0X1ED26: retval = 20000; break;   // OTTOMAN SIYAQ NUMBER TWENTY THOUSAND

            case 0X1ED27: retval = 30000; break;   // OTTOMAN SIYAQ NUMBER THIRTY THOUSAND

            case 0X1ED28: retval = 40000; break;   // OTTOMAN SIYAQ NUMBER FORTY THOUSAND

            case 0X1ED29: retval = 50000; break;   // OTTOMAN SIYAQ NUMBER FIFTY THOUSAND

            case 0X1ED2A: retval = 60000; break;   // OTTOMAN SIYAQ NUMBER SIXTY THOUSAND

            case 0X1ED2B: retval = 70000; break;   // OTTOMAN SIYAQ NUMBER SEVENTY THOUSAND

            case 0X1ED2C: retval = 80000; break;   // OTTOMAN SIYAQ NUMBER EIGHTY THOUSAND

            case 0X1ED2D: retval = 90000; break;   // OTTOMAN SIYAQ NUMBER NINETY THOUSAND

            case 0X1ED38: retval = 400; break;     // OTTOMAN SIYAQ ALTERNATE NUMBER FOUR HUNDRED

            case 0X1ED39: retval = 600; break;     // OTTOMAN SIYAQ ALTERNATE NUMBER SIX HUNDRED

            case 0X1ED3A: retval = 2000; break;    // OTTOMAN SIYAQ ALTERNATE NUMBER TWO THOUSAND

            case 0X1ED3B: retval = 10000; break;   // OTTOMAN SIYAQ ALTERNATE NUMBER TEN THOUSAND

            default: retval = -2; break;

            }

            break;

        case ($$valueJavaSupradecimal):           // Java supradecimal

            retval = (ch + ((val & $$maskDigitOffset) >> $$shiftDigitOffset) & $$maskDigit) + 10;

            break;

        }

        return retval;

    }

    boolean isDigit(int ch) {

        int props = getProperties(ch);

        return (props & $$maskType) == Character.DECIMAL_DIGIT_NUMBER;

    }

    boolean isLowerCase(int ch) {

        int props = getProperties(ch);