Problema con RoundTo en .NET

[[Al González]]

(eliminé este mensaje para evitar confusiones)

[[Al González]]

¡Hola a todos!

Haciendo memoria (y pruebas adicionales), me vienen a la mente las dos principales razones por las cuales descarté hace tiempo el uso de las funciones SetRoundMode y RoundTo para redondear números que caían “en medio”. Una de las razones es la pérdida de precisión que ocurre al manejar valores Extended, siendo que el parámetro AValue de RoundTo es Double (y por lo cual parece redondear 2.55 como 2.5 en lugar de 2.6 cuando se utiliza rmNearest).

Pero la razón de mayor peso es el comportamiento de RoundTo al aplicar las constantes rmUp y rmDown (redondeo hacia el infinito positivo y negativo, respectivamente):

No aplica el redondeo en función de la “mitad decisiva”, siempre sube o siempre baja. Es un típico ceil / floor, lo cual podemos comprobar con el siguiente código:

Código Delphi [-]
Var
  D1, D2 : Double;
Begin
  D1 := 1.231;

  SetRoundMode (rmUp);
  D2 := RoundTo (D1, -2);
  ShowMessage (FloatToStr (D2));

  D1 := -1.231;

  SetRoundMode (rmDown);
  D2 := RoundTo (D1, -2);
  ShowMessage (FloatToStr (D2));

  D1 := 1.239;

  SetRoundMode (rmDown);
  D2 := RoundTo(D1, -2);
  ShowMessage (FloatToStr (D2));

  D1 := -1.239;

  SetRoundMode (rmUp);
  D2 := RoundTo(D1, -2);
  ShowMessage (FloatToStr (D2));

Ahora mi duda es si todos los tipos de redondeo a los que se refiere el estándar IEEE 754 tienen que ver con los casos donde un número cae en medio y no como RoundTo lo hace.

Al González.

[roman]

¡Oh! Ya veo.

Me parece que Delphi sigue el estándar. La pregunta sería entonces, ¿a quién se le ocurrió este estándar?

// Saludos

[[Al González]]

¡Hola a todos!

Empezado por roman

...La pregunta sería entonces, ¿a quién se le ocurrió este estándar?...

Así es. Borland ya nos debe muchas explicaciones.

Un abrazo estandarizado.

Al González.

[roman]

¿Borland? ¿Por qué Borland? El estándar no es de Borland.

Ahora, si te fijas en el código fuente, parece que lo que Borland hace no es sino mandar una instrucción a la FPU del procesador, de manera que es ésta quien realmente sigue el estándar. El punto es, por algo será. Yo no manejo cuestiones monetarias realmente, pero pienso que en esos ámbitos hay alguna razón de ser de tal estándar.

// Saludos

[[Al González]]

Olvidaba ese punto (lo que hace en el código fuente).

Por los malos resultados, estaba dando por hecho que lo que hace RoundTo no es precisamente seguir el estándar. De hecho todavía tengo mis dudas de qué es lo que realmente especifica el estándar IEEE 754 respecto a las reglas de redondeo de cifras "a la mitad" y "no a la mitad". La referencia que puse a Wikipedia no habla mucho de ello. ¿Alguien conoce un documento más amplio?

Al González.