312def sm121LowerWithField =
313 (lambda unrestricted word : Nat .
314 (lambda unrestricted place : Nat .
315 (lambda unrestricted span : Nat .
316 (lambda unrestricted value : Nat .
317 (nat-add
318 (nat-subtract word (nat-multiply (sm121LowerField word place span) place))
319 (nat-multiply (nat-modulo value span) place))))))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.