on 492ae2f help sign in
41 lines 441 B history raw
1### `++min`
3Minimum
5Computes the lesser of `a` and `b`.
7Accepts
8-------
10`a` is an atom.
12`b` is an atom.
14Produces
15--------
17An atom.
19Source
20------
22 ++ min :: minimum
23 ~/ %min
24 |= {a/@ b/@}
25 ^- @
26 ?: (lth a b) a
27 b
29Examples
30--------
32 ~zod/try=> (min 10 100)
33 10
34 ~zod/try=> (min 10.443 9)
35 9
36 ~zod/try=> (min 0 1)
37 0
41***