AlphaGitHub
Source/Reference

Float32Model

reference/numeric/Float32Model.alpha

410 lines71 declarations23.3 KiBSHA-256 dd3156cf3c08
Download exact fileView at revisionf5034773ad4bb52133

def · lines 242–254

modelF32FusedMultiplyAdd

Full file
242def modelF32FusedMultiplyAdd =
243  (lambda unrestricted a : Nat . (lambda unrestricted b : Nat . (lambda unrestricted c : Nat .
244    (specSelect (modelOr (modelIsNaN a) (modelOr (modelIsNaN b) (modelIsNaN c)))
245      (specSelect (modelIsNaN a) (modelQuiet a) (specSelect (modelIsNaN b) (modelQuiet b) (modelQuiet c)))
246      (specSelect (modelOr (modelAnd (modelIsInfinite a) (modelIsZero b)) (modelAnd (modelIsZero a) (modelIsInfinite b)))
247        modelDefaultNaN
248        (specSelect (modelOr (modelIsInfinite a) (modelIsInfinite b))
249          (specSelect (modelAnd (modelIsInfinite c) (specNot (specEqual (modelXor (modelSign a) (modelSign b)) (modelSign c))))
250            modelDefaultNaN
251            (modelInfinityOf (modelXor (modelSign a) (modelSign b))))
252          (specSelect (modelIsInfinite c)
253            c
254            (modelFusedFinite a b c))))))))

The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.