67 lines
3 KiB
MQL5
67 lines
3 KiB
MQL5
//+------------------------------------------------------------------+
|
|
//| MathInvalid.mq5 |
|
|
//| Copyright 2021, MetaQuotes Ltd. |
|
|
//| https://www.mql5.com |
|
|
//+------------------------------------------------------------------+
|
|
|
|
#define PRT(A) Print(#A, "=", (A))
|
|
|
|
#include "..\..\Include\ConverterT.mqh"
|
|
|
|
static Converter<ulong,double> NaNs;
|
|
|
|
// general NaNs
|
|
#define NAN_INF_PLUS 0x7FF0000000000000
|
|
#define NAN_INF_MINUS 0xFFF0000000000000
|
|
#define NAN_QUIET 0x7FF8000000000000
|
|
#define NAN_IND_MINUS 0xFFF8000000000000
|
|
|
|
// examples of custom NaNs
|
|
#define NAN_QUIET_1 0x7FF8000000000001
|
|
#define NAN_QUIET_2 0x7FF8000000000002
|
|
|
|
static double pinf = NaNs[NAN_INF_PLUS]; // +infinity
|
|
static double ninf = NaNs[NAN_INF_MINUS]; // -infinity
|
|
static double qnan = NaNs[NAN_QUIET]; // quiet NaN
|
|
static double nind = NaNs[NAN_IND_MINUS]; // -nan(ind)
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| Script program start function |
|
|
//+------------------------------------------------------------------+
|
|
void OnStart()
|
|
{
|
|
// checkup
|
|
PRT(MathIsValidNumber(pinf)); // false
|
|
PRT(EnumToString(MathClassify(pinf))); // FP_INFINITE
|
|
PRT(MathIsValidNumber(nind)); // false
|
|
PRT(EnumToString(MathClassify(nind))); // FP_NAN
|
|
|
|
// maths with doubles
|
|
PRT(MathIsValidNumber(0)); // true
|
|
PRT(EnumToString(MathClassify(0))); // FP_ZERO
|
|
PRT(MathIsValidNumber(M_PI)); // true
|
|
PRT(EnumToString(MathClassify(M_PI))); // FP_NORMAL
|
|
PRT(DBL_MIN / 10); // 2.225073858507203e-309
|
|
PRT(MathIsValidNumber(DBL_MIN / 10)); // true
|
|
PRT(EnumToString(MathClassify(DBL_MIN / 10))); // FP_SUBNORMAL
|
|
PRT(MathSqrt(-1.0)); // -nan(ind)
|
|
PRT(MathIsValidNumber(MathSqrt(-1.0))); // false
|
|
PRT(EnumToString(MathClassify(MathSqrt(-1.0))));// FP_NAN
|
|
PRT(MathLog(0)); // -inf
|
|
PRT(MathIsValidNumber(MathLog(0))); // false
|
|
PRT(EnumToString(MathClassify(MathLog(0)))); // FP_INFINITE
|
|
|
|
// maths with float
|
|
PRT(1.0f / FLT_MIN / FLT_MIN); // inf
|
|
PRT(MathIsValidNumber(1.0f / FLT_MIN / FLT_MIN)); // false
|
|
PRT(EnumToString(MathClassify(1.0f / FLT_MIN / FLT_MIN))); // FP_INFINITE
|
|
|
|
// we can use Converter to detect specific NaNs
|
|
PrintFormat("%I64X", NaNs[MathSqrt(-1.0)]); // FFF8000000000000
|
|
PRT(NaNs[MathSqrt(-1.0)] == NAN_IND_MINUS); // true
|
|
|
|
// NaN != NaN is always true
|
|
PRT(MathSqrt(-1.0) != MathSqrt(-1.0)); // true
|
|
PRT(MathSqrt(-1.0) == MathSqrt(-1.0)); // false
|
|
}
|
|
//+------------------------------------------------------------------+
|