Double8.avt

/*
    Реализация среды исполнения языка программирования
    Объектно-ориентированный продвинутый векторный транслятор

    Copyright © 2021, 2024 Малик Разработчик

    Это свободная программа: вы можете перераспространять ее и/или изменять
    ее на условиях Меньшей Стандартной общественной лицензии GNU в том виде,
    в каком она была опубликована Фондом свободного программного обеспечения;
    либо версии 3 лицензии, либо (по вашему выбору) любой более поздней версии.

    Эта программа распространяется в надежде, что она будет полезной,
    но БЕЗО ВСЯКИХ ГАРАНТИЙ; даже без неявной гарантии ТОВАРНОГО ВИДА
    или ПРИГОДНОСТИ ДЛЯ ОПРЕДЕЛЕННЫХ ЦЕЛЕЙ. Подробнее см. в Меньшей Стандартной
    общественной лицензии GNU.

    Вы должны были получить копию Меньшей Стандартной общественной лицензии GNU
    вместе с этой программой. Если это не так, см.
    <https://www.gnu.org/licenses/>.
*/

package avt.lang;

public final class Double8(Object, Numeric, Cloneable)
{
    public static final double8 MIN_VALUE = new double8 {
        Double.MIN_VALUE, Double.MIN_VALUE, Double.MIN_VALUE, Double.MIN_VALUE, Double.MIN_VALUE, Double.MIN_VALUE, Double.MIN_VALUE, Double.MIN_VALUE
    };
    public static final double8 MAX_VALUE = new double8 {
        Double.MAX_VALUE, Double.MAX_VALUE, Double.MAX_VALUE, Double.MAX_VALUE, Double.MAX_VALUE, Double.MAX_VALUE, Double.MAX_VALUE, Double.MAX_VALUE
    };

    private static final long8 MASK_NOT_A_NUMBER  = new long8 {
        0x7ff8000000000000L, 0x7ff8000000000000L, 0x7ff8000000000000L, 0x7ff8000000000000L, 0x7ff8000000000000L, 0x7ff8000000000000L, 0x7ff8000000000000L, 0x7ff8000000000000L
    };
    private static final long8 MASK_NEGATIVE_ZERO = new long8 {
        0x8000000000000000L, 0x8000000000000000L, 0x8000000000000000L, 0x8000000000000000L, 0x8000000000000000L, 0x8000000000000000L, 0x8000000000000000L, 0x8000000000000000L
    };

    public static boolean isNaN(double8 value) { return value != value; }

    public static boolean isInfinite(double8 value) {
        return ((value |==| new double8 {
            Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY,
            Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY
        }) | (value |==| new double8 {
            Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY,
            Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY
        })) != 0;
    }

    public static boolean isAllNaN(double8 value) { return (value |!=| value) == new byte8 { -1, -1, -1, -1, -1, -1, -1, -1 }; }

    public static boolean isAllInfinite(double8 value) {
        return ((value |==| new double8 {
            Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY,
            Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY, Double.POSITIVE_INFINITY
        }) | (value |==| new double8 {
            Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY,
            Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY, Double.NEGATIVE_INFINITY
        })) == new byte8 { -1, -1, -1, -1, -1, -1, -1, -1 };
    }

    public static native long8 toLong8Bits(double8 value);

    public static native double4 low(double8 value);

    public static native double4 high(double8 value);

    public static native double8 create(double4 value0, double4 value1);

    public static native double8 create(double2 value0, double2 value1, double2 value2, double2 value3);

    public static native double8 max(double8 value0, double8 value1);

    public static native double8 min(double8 value0, double8 value1);

    public static native double8 setElement(double8 value, int index, double element);

    public static Double8 valueOf(byte8 value) { return new Double8(value); }

    public static Double8 valueOf(short8 value) { return new Double8(value); }

    public static Double8 valueOf(int8 value) { return new Double8(value); }

    public static Double8 valueOf(long8 value) { return new Double8(value); }

    public static Double8 valueOf(float8 value) { return new Double8(value); }

    public static Double8 valueOf(double8 value) { return new Double8(value); }

    public static Double8 valueOf(real value) { return new Double8(value); }

    private final double8 fldValue;

    public (byte8 value) { fldValue = value; }

    public (short8 value) { fldValue = value; }

    public (int8 value) { fldValue = value; }

    public (long8 value) { fldValue = (double8) value; }

    public (float8 value) { fldValue = value; }

    public (double8 value) { fldValue = value; }

    public (real value) { fldValue = (double) value; }

    public boolean equals(Object anot) { return anot == this || anot instanceof Double8 && toLong8Bits(((Double8) anot).fldValue) == toLong8Bits(fldValue); }

    public int hashCode() {
        long8 hash = toLong8Bits(fldValue);
        long result = hash[0];
        for(int index = 1; index < 8; index++) result ^= hash[index];
        return (int) (result ^ (result >> 32));
    }

    public long hashCodeAsLong() {
        long8 hash = toLong8Bits(fldValue);
        long result = hash[0];
        for(int index = 1; index < 8; index++) result ^= hash[index];
        return result;
    }

    public long2 hashCodeAsLong2() {
        long8 hash0 = toLong8Bits(fldValue);
        long4 hash1 = Long8.low(hash0) ^ Long8.high(hash0);
        return Long4.low(hash1) ^ Long4.high(hash1);
    }

    public long4 hashCodeAsLong4() {
        long8 hash = toLong8Bits(fldValue);
        return Long8.low(hash) ^ Long8.high(hash);
    }

    public long8 hashCodeAsLong8() { return toLong8Bits(fldValue); }

    public boolean isNaN() { return isNaN(fldValue); }

    public boolean isInfinite() { return isInfinite(fldValue); }

    public byte8 asByte8() { return (byte8) fldValue; }

    public short8 asShort8() { return (short8) fldValue; }

    public int8 asInt8() { return (int8) fldValue; }

    public long8 asLong8() { return (long8) fldValue; }

    public float8 asFloat8() { return (float8) fldValue; }

    public double8 asDouble8() { return fldValue; }

    public real asReal() { return (double) fldValue; }

    public Double8 clone() { return new Double8(fldValue); }

    public int kind { read = Class.DOUBLE8 }

    public double8 double8Value { read = fldValue }
}