1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
|
*View this file with results and syntax highlighting [here](https://mlochbaum.github.io/BQN/spec/primitive.html).*
# Specification: BQN primitives
Most primitives are specified by the BQN-based implementation in [reference.bqn](reference.bqn). This document specifies the basic functionality required by those definitions. Descriptions of other primitives are for informational purposes only.
## Pervasive primitives
Functions in this section are defined for atoms only; the reference implementations extend them to arrays.
### Arithmetic
BQN uses five arithmetic functions that are standard in mathematics. The precision of these operations should be specified by the number [type](types.md).
- **Add** `+`
- **Negate** and **Subtract** `-` invert addition, with `-π©` equivalent to `0-π©`.
- **Multiply** `Γ` generalizes repeated addition.
- **Divide** and **Reciprocal** `Γ·` invert multiplication, with `Γ·π©` equivalent to `1Γ·π©`.
- **Power** `β` generalizes repeated multiplication, and **Exponential** `β` is Power with Euler's number *e* as the base.
The three higher functions `Γ`, `Γ·`, and `β` apply to numbers and no other atomic types. `+` and `-` apply to numbers, and possibly also to characters, according to the rules of the affine character type:
- If one argument to `+` is the character with code point `c` and the other is a number `n` (in either order), then the result is the character with code point `c+n`.
- If the left argument to `-` is the character with code point `c` and the right is a number `n`, the result is the character with code point `c-n`.
- If both arguments to `-` are characters, the result is the difference of their respective code points.
In the first two cases, if the result would not be a valid Unicode code point, then an error results. The remaining cases of `+` and `-` (adding two characters; negating a character or subtracting it from a number) are not allowed.
Additionally, the **Floor** function `β` returns the largest integer smaller than the argument, or the argument itself if it is `Β―β` or `β`. It's needed because the arithmetic operations give no fixed-time way to determine if a value is an integer. Floor gives an error if the argument is an atom other than a number.
### Comparison
Two kinds of comparison are needed to define BQN's primitives: *equality* comparison and *ordered* comparison.
Ordered comparison is simpler and is provided by the dyadic Less than or Equal to (`β€`) function. This function gives an error if either argument is an operation, so it needs to be defined only for numbers and characters. For numbers it is defined by the number system, and for characters it returns `1` if the left argument's code point is less than that of the right argument. Characters are considered greater than numbers, so that `nβ€c` is `1` and `cβ€n` is `0` if `c` is a character and `n` is a number.
The dyadic function `=`, representing equality comparison, can be applied to any two atoms without an error. Roughly speaking, it returns `1` if they are indistinguishable within the language and `0` otherwise. If the two arguments have different types, the result is `0`; if they have the same type, the comparison depends on type:
- Equality of numbers is specified by the number type.
- Characters are equal if they have the same code point.
Operations are split into subtypes depending on how they were created.
- Primitives are equal if they have the same token spelling.
- Derived operations are equal if they are derived by the same rule and each corresponding component is the same.
- Block instances are equal if they are the same instance.
This means that block instance equality indicates identity in the context of mutability: two block instances are equal if any change of state in one would be reflected in the other as well. The concept of identity holds even if the blocks in question have no way of changing or accessing state. For example, `=β{π©β{π©}}Λ@` is `0` while `=Λβ{π©β{π©}}@` is `1`.
## Array functionality
Several subsets of primitives, or dedicated operations, are used to manipulate arrays in the reference implementation.
- `IsArray` returns `1` if the argument is an array and `0` if it's an atom.
The following functions translate between arrays and the two lists that define them: the shape and ravel.
- **Shape** (`β’`) returns the shape of array `π©`, as a list of natural numbers.
- **Deshape** (monadic `β₯`) returns the ravel of array `π©`, that is, the list of its elements.
- **Reshape** (dyadic `β₯`) returns an array with the same ravel as `π©` with shape `π¨`. It can be assumed that `β’π©` and `π¨` have the same product.
The following functions manipulate lists. In these functions, a valid index for list `l` is a natural number less than the length of `l`.
- **Range** gives the list of length `π©` (a natural number) with value `i` at any index `i`.
- **Pick** (`β`) selects the element at index `π¨` from list `π©`.
- `_amend` returns an array identical to list `π©` except that the element at index `π` is changed to `π¨`.
## Inferred functionality
Inferred properties are specified in [their own document](inferred.md), not in the reference implementation.
- `Identity` gives the identity value for reduction by function `π`.
- **Undo** (`βΌ`) gives a partial right inverse for function `π½`.
- `Fill` gives the enclose of the fill value for array `π©`.
## Other provided functionality
- **Assert** (`!`) causes an error if the argument is not `1`. If `π¨` is provided, it gives a message to be associated with this error (which can be any value, not necessarily a string).
## Commentary on other primitives
As noted above, see [reference.bqn](reference.bqn) for the authoritative definitions. Commentary here gives an overall description and highlights implementation subtleties and edge cases.
### Combinators
There's little to say about BQN's true combinators, since each is simply a pattern of function application. All primitive combinators use their operands as functions, and thus treat a data operand as a constant function.
- **Choose** (`βΆ`) is later redefined to use the complete `β` rather than the simple version assumed (using this primitive means it's not a true combinator).
- **Constant** (`Λ`)
- **Valences** (`β`) uses a trick with ambivalent `-` to find out whether there's a left argument, described below.
- **Right** (`β’`)
- **Left** (`β£`)
- **Self**/**Swap** (`Λ`)
- **Atop** (`β`)
- **Over** (`β`)
- **Before**/**Bind** (`βΈ`)
- **After**/**Bind** (`β`)
The somewhat complicated definition of Valences could be replaced with `{π½π©;π¨πΎπ©}` using headers. However, reference.bqn uses a simple subset of BQN's syntax that doesn't include headers. Instead, the definition relies on the fact that `π¨` works like `Β·` if no left argument is given: `(1Λπ¨)-0` is `1-0` or `1` if `π¨` is present and `(1ΛΒ·)-0` otherwise: this reduces to `Β·-0` or `0`.
### Array properties
The reference implementations extend Shape (`β’`) to atoms as well as arrays, in addition to implementing other properties. In all cases, an atom behaves as if it has shape `β¨β©`. The functions in this section never cause an error.
- **Shape** (`β’`) gives the shape of an array or atom.
- **Rank** (`=`) gives the length of the shape.
- **Length** (`β `) gives the number of major cells, or `1` for an argument of rank `0`.
- **Depth** (`β‘`) gives the nesting depth. It ignores the shapes of arrays, and considering only the depths of their elements.
### Arithmetic
Arithmetic functions not already provided are defined in layer 1. These definitions, like the provided functions, apply to atoms only; they should be extended to arrays using the `_perv` modifier from layer 2.
- **Sign** (`Γ`)
- **Square Root** and **Root** (`β`) are defined in terms of Power. If a dedicated implementation is used for square roots, then Power should check for a right argument of `0.5` and use this implementation in order to maintain consistency.
- **Ceiling** (`β`) is like Floor, but rounds up instead of down.
- **Not** (`Β¬`) is a linear extension of logical negation, and **Span** (`Β¬`) adds the left argument.
- **And** (`β§`) and **Or** (`β¨`) are bilinear extensions of the boolean functions.
- **Minimum** (`β`) and **Maximum** (`β`) return the smaller or larger of the arguments, respectively. They are *not required* to be implemented for character arguments, and may give an error if either argument is a character.
- **Absolute Value** (`|`)
- **Modulus** (`|`) is an extension of modular division to real numbers. As it uses floor instead of truncation, it's not the same as the `%` operator from C or other languages when `π¨<0`.
- Comparisons **Less Than** (`<`), **Greater Than** (`>`), **Greater Than or Equal to** (`β₯`), and **Not Equals** (`β `) are defined in terms of the two provided comparisons.
### Iteration modifiers
Modifiers for iteration are defined in layers 1, 2, and 4. Two 2-modifiers, `β` and `β`, use a list of numbers obtained by applying the right operand to the arguments in order to control application. This list has one to three elements: if all three are given then they correspond to the monadic, left, and right arguments; if one is given then it controls all three; and if two are given then they control the left argument, and the right and monadic arguments.
**Table** (`β`) and **Each** (`Β¨`) map over the elements of arrays to produce result elements. They convert atom arguments to unit arrays. With one argument, the two modifiers are the same; with two, they differ in how they pair elements. Table pairs every element of the left argument with every element of the right, giving a result shape `π¨βΎββ’π©`. Each uses leading axis agreement: it requires one argument's shape to be a prefix of the other's (if the arguments have the same rank, then the shapes must match and therefore be mutual prefixes). This causes each element of the lower-rank argument to correspond to a cell of the higher-rank one; it's repeated to pair it with each element of that cell. The result shape is the shape of the higher-rank argument.
**Depth** (`β`) is nearly a generalization of Each: `Β¨` is equivalent to `βΒ―1`, except that `βΒ―1` doesn't enclose its result if all arguments are atoms. The list given by the right operand specifies how deeply to recurse into the arguments. A negative number `-n` means to recurse `n` times *or* until the argument is an atom, while a positive number `n` means to recurse until the argument has depth `n` or less. Recursion continues until all arguments have met the criterion for stopping. This recursion is guaranteed to stop because arrays are immutable, and form an inductive type.
**Rank** (`β`) applies the left operand to cells of the arguments of the specified ranks, forming a result whose cells are the results. **Cells** (`Λ`) is identical to `βΒ―1`, and applies to major cells of the arguments, where a value of rank less than 1 is considered its own major cell. All results must have the same shape, as with elements of the argument to Merge (`>`). The combined result is always an array, but results of the left operand can be atoms: an atom result will be enclosed to give a 0-cell. If a specified rank is a natural number `n`, Rank applies the operand to `n`-cells of the corresponding argument, or the entire argument if it has rank less than or equal to `n`. If instead it's a negative integer `-n`, then an effective rank of `0βk-n` is used, so that the entire argument is used exactly when `k=0`. Thus an atom will always be passed unchanged to the operand; in particular, Rank does not enclose it. Like Each, Rank matches cells of its arguments according to leading axis agreement, so that a cell of one argument might be paired with multiple cells of the other.
**Fold** (`Β΄`), **Insert** (`Λ`), and **Scan** (`` ` ``) repeatedly apply a function between parts of an array. Fold requires the argument to have rank 1 and applies the operand between its elements, while Insert requires it to have rank 1 or more and applies it between the cells. For each of these two functions, the operand is applied beginning at the end of the array, and an [identity](inferred.md#identities) value is returned if the array is empty. While these functions reduce multiple values to a single result, Scan returns many results and preserves the shape of its argument. It requires the argument to have rank at least 1, and applies the function between elements along columnsβthat is, from one element in a major cell to the one in the same position of the next major cell. This application begins at the first major cell of the array. Scan never uses the identity element of its operand because if the argument is empty then the result, which has the same shape, will be empty as well.
**Repeat** (`β`) applies the operand function, or its [inverse](inferred.md#undo), several times in sequence. The right operand must consist only of integer atoms (arranged in arrays of any depth), and each number there is replaced with the application of the left operand that many times to the arguments. If a left argument is present, then it's reused each time, as if it were bound to the operand function. For a negative number `-n`, the function is "applied" `-n` times by undoing it `n` times. In both directions, the total number of times the function is applied is the maximum of all numbers present: results must be saved if intermediate values are needed.
### Restructuring
**Enclose** (`<`) forms a unit array that contains its argument.
**Merge** (`>`) combines the outer axes of an array of arrays with inner axes: it requires that all elements of its argument have the same shape, and creates an array such that `(iβΎj)β>π©` is `iβjβπ©`. It also accepts atom elements of `π©`, converting them to unit arrays, or an atom argument, which is returned unchanged. **Solo** and **Couple** (`β`) turn one or two arguments into major cells of the result and can be defined easily in terms of Merge.
**Join To** (`βΎ`) combines its two arguments along an existing initial axis, unless both arguments are units, in which case it creates an axis and is identical to Couple (`β`). The arguments must differ in rank by at most 1, and the result rank is equal to the maximum of 1 and the higher argument rank. Each argument with rank less than the result, and each major cell of an argument with rank equal to it, becomes a major cell of the result, with cells from the left argument placed before those from the right. **Join** (`βΎ`) generalizes the equal-rank subset of this behavior to an array of values instead of just two. The argument must be an array (unlike Merge), and its elements must all the same rank, which is at least the argument rank. Atom elements are treated as unit arrays. Then "outer" argument axes are matched up with leading "inner" element axes, and elements are joined along these axes. In order to allow this, the length of an element along a particular axis must depend only on the position along the corresponding axis in the argument. An empty argument to Join is return unchanged, as though the element rank is equal to the argument rank.
**Deshape** (`β₯`) differs from the provided function (which returns the element list of an array) only in that it accepts an atom, returning a one-element list containing it. **Reshape** (`β₯`) is extended in numerous ways. It accepts any list of natural numbers (including as a unit array or atom) for the left argument and any right argument; `π©` is deshaped first so that it is treated as a list of elements. These elements are repeated cyclically to fill the result array in ravel order. If `π©` is empty but the result is not, then the result consists of fill elements for `π©`. Furthermore, at most one element of `π¨` can be a "length code": one of the primitives `βββ½β`. In this case, a target length is computed from the number of elements in `π©` divided by the product of the other elements of `π¨` (which must not be zero). If the target length is an integer then it is used directly for the length code. Otherwise, an error is given if the length code is `β`, and the target length is rounded down if the code is `β` and up if it's `β½` or `β`. With code `β½`, elements are repeated cyclically as usual, but with code `β`, the extra elements after each argument element is used are fill values for `π©`.
**Transpose** (`β`) reorders axes of its argument to place the first axis last; if the argument has one or fewer axes then it's returned unchanged. **Reorder Axes** (`β`) requires the left argument to be a list or unit of natural numbers, with length at most the rank of the right argument. This list is extended to match the right argument rank exactly by repeatedly appending the least unused natural number (for example, given `1βΏ3βΏ0βΏ0`, `2` is appended). After extension, it specifies a result axis for each axis of the right argument. There must be no gaps in the list: that is, with the result rank equal to one plus the greatest value present, every result axis must appear at least once. Now each argument axis is "sent to" the specified result axis: in terms of indices, `iβπ¨βπ©` is `(π¨βi)βπ©` if `π¨` is complete. If multiple argument axes correspond to the same result axis, then a diagonal is taken, and it's as long as the shortest of those argument axes. While Transpose does not enclose an atom right argument, Reorder Axes does, so that its result is always an array.
### Indices and selection
Each element in an array `sβ₯e` is associated with an *index*, which is a list of natural numbers `i` such that `β§Β΄i<s`. The list of all indices, which corresponds to the element list `e`, contains all such lists `i` in lexicographic order. That is, index `i` comes before `j` exactly when the two indices are not the same, and `i` has the smaller value at the first position where they are unequal. The index of an element along a particular axis `a` is the value `aβi`.
**Pick** (`β`) is extended to array left arguments. In this case, it requires every depth-1 array in the nested structure of `π¨` to be a valid index list for `π©`, and every atom to be contained in one of these lists. The result is `π¨` with each index list replaced by the element of `π©` at that index. In the simple case where `π¨` itself is an index list, the result is the element of `π©` at index `π¨`.
**First** (`β`) simply takes the first element of its argument in index order, or the fill element if `π©` is empty.
For **Select** (`β`), `π¨` is an array of natural numbers, or a list of such arrays; if it's an empty list, it's interpreted as the former. The given arrays are matched with leading axes of `π©` and used to select from those axes. Their shape is retained, so that the final shape is the combined shapes of each array of natural numbers in `π¨` in order, followed by the trailing (unmatched) shape of `π©`. This means that a single axis in `π©` can correspond to any number of axes in `π¨βπ©`, depending on the rank of that portion of `π¨`. More precisely, the value of the result at an index `j` is obtained by splitting `j` into one index into each array of `π¨` followed by a partial index into `π©`. An index `i` for `π©` comes from selecting from each array of `π¨` and appending the results to the partial index from `j`, and the value `iβπ©` is `jβπ¨βπ©`.
**First Cell** (`β`) selects the initial major cell of `π©`, giving an error if `π©` has rank 0 or length 0.
**Group** (`β`) performs an opposite operation to Select, so that `π¨` specifies not the argument index that result values come from, but the result index that argument values go to. The result rank is `β π¨`, and each result element has rank `1+(=π©)-+Β΄=Β¨π¨`. The result element contains the minimal list of cells so that each cell of `π©` appears in the corresponding element of `π¨βπ¨βπ©`, in index order. **Group Indices** treats its argument `π©` as a left argument for Group and uses a right argument made up of indices, with the definition `ββ(ββ β1)`.
**Range** (`β`) is extended to apply to a list of natural numbers, in addition to the provided case of a single natural number (an enclosed natural number `π©` should still result in an error). For a list `π©`, the result is an array of shape `π©` in which the value at a given index is that index, as a list of natural numbers. That is, `iβ‘iββπ©` for any list of natural numbers `i` with `β§Β΄i<π©`.
### Searching
**Match** (`β‘`) indicates whether two values are considered equivalent. It always returns 0 or 1, and never causes an error. If both arguments are atoms then it is identical to `=`, and if one is an atom and the other an array then it returns 0. If both arguments are arrays then it returns 1 only if they have the same shape and all pairs of corresponding elements match. Fill elements aren't taken into account, so that arrays that match might still differ in behavior. **Not Match** simply returns the complement of Match, `Β¬β‘`.
Monadic search functions compare the major cells of `π©` to each other. `π©` must have rank at least 1. Except for Deduplicate (`β·`), the result is a list of numbers with the same length as `π©`.
- **Mark Firsts** (`β`) returns 1 for a cell if it doesn't match any earlier cell and 0 if it does.
- **Deduplicate** (`β·`) filters major cells to remove duplicates, retaining the ordering given by the first appearance of each unique cell.
- **Classify** (`β`) returns, for each cell, the smallest index of a cell that matches it (it's necessarily less than or equal to `ββ π©` element-wise, since each cell matches itself).
- **Occurrence Count** (`β`) returns the number of earlier cells matching each cell.
Dyadic search functions check whether major cells of the *principal argument* (which must have rank at least 1) match cells of the *non-principal argument* of the same rank. The rank of the non-principal argument can't be less than the major cell rank (rank minus one) of the principal argument. However, the non-principal argument can be an atom, in which case it will be automatically enclosed. The principal argument is `π¨` for `β` and `β` and `π©` for `β`. The result is an array containing one number for each cell of the non-principal argument. The value of this number depends on the function:
- **Member of** (`β`) indicates whether any cell of the principal argument matches the cell in question.
- **Index of** (`β`) gives the smallest index of a principal argument cell that matches the cell, or `β π¨` if there is no such cell.
- **Progressive Index of** (`β`) processes non-principal cells in ravel order, and gives the smallest index of a principal argument cell that matches the cell that hasn't already been included in the result. Again `β π¨` is returned for a given cell if there is no valid cell.
**Find** (`β·`) indicates positions where `π¨` appears as a contiguous subarray of a `=π¨`-cell of `π©`. It has one result element for each such subarray of `π©`, whose value is 1 if that subarray matches `π©` and 0 otherwise.
### Sorting
Sorting functions are those that depend on BQN's array ordering. There are three kinds of sorting function, with two functions of each kind: one with an upward-pointing glyph that uses an ascending ordering (these function names are suffixed with "Up"), and one with a downward-pointing glyph and the reverse, descending, ordering ("Down"). Below, these three kinds of function are described, then the ordering rules. Except for the right argument of Bins, all arguments must have rank at least 1.
**Sort** (`β§β¨`) reorders the major cells of its argument so that a major cell with a lower index comes earlier in the ordering than a major cell with a higher index, or matches it.
**Grade** (`ββ`) returns a permutation describing the way the argument array would be sorted. For this reason the reference implementations simply define Sort to be selection by the grade. One way to define Grade is as a sorted version of the index list `ββ π©`. An index `i` is ordered according to the corresponding major cell `iβπ©`. However, ties in the ordering are broken by ordering the index values themselves, so that no two indices are ever considered equal, and the result of sorting is well-defined (for Sort this is not an issueβmatching cells are truly interchangeable). This property means that a stable sorting algorithm must be used to implement Grade functions. While cells might be ordered ascending or descending, indices are always ordered ascending, so that for example index `i` is placed before index `j` if either `iβπ©` comes earlier in the ordering than `jβπ©`, or if they match and `i<j`.
**Bins** (`ββ`) requires the `π¨` to be ordered in the sense of Sort (with the same direction). Like a dyadic search function, it then works on cells of `π©` with the same rank as major cells of `π¨`: the rank of `π©` cannot be less than `(=π¨)-1`. For each of these, it identifies where in the ordering given by `π¨` the cell belongs, that is, the index of the first cell in `π¨` that is ordered later than it, or `β π¨` if no such cell exists. An equivalent formulation is that the result value for a cell of `π©` is the number of major cells in `π¨` that match or precede it.
BQN's *array ordering* is an extension of the number and character ordering given by `β€` to arrays. In this system, any two arrays consisting of only numbers and characters for atoms can be compared with each other. Furthermore, some arrays that contain incomparable atoms (operations) might be comparable, if the result of the comparison can be decided before reaching these atoms. Array ordering does not depend on the fill elements for the two arguments.
Here we define the array ordering using the terms "smaller" and "larger". For functions `β§β`, "earlier" means "smaller" and "later" means "larger", while `β¨β` use the opposite definition, reversing the ordering.
To compare two arrays, BQN first attempts to compare elements at corresponding indices, where two indices are considered to correspond if one is a suffix of the other. Elements are accessed in ravel order, that is, beginning at the all-zero index and first increasing the final number in the index, then the second-to-last, and so on. They are compared, using array comparison if necessary, until a non-matching pair of elements is foundβin this case the ordering of this pair determines the ordering of the arraysβor one array has an index with no corresponding index in the other array. For example, comparing `4βΏ3βΏ2β₯1` with `2βΏ5β₯1` stops when index `0βΏ2` in `2βΏ5β₯1` is reached, because the corresponding index `0βΏ0βΏ2` is out of range. The index `0βΏ2βΏ0` in the other array also has no corresponding index, but comes later in the index ordering. In this case, the array that lacks the index in question is considered smaller.
If two arrays have the same shape (ignoring leading `1`s) and all matching elements, or if they are both empty, then the element-by-element comparison will not find any differences. In this case, the arrays are compared first by rank, with the higher-rank array considered larger, and then by shape, beginning with the leading axes.
To compare two atoms, array ordering uses `β€`: if `π¨β€π©` then `π¨` matches `π©` if `π©β€π¨` and otherwise is smaller than `π©` (and `π©` is larger than `π¨`). To compare an atom to an array, the atom is promoted to an array by enclosing it; however, if the enclosed atom matches the array then the atom is considered smaller.
|