|
public static RandomEDecimal ( |
||
| r | ||
| Résultat | PeterO.Numbers.EDecimal | |
public static CBORObject RandomNumberOrRational(RandomGenerator rand)
{
switch (rand.UniformInt(7))
{
case 0:
return(CBORObject.FromObject(
RandomObjects.RandomDouble(
rand,
Int32.MaxValue)));
case 1:
return(CBORObject.FromObject(
RandomObjects.RandomSingle(
rand,
Int32.MaxValue)));
case 2:
return(CBORObject.FromObject(RandomObjects.RandomEInteger(rand)));
case 3:
return(CBORObject.FromObject(RandomObjects.RandomEFloat(rand)));
case 4:
return
(CBORObject.FromObject(RandomObjects.RandomEDecimal(rand)));
case 5:
return(CBORObject.FromObject(RandomObjects.RandomInt64(rand)));
case 6:
return(CBORObject.FromObject(RandomObjects.RandomERational(rand)));
default: throw new ArgumentException();
}
}
private static EDecimal RandomEDecimalLowExponent(IRandomGenExtended rand)
{
while (true)
{
EDecimal ef = RandomObjects.RandomEDecimal(rand);
if (
ef.Exponent.CompareTo(-20000) >= 0 &&
ef.Exponent.CompareTo(20000) <= 0)
{
return(ef);
}
}
}
public static CBORObject RandomNumberOrRational(IRandomGenExtended rand)
{
object o = null;
switch (rand.GetInt32(7))
{
case 0:
o = RandomObjects.RandomDouble(
rand,
Int32.MaxValue);
return(CBORObject.FromObject(o));
case 1:
o = RandomObjects.RandomSingle(
rand,
Int32.MaxValue);
return(CBORObject.FromObject(o));
case 2:
return(CBORObject.FromObject(
RandomObjects.RandomEInteger(rand)));
case 3:
return(CBORObject.FromObject(
RandomObjects.RandomEFloat(rand)));
case 4:
o = RandomObjects.RandomEDecimal(rand);
return(CBORObject.FromObject(o));
case 5:
o = RandomObjects.RandomInt64(rand);
return(CBORObject.FromObject(o));
case 6:
o = RandomObjects.RandomERational(rand);
return(CBORObject.FromObject(o));
default: throw new InvalidOperationException();
}
}
public static CBORObject RandomNumberOrRational(RandomGenerator rand)
{
object o = null;
switch (rand.UniformInt(7))
{
case 0:
o = RandomObjects.RandomDouble(
rand,
Int32.MaxValue);
return(ToObjectTest.TestToFromObjectRoundTrip(o));
case 1:
o = RandomObjects.RandomSingle(
rand,
Int32.MaxValue);
return(ToObjectTest.TestToFromObjectRoundTrip(o));
case 2:
return(ToObjectTest.TestToFromObjectRoundTrip(
RandomObjects.RandomEInteger(rand)));
case 3:
return(ToObjectTest.TestToFromObjectRoundTrip(
RandomObjects.RandomEFloat(rand)));
case 4:
o = RandomObjects.RandomEDecimal(rand);
return(ToObjectTest.TestToFromObjectRoundTrip(o));
case 5:
o = RandomObjects.RandomInt64(rand);
return(ToObjectTest.TestToFromObjectRoundTrip(o));
case 6:
o = RandomObjects.RandomERational(rand);
return(ToObjectTest.TestToFromObjectRoundTrip(o));
default: throw new InvalidOperationException();
}
}
public void TestDecimalString()
{
var fr = new RandomGenerator();
for (var i = 0; i < 1000; ++i)
{
EDecimal ed = RandomObjects.RandomEDecimal(fr);
if (!ed.IsFinite)
{
continue;
}
decimal d;
try {
System.Globalization.NumberStyles numstyles =
System.Globalization.NumberStyles.AllowExponent |
System.Globalization.NumberStyles.Number;
d = Decimal.Parse(
ed.ToString(),
numstyles,
System.Globalization.CultureInfo.InvariantCulture);
EDecimal ed3 = EDecimal.FromString(
ed.ToString(),
EContext.CliDecimal);
string msg = ed.ToString() + " (expanded: " +
EDecimal.FromString(ed.ToString()) + ")";
TestCommon.CompareTestEqual(
(EDecimal)d,
ed3,
msg);
} catch (OverflowException ex) {
EDecimal ed2 = EDecimal.FromString(
ed.ToString(),
EContext.CliDecimal);
Assert.IsTrue(
ed2.IsInfinity(),
ed.ToString(),
ex.ToString());
}
}
}
public void TestDecimalString()
{
var fr = new RandomGenerator();
// var sw = new System.Diagnostics.Stopwatch();
// var sw2 = new System.Diagnostics.Stopwatch();
// var sw3 = new System.Diagnostics.Stopwatch();
for (var i = 0; i < 10000; ++i)
{
if (i % 100 == 0)
{
// Console.WriteLine(i + " sw=" +
// sw.ElapsedMilliseconds + ", " + (sw2.ElapsedMilliseconds) +
// ", " + (sw3.ElapsedMilliseconds));
}
// sw3.Start();
EDecimal ed = RandomObjects.RandomEDecimal(fr);
// sw3.Stop();
// Reduce to Decimal128. Without this reduction,
// Decimal.Parse would run significantly more slowly
// on average for random
// EDecimals than
// EDecimal.FromString(CliDecimal) does.
// Decimal128 covers all numbers representable
// in a CliDecimal.
ed = ed.RoundToPrecision(EContext.Decimal128);
if (!ed.IsFinite)
{
continue;
}
string edString = ed.ToString();
decimal d;
try {
System.Globalization.NumberStyles numstyles =
System.Globalization.NumberStyles.AllowExponent |
System.Globalization.NumberStyles.Number;
// sw.Start();
d = Decimal.Parse(
edString,
numstyles,
System.Globalization.CultureInfo.InvariantCulture);
// sw.Stop();
// sw2.Start();
EDecimal ed3 = EDecimal.FromString(
edString,
EContext.CliDecimal);
// sw2.Stop();
var edd = (EDecimal)d;
if (!edd.Equals(ed3))
{
string msg = ed.ToString() + " (expanded: " +
EDecimal.FromString(ed.ToString()) + ")";
TestCommon.CompareTestEqual(
(EDecimal)d,
ed3,
msg);
}
// sw3.Stop();
} catch (OverflowException ex) {
EDecimal ed2 = EDecimal.FromString(
edString,
EContext.CliDecimal);
if (!ed2.IsInfinity())
{
Assert.Fail(edString + "\n" + ex.ToString());
}
}
}
}
