In BQN, a block is any piece of code surrounded with curly braces {}
. Blocks can be used simply to group statements, or can define functions or modifiers. They are the sole large-scale structure used to organize programs. One organizing tool not discussed here is namespaces, which are created with blocks but have their own page. Programming without blocks (only recommended at the small scale) is called tacit programming.
Blocks are most commonly used to define functions by including one of the special names for arguments, π¨
or π©
. With the operands π½
or πΎ
, they can also define 1-modifiers or 2-modifiers.
{π©+1} 3 4 Γ{π©π½π©} 4 16
A block header is written before a :
and describes the block type, and what inputs it accepts. A block can be split into multiple bodies using ;
s, so that each handles different cases. A predicate, written with ?
, can test an arbitrary condition to refine these cases.
Because they use lexical scoping, blocks also encapsulate code. If a block uses only variables that it initializes, then it has no dependence on its environment and would work the same way if defined anywhere. But it can also use external variables, defined in a containing block.
βοΈaβbβ"outer" { aβ"inner" β aβΏb } β¨ "inner" "outer" β©
In the simplest case a block is just a list of statements, which are executed to evaluate the block. A block with no special names like π¨
or π©
is called an immediate block, and is evaluated as soon as it is reached. The only thing such a block does is group some statements, and create a scope for them so that definitions made there are discarded when the block finishes. Even this small amount of functionality could be useful; as an example the following program can build up an array from named components without polluting the rest of the program with those names.
updown β { up β β5 down β β½up upβΎdown } updown β¨ 0 1 2 3 4 4 3 2 1 0 β©
An immediate block is only ever evaluated once, and can't be used for control flow in a program. Special names can be used to define functions and modifiers, which have a broader range of uses. All special names are listed below:
Lowercase | Uppercase | Meaning |
---|---|---|
π© |
π |
Right argument |
π¨ |
π |
Left argument, or Nothing (Β· ) |
π€ |
π |
Function self-reference |
π |
π½ |
Left operand |
π |
πΎ |
Right operand |
π£ |
none | Modifier self-reference |
Most special names have a lowercase form for a subject role and uppercase for a function role. But π£
is sort of a "more special" character, as we'll discuss below. The special names other than π£
are single characters that don't attach to other letters, allowing π½π©
or π_m
to work without spaces; π£
is always modifier-valued, so it ought to attach to underscores.
The names π¨
and π©
, and their uppercase spellings, represent function arguments. As the argument to a function is typically data, it's more common to use the lowercase forms for these. Having either of these names turns an immediate block into a function (or an immediate modifier into a deferred one; see the next section). Instead of being evaluated as soon as it appears in the source, a function is evaluated when it's called, with the special names set to appropriate values. Their values can be changed like ordinary variables.
{'c'=π©} "abcd" β¨ 0 0 1 0 β© { π©+β©2 β 0βπ© } 3 β¨ 0 5 β© 4 { β¨π©,-π¨β© } 5 β¨ 5 Β―4 β©
A function with π¨
in its definition doesn't have to be called with two arguments. If it has only one, then π¨
is given the special value Nothing, or Β·
. This is the only time a variable can ever be Nothing, as an assignment such as vβΒ·
is not allowed.
3 { (2Γπ¨)-π© } 1 5 { (2Γπ¨)-π© } 1 Β―1
In the second function, π¨
behaves just like Β·
, so that the function 2Γπ¨
is not evaluated and -
doesn't have a left argument. It has a similar effect when used as the left argument to a function in a train.
"abc" { (π¨ββ½) π© } "def" ββ β΅"abc fed" β { (π¨ββ½) π© } "def" ββ β΅"fed" β
However, Β·
can only be used as an argument, and not a list element or operand. Don't use π¨
in these ways in a function that could be called monadically. Another potential issue is that βΈ
and β
don't work the way you might expect.
{ π¨ ββΈ- π© } 5 143.4131591025766
Called dyadically, this function will expand to (βπ¨)-π©
, so we might expect the monadic result to be -π©
. This sort of expansion isn't right with Β·
on the left. ββΈ-
taken as a whole is a function, so Β· ββΈ- π©
is just ββΈ- π©
, or (βπ©)-π©
, giving the large result seen above.
The special names π½
and πΎ
, and their lowercase forms, represent operands. Since operands are more often functions, they're typically shown with the uppercase spelling. If π½
is present in a block then it defines a 1-modifier or 2-modifier depending on whether πΎ
is present; if πΎ
is there it's always a 2-modifier.
4 {ΓΛπ} 16 2 {π+π} 3 5
As shown above, modifiers without π¨
, π©
, or π€
behave essentially like functions with a higher precedence. These immediate modifiers take operands and return a result of any type. The result is given a function role, so it's most common to return a function, rather than a number as shown above.
_dot_ β {π½Β΄βπΎ} 1βΏ2βΏ3 +_dot_Γ 1βΏ0βΏ1 4
However, if one of these names is included, then a deferred modifier is created instead: rather than evaluate the contents when the modifier is called, the operands are bound to it to create a derived function. When this function is called, the statements in the block are evaluated.
βοΈ+{π©π½π©} 6 12 2 β₯{β¨π½π¨,πΎπ©β©}- 5 β¨ β¨ 2 β© Β―5 β©
The distinction between an immediate and deferred modifier only matters inside the braces. Once defined, the object is simply a modifier that can be called on operands to return a result. For a deferred modifier this result will always be a function; for an immediate modifier it could be anything.
If a block is assigned a name after it's created, this name can be used for recursion:
βοΈFact β { π© Γ (0βΈ<)βΆ1βΏFact π©-1 } Fact 7 5040 (ΓΒ΄1+β) 7 # There's often a simpler solution than recursion 5040
This is somewhat unsatisfying because the name is external to the function being defined, but the definition shouldn't depend on outside information. Instead, the special name π
can be used to refer to the function it appears in. This allows anonymous recursive functions to be defined.
{ π© Γ (0βΈ<)βΆ1βΏπ π©-1 } 7 5040
For modifiers, π£
refers to the containing modifier. π
makes the modifier a deferred modifier like π¨
and π©
do, and refers to the derived function. For example, this tail-recursive factorial function uses the operand to accumulate a result, a task that's usually done with a second factorial_helper
function in elementary Scheme (BQN doesn't optimize tail recursion though; it's just shown here as an example).
Fact_mod β 1 { (0βΈ<)βΆβ¨π, (πΓπ©)_π£β© π©-1 } Fact_mod 7 5040
Because π£
only ever refers to a 1-modifier or 2-modifer, it can never make sense to refer to it as a function, and the uppercase letter β
is not recognized by BQN. To allow π£
to be spelled as a 1-modifier _π£
or 2-modifier _π£_
, it's tokenized as an ordinary identifier character, so it has to be separated from adjacent letters or numbers with a space.
As a program becomes larger, it often becomes necessary to name inputs to blocks rather than just using special names. It can also become difficult to identify what kind of block is being defined, as it requires scanning through the block for special names. A block header, which is separated from the body of a block by a colon :
, specifies the kind of block and can declare names for the block and its inputs.
Fact_head β { F n: n Γ (0βΈ<)βΆ1βΏF n-1 } Fact_head 7 5040
Its syntax mirrors an application of the block. As suggested by the positioning, the names given in a header apply only inside the block: for example F
above is only defined inside the {}
braces while Fact
could be used either outside or inside. Some other possibilites are given below.
# A dyadic function that refers to itself as Func { l Func r: β¦ # A deferred 1-modifier with a list argument { Fn _apply β¨a,bβ©: β¦ # A monadic function with no names given { ππ©: β¦ # An immediate 2-modifier with some destructuring { F _op_ Β·βΏval: β¦
In all cases special names still work just like in a headerless function. In this respect, the effect of the header is the same as a series of assignments at the beginning of a function, such as the following translation of the second header above:
{ # Fn _apply β¨a,bβ©: Fn β π½ _apply β _π£ β¨a,bβ© β π© β¦
Unlike these assignments, the header also constrains what inputs the block can take: a monadic 1-modifier like the one above can't take a right operand or left argument, so its body can't contain πΎ
or π¨
. Calling it with a left argument, or a right argument that isn't a two-element list, will result in an error.
Arguments and operands allow destructuring like assignment does. While assignment only tolerates lists of variables, header destructuring also allows constants. For the header to match, the argument must share the given structure, including the constants where they appear.
βοΈDestruct β { π aβΏ1βΏβ¨b,Β·,2β©: aβb } Destruct 5βΏ1βΏβ¨7,Ο,2β© β¨ 5 7 β©
It's also worth noting here that []
is a valid destructuring target, matching any length-0 array, even though it can't be used as a value since it's ambiguous. This syntax is also allowed in regular destructuring, but it's not very useful in that case.
Any element of a function or modifier header can be left nameless by using the corresponding special name in that position, instead of an identifier. For example, the header π¨ π½_π£_πΎ π©:
incorporates as much vagueness as possible. It indicates a deferred 2-modifier, but provides no other information.
The name π¨
in this context can refer to either a left argument or no left argument, allowing a header with arguments to be used even for an ambiguous function. Recall that π¨
is the only token other than Β·
that can have no value. If an identifier or list is given as the left argument, then the function must be called with a left argument.
If a header consists of π
with one argument, like π aβΏb:
or ππ©:
, the π
can be left off. See case headers below for examples. The exception is if the argument is a plain name, as in π arg:
, because the header arg:
is a label for an immediate block as described in the next section.
A header can also be a plain name with no inputs, called a label. A label specifies the type of the block and gives an internal name that can be used to refer to it, but doesn't specify the inputs.
{ b: # Block { π: # Function { _π£: # 1-Modifier { _π£_: # 2-Modifier
For immediate blocks, this is the only type of header possible, and it must use an identifier as there's no applicable special name. However, the name can't be used in code: it doesn't make sense to refer to a value while it's still being computed!
Blocks can include more than one body, separated by semicolons ;
. The body used for a particular evaluation is chosen based on the inputs to the block. One special case is that functions and deferred modifiers can have two headerless bodies (that is, no headers or predicates): the first applies when there's one argument and the second when there are two.
Ambiv β { β¨1,π©β© ; β¨2,π¨,π©β© } Ambiv 'a' β¨ 1 'a' β© 'a' Ambiv 'b' β¨ 2 'a' 'b' β©
Bodies with headers come before any that don't have them. When a block is called, its headers are checked in order for compatibility with the arguments, and the first body with a compatible header is used.
βοΈCaseAdd β { 2π3: 0βΏ5 ; 2ππ©: β¨1,2+π©β© ; ππ©: 2βΏπ© } 2 CaseAdd 3 β¨ 0 5 β© 2 CaseAdd 4 β¨ 1 6 β© CaseAdd 4 β¨ 2 4 β©
If no header is compatible, the call results in an error.
βοΈ3 CaseAdd 3 Error: No header matched arguments
The optional π
rule makes for convenient case-matching syntax in one-argument functions.
Test β { "abc": "string" ; β¨2,bβ©: β½π© ; 5: "number" ; π©: "default" } Test 5 "number"
These case-style headers function exactly the same as if they were preceded by π
, and can be mixed with other kinds of headers.
Destructuring with a header is limited, as it can only match a particular structure or value exactlyβnot, for example, a range of lengths. A predicate, written with ?
, allows you to test an arbitrary property before evaluating the rest of the body, and also serves as a limited kind of control flow. It can be thought of as an extension to a header. So the following function requires the argument to have two elements and for the first to be less than the second before using the first body. Otherwise it moves to the next body, which is unconditional.
CheckPair β { πβ¨a,bβ©: a<b? "ok" ; "not ok" } CheckPair β¨3,8β© # Succeeds in destructuring "ok" CheckPair β¨1,4,5β© # Not a pair "not ok" CheckPair β¨3,Β―1β© # Not ascending "not ok"
The body where the predicate appears doesn't need to start with a header, and there can be other statements before it. Really, ?
works just like a separator (like β
or ,
) with a side effect.
{ rββ½π© β 't'=βr ? r ; π© }Β¨ "test"βΏ"this" β¨ "tset" "this" β©
So r
is the reversed argument, and if its first character (the last one in π©
) is 't'
then it returns r
, and otherwise we abandon that line of reasoning and return π©
.
This sounds a lot like an if statement. And { a<b ? a ; b }
, which computes aβb
the hard way, shows how the syntax can be similar to a ternary operator. This is an immediate block with multiple bodies, something that makes sense with predicates but not headers. But ?;
offers more possibilities. It can support any number of options, with multiple tests for each oneβthe structure below is "if _ and _ then _; else if _ then _; else _".
Thing β { π©β₯3? π©β€8? 2|π© ; π©=0? @ ; β } (β’ β ThingΒ¨) β10 # Table of arguments and results ββ β΅ 0 1 2 3 4 5 6 7 8 9 @ β β 1 0 1 0 1 0 β β
This structure is still controlled by the rules of block bodies: each instance of ;
is a separate scope, so that variables defined before a ?
don't survive past the ;
.
{ 0=nββ π© ? β ; n } "abc" Error: Undefined identifier
This is the main drawback of predicates relative to guards in APL dfns (also written with ?
), while the advantage is that it allows multiple expressions, or extra conditions, after a ?
. It's not how I would have designed it if I just wanted to make a syntax for if statements, but it's a natural fit for the header system.