AlphaGitHub
Source/Packages

Model.Word32

packages/foundation/standard/src/Model/Word32.alpha

492 lines41 declarations17.0 KiBSHA-256 eb985612415b
Download exact fileView at revisionf5034773ad4bb52133

def · lines 264–278

modelWord32MultiplyStateRun

Full file
264def modelWord32MultiplyStateRun =
265  (lambda unrestricted left : (family ModelWord32) .
266    (lambda unrestricted right : (family ModelWord32) .
267      (nat-eliminate
268        (lambda unrestricted current : Nat . (family ModelWord32MultiplyState))
269        (constructor
270          ModelWord32MultiplyState
271          ModelWord32MultiplyStateValue
272          left
273          right
274          modelWord32Zero)
275        (lambda unrestricted predecessor : Nat .
276          (lambda unrestricted induction : (family ModelWord32MultiplyState) .
277            (modelWord32MultiplyStep induction)))
278        modelWord32NaturalThirtyTwo)))

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.