ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2025-01-07 07:30:23 +03:00
Code Issues Packages Projects Releases Wiki Activity

Change bunt of products/divisions to be 1-based

Browse Source
This commit is contained in:
Raymond Pasco 2015-08-09 12:21:42 -04:00
parent b5386a582e
commit 1c46348b14
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
arvo/hoon.hoon
View File

@ -474,7 +474,7 @@
::
++ div :: divide
~/ %div
|= [a=@ b=@]
|= [a=_`@`1 b=_`@`1]
^- @
~| 'div'
?< =(0 b)
@ -545,14 +545,14 @@
::
++ mod :: remainder
~/ %mod
|= [a=@ b=@]
|= [a=_`@`1 b=_`@`1]
^- @
?< =(0 b)
(sub a (mul b (div a b)))
::
++ mul :: multiply
~/ %mul
|= [a=@ b=@]
|= [a=_`@`1 b=_`@`1]
^- @
=+ c=0
|-