git.iko.soy/urbit.org
on beeb398 help sign in
urbit.org/docs/programming/reference/library/src/1a/gate/div.md
45 lines 501 B history raw
1### `++div`
3Divide
5Computes `a` divided by `b`.
7Accepts
8-------
10`a` is an atom.
12`b` is an atom.
14Produces
15--------
17An atom.
19Source
20------
22 ++ div :: divide
23 ~/ %div
24 |= [a=@ b=@]
25 ^- @
26 ~| 'div'
27 ?< =(0 b)
28 =+ c=0
29 |-
30 ?: (lth a b) c
31 $(a (sub a b), c +(c))
32 ::
34Examples
35--------
37 ~zod/try=> (div 4 2)
38 2
39 ~zod/try=> (div 17 8)
40 2
41 ~zod/try=> (div 20 30)
42 0
45***