# Beta Reduction (Part 1)

::

The λ-calculus is often introduced by showing how to build a real programming language from it’s simple syntactic forms. In this series of post, I attempt to introduce it as a tool for modeling semantics. So if you’re opening Barendregt for the first time, trying to understand a lecture from a programming languages or functional programming class, or just starting to become involved in PL research, I hope this post will help you understand evaluation by substitution (β-reduction).

# Introduction

This post is aimed at myself around 18 months ago. At the time, I had spent a fair amount of time programming, taken a functional programming class, and been introduced to the λ-calculus. Despite that, I didn’t really understand how the λ-calculus was really used in PL research and how it really worked. When I was asked to prove a novel theorem about β-reduction, I really struggled. I spent a lot of time looking online for an explanation of the proofs I could understand. This series of posts is my attempt to rectify that.

This first post briefly introduces the λ-calculus and explains β-reduction through a formally defined semantics and examples in Racket, OCaml, and Haskell. My goal in this post is to develop an intuition about what β-reduction is and how it works. In a followup post, I’ll explain how to prove that β-reduction is confluent.

# The λ-Calculus

The λ-calculus is a simple model of computation developed by Alonzo Church. The λ-calculus has three different syntactic forms: variables, anonymous functions (lambdas), and function application. The BNF for the λ-calculus is as follows:

e ::= x
| λx.e
| e e

In the above BNF, x is a metavariable, standing for any variable. In this post, I use x, y, z, a, and b as variables in my examples. The λx.e term represents a function with a single parameter x. We say that the parameter, x is bound in e. It is possible to have unbound variables in the λ-calculus, though for the most part, we can ignore them in our discussion of this topic. Finally, applications consist of two expressions. The first expression is the function and the second is its argument. Parenthesis are often added for clarity.

If you program regularly in a functional language, this might look fairly familiar to you. In fact, you can compute anything in the λ-calculus that you can in any other language. In other words, the λ-calculus is Turing complete. Of course, you wouldn’t want to program in this language as it’s significantly harder to encode some of these constructs than just using built in language constructs like numbers. I’m not going to discuss these ideas in detail, but if you’re interested in how to add numbers, booleans, conditionals, and recursion to the λ-calculus, Matt Might has a few great posts about how to do this using equivalent constructs in Python, Scheme, and JavaScript.

Now that we’ve discussed the syntax of the language, we can look at the semantics, or how terms evaluate. Below I have the evaluation rules for the λ-calculus. The arrow represents β-reduction which is the subject of this post. The semantics rely on substitution which is depicted with brackets. I have also defined the substitution function. I’m assuming the Barendregt variable convention (2.6) which states that every bound variable is distinct from every free variable.

x[ x := e ] = e
y[ x := e ] = y
(λx.e1)[ x := e2 ] = (λx.e1[ x := e2 ])
(e1 e2)[ x := e3 ] = (e1[ x := e3 ] e2[ x := e3 ])

With the substitution function defined, we can write a semantics for evaluation:

------------------------------
(λx.e1) e2 ->β e1[ x := e2 ]

e1 ->β e1'
--------------------
e1 e2 ->β e1' e2

e2 ->β e2
--------------------
e1 e2 ->β e1 e2'

These rules mean that if you have a term in which you have a function applied to an argument, you substitute the argument into the function. The next two rules say that if you can apply an evaluation rule to either the first or second subterm, you may do so. Notice that both the second and third rules might apply to a single term. These rules are nondeterministic and in these cases it is fine to use whichever rule you want (see below).

# What is β-reduction?

More generally, what is reduction? Reduction is a model for computation that consists of a set of rules that determine how a term is stepped forwards. β-reduction is reduction by function application. When you β-reduce, you remove the λ from the function and substitute the argument for the function’s parameter in its body. More formally, we can define β-reduction as follows:

(λx.e1) e2 = e1[ x := e2 ]

Given that definition, lets look at a few examples. I’ve written the examples in the λ-calculus, Racket, OCaml, and Haskell. It’s important to note that these languages have more restricted semantics than the original λ-calculus. These restrictions are called reduction strategies. In Racket and OCaml, it is not possible to substitute with anything except for a value, meaning you need to evaluate the argument until it is a function before substituting. This makes the evaluation reduce left to right before substituting. This restriction is called “call by value”. In Haskell, no reduction occurs in arguments, meaning that we would omit the third rule. This could potentially require an expression to be evaluated multiple times. In reality, Haskell caches the results of these evaluations so each expression is only evaluated once, but I’m going to ignore that here. This presentation of Haskell’s semantics is called “call by name” and the optimization is called “call by need”. (For more details on lazy evaluation, I recommend: Chang and Felleisen, ESOP 2012.)

# Some Examples

The first example evaluates the same way in all of the languages.

    (λx.x) (λy.y)
->β x[ x := (λy.y) ]
=   (λy.y)
 1 2 3  ((λ (x) x) (λ (y) y)) ->β x[ x := (λ (y) y) ] = (λ (y) y) 
 1 2 3  (fun x -> x) (fun y -> y) ->β x[x := (fun y -> y) ] = x[x := (fun y -> y) ] 
 1 2 3  (\x -> x) (\y -> y) ->β x[ x := (\y -> y) ] = (\y -> y) 

In our next example, we will see the differences between the languages. They all reduce to the same thing, albeit in different ways.

 1 2 3  (\x -> \y -> y) ((\z -> z) (\a -> a)) ->β (\y -> y)[x := ((\z -> z) (\a -> a))] = (\y -> y) 

Note that the application on the right hand side is never evaluated. In an eager language like Racket or OCaml, the term being substituted must be a value, so the evaluation follows a different path.

 1 2 3 4 5  ((λ (x) (λ (y) y)) ((λ (z) z) (λ (a) a))) ->β ((λ (x) (λ (y) y)) (z[ z := (λ (a) a) ])) = ((λ (x) (λ (y) y)) (λ (a) a)) ->β (λ (y) y)[ x := (λ (a) a) ] = (λ (y) y) 
 1 2 3 4 5  (fun x -> (fun y -> y)) ((fun z -> z) (fun a -> a)) ->β (fun x -> (fun y -> y)) (z[ z := (fun a -> a) ]) = (fun x -> (fun y -> y)) (fun a -> a) ->β (fun y -> y)[ x := (fun a -> a) ] = (fun y -> y) 

The nondeterministic semantics of the λ-calculus lead to two possible paths through the above computation:

    (λx.λy.y) ((λz.z) (λa.a))
->β (λx.λy.y) (z[ z := (λa.a) ])
=   (λx.λy.y) (λa.a)
->β (λy.y)[ x := (λa.a) ]
=   (λy.y)
    (λx.λy.y) ((λz.z) (λa.a))
->β (λy.y)[ x := ((λz.z) (λa.a)) ]
=   (λy.y)

Lets look at a final example. This one is more complicated than the previous ones. I’m also going to stop showing the substitution explicitly. In the literature, it is fairly common not to see it explicitly, but you should still be able to follow what’s going on.

 1 2 3 4 5  ((λ (x) x) (((λ (a) (λ (b) (a b))) (λ (y) y)) (λ (z) z))) ->β ((λ (x) x) ((λ (b) ((λ (y) y) b)) (λ (z) z))) ->β ((λ (x) x) ((λ (y) y) (λ (z) z))) ->β ((λ (x) x) (λ (z) z)) ->β (λ (z) z) 

The same thing happens in OCaml

 1 2 3 4 5  (fun x -> x) ((fun a -> (fun b -> a b)) (fun y -> y) (fun z -> z));; ->β (fun x -> x) ((fun b -> (fun y -> y) b) (fun z -> z));; ->β (fun x -> x) ((fun y -> y) (fun z -> z)) ->β (fun x -> x) (fun z -> z) ->β (fun z -> z) 

In Haskell, the situation is a little different:

 1 2 3 4 5  (\x -> x) ((\a -> \b -> a b) (\y -> y) (\z -> z)) ->β (\a -> \b -> a b) (\y -> y) (\z -> z) ->β (\b -> (\y -> y) b) (\z -> z) ->β (\y -> y) (\z -> z) ->β (\z -> z) 

Finally, in the λ-calculus, things can go a few different ways.

    (λx.x) ((λa.λb.a b) (λy.y) (λz.z))
->β (λx.x) ((λb.(λy.y) b) (λz.z))
->β (λx.x) ((λy.y) (λz.z))
->β (λy.y) (λz.z)
->β (λz.z)
    (λx.x) ((λa.λb.a b) (λy.y) (λz.z))
->β (λa.λb.a b) (λy.y) (λz.z)
->β (λb.(λy.y) b) (λz.z)
->β (λy.y) (λz.z)
->β (λz.z)
    (λx.x) ((λa.λb.a b) (λy.y) (λz.z))
->β (λx.x) ((λb.(λy.y) b) (λz.z))
->β (λb.(λy.y) b) (λz.z)
->β (λy.y) (λz.z)
->β (λz.z)

There’s a very interesting property of all of those examples: they all evaluate to the same thing, regardless of the reduction order taken. This is because β-reduction of the λ-calculus has the weak Church-Rosser Property. In systems that have this property, if a reduction sequence terminates, it will always evaluate to the same term, regardless of the path taken. This property does not necessarily hold if the term does not terminate. See if you can work out what happens to this term with each reduction strategy:

(λx.λy.y) ((λa.a a) (λb.b b))

A weaker property is called confluence, which states that all reduction sequences can be stepped to a common term. At the beginning of this post, I said that the λ-calculus is used as a model for real programming languages. This is generally true. There are proofs that the λ-calculus has this property, but people don’t tend to prove such things about their actual languages, it is usually enough to build them knowing that their theoretical model has the property. In a follow up post, I’ll explain the proofs that the λ-calculus does indeed have these properties.

P.S. In Racket, you can look at the examples using the stepper which will allow you to interactively run the term and see how it reduces.