AlphaGitHub
Source/Packages

Learning.Numerics

packages/learning/src/Learning/Numerics.alpha

407 lines49 declarations15.7 KiBSHA-256 9d9e1eb74906
Download exact fileView at revisionbcc11a4e7647d31628

def · lines 167–182

numericalOperationBytes

Full file
167def numericalOperationBytes =
168  (lambda unrestricted operations : (family StdList (family StdNumericOperation)) .
169    (bytes-append
170      (stdNumericWord (stdListLength (family StdNumericOperation) operations))
171      (eliminate
172        StdList
173        (lambda unrestricted current : (family StdList (family StdNumericOperation)) . Bytes)
174        operations
175        (branch StdListEmpty . b"")
176        (branch
177          StdListCons
178          head
179          tail
180          induction
181          .
182          (bytes-append (stdNumericWord (stdOperationCode head)) induction)))))

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.