AlphaGitHub
Source/Packages

Std.Float

packages/foundation/standard/src/Std/Float.alpha

655 lines58 declarations25.1 KiBSHA-256 98de1bd43fa8
Download exact fileView at revisionf5034773ad4bb52133

def · lines 645–655

stdF32UnitFromWord32

Full file
645def stdF32UnitFromWord32 =
646  (lambda unrestricted word : (family ModelWord32) .
647    (app
648      (lambda unrestricted significand : (family ModelWord32) .
649        (nat-eliminate
650          (lambda unrestricted current : Nat . (family InferenceFloat32))
651          (stdF32UnitAssemble (stdF32UnitRun significand))
652          (lambda unrestricted predecessor : Nat .
653            (lambda unrestricted induction : (family InferenceFloat32) . stdF32Zero))
654          (stdU32IsZero significand)))
655      (stdU32ShiftRight word (byte-to-nat (byte 8)))))

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.