`Eq` relies on the established `Bool` type, then can we solve it, if given algebraic effects & handlers, by Church-encoding an effectful Boolean type? e.g.
true === \a b -> a
false === \a b -> b
cmpWithNaN === \a b -> perform ComparingWithNaN
Then (==) and (/=) in `Eq`, together with friends in `Ord` like (>) (<) all return `cmpWithNaN` when at least one NaN is involved.
This mechanism is open so all kinds of anomalies can be handled similarly, otherwise even we have all NaN, Inf, Underflow, Overflow etc. handled well, there must be more situations we haven't thought of.
The infamous `NaN /= NaN` makes only sense for `NaN` originating as aresult, since we cannot compare `NaN`s originating from differentcomputations.But it breaks `Eq` instance laws as needed for property tests.That is why comparison on `NaN` is better handled by `isFinite`,`isANumber` predicates.Note that beside `NaN` we also have other anomalous values, likeUnderflow, Overflow, +inf and -inf.These are all error values, and can hardly be treated in any other way.And they all need to be handled for floating points.Yes, comparing `NaN` with anything should give a rise to another error value.That means that the only way out is making Either Error Float, andthen `(>=) :: Either Error Float -> Either Error Float -> Either ErrorBool`So basically we need to lift all `Num` operations to the `Either Error` Monad.That is probably best way to fix the problem: once error valueappears, we need to treat it consistently throughout entirecomputation.At the same time, we do not want a single error value to dominateentire computation, so that is why we treat collections ofcomputations as computations that give a collection of good resultsand a collection of errors separately.If we take this into consideration, we notice that most interestingcomputations occur on collections of values, and thus yield acollection of results, not just a single output.That is one takeaway from the referenced presentation on dataanalytics in Haskell. (Similar presentation was also well received onData Science Europe. It should be on YouTube by now.)Example of a 3D rotation is instructive: if NaN appears for any singlecoordinate, we can get a useful results for all other coordinates, andthus narrow impact of an error.If the next step is projection on X-Y coordinates, then NaN orOver/Under-flow within Z does not affect the result.To my understanding, that is also the reason why IEEE mandated specialtreatment of error values: most of the computations happen on largematrices, vectors etc, and crashing for each single NaN would be atrue disaster.It can be even ignored, when the NaN is computed for an energycomponent within a single frame of long-running simulation, and theerror disappears within a single time step.-- Cheers MichałOn Wed, Aug 4, 2021 at 4:00 PM YueCompl <compl.yue@icloud.com> wrote:
Thanks Michał,
I feel less confused as I realized the non-halting possibility per bottoms, from your hint.
I too think the signaling NaN is dreadful enough, so fortunately it's rarely seen nowadays.
Actually what's on my mind was roughly something like "Maybe on steroids", I'm aware that NaN semantics breaks `Num` (or descendants) laws, as seen at https://gitlab.haskell.org/ghc/ghc/-/blob/master/libraries/base/GHC/Float.hs
Note that due to the presence of @NaN@, not all elements of 'Float' have an additive inverse.
Also note that due to the presence of -0, Float's 'Num' instance doesn't have an additive identity
Note that due to the presence of @NaN@, not all elements of 'Float' have an multiplicative inverse.
So it should have been another family of `Num` classes, within which, various NaN related semantics can be legal, amongst which I'd think:
* Silent propagation of NaN in arithmetics, like `Maybe` monad does, seems quite acceptable
* Identity test, namely `NaN` /= `NaN` - this lacks theoretical ground or not?
* Comparison, neither `NaN` > 1 nor `NaN` <= 1 - whether or not there's a theoretical framework for this to hold? Maybe `Boolean` type needs enhancement too to do it?
No such family of `Num` classes exists to my aware by now, I just can't help wondering why.
Cheers,
Compl
On 2021-08-04, at 02:38, Michał J Gajda <mjgajda@gmail.com> wrote:
Dear Yue,
Bottom has much weaker semantics than an exception: it means You may never get a result and thus will never handle it!
Another reason is convenience: it is frequently the case that giving NaN in a row of numbers is much more informative than crashing a program with an exception and never printing the result anyway.
Finally IEEE special values have clear propagation semantics: they are basically Maybe on steroids.
The problem with this approach is indeed a silent handling.
But in order to fix this, it is better to add preconditions to specific algorithms that do not allow IEEE special value on input (`isFinite` or `isNotNaN`) and then track the origin of the special value with the methods like those described here: https://skillsmatter.com/skillscasts/14905-agile-functional-data-pipeline-in-haskell-a-case-study-of-multicloud-api-binding
Never throw an error without telling exactly why it happened and exactly where to fix it :-). Using bottom is last resort; exceptions likewise.
--
Cheers
Michał
-- Pozdrawiam Michał