X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=hints%2Fassignment_7_hint_4.mdwn;h=ae17ce1d551ee945796adb589e9b76f9185dcc44;hp=e4f0a7907c95abdd0cb87daa6fe5ae3b1511a269;hb=c0d0fef36aacfcb9e66c43b39281491f44757850;hpb=1d5249432378066bbe948bfe0b303704e18468a5

diff --git a/hints/assignment_7_hint_4.mdwn b/hints/assignment_7_hint_4.mdwn
index e4f0a790..ae17ce1d 100644
--- a/hints/assignment_7_hint_4.mdwn
+++ b/hints/assignment_7_hint_4.mdwn
@@ -99,10 +99,10 @@
 
 	which is:
 
-		fun truth_value ->
+		let eliminate_non_Qxs = fun truth_value ->
 			if truth_value
 			then unit_set (
-				let eliminate_non_Qxs = fun (r, h) ->
+				fun (r, h) ->
 					let obj = List.nth h (r 'x')
 					let (a, r', h') = (obj, r, h)
 					in let u' = (fun e -> unit_dpm (Q e)) a
@@ -135,7 +135,7 @@
 				in (truth_value', r, h))
 		in fun one_dpm -> unit_set (bind_dpm one_dpm eliminate_non_Qxs)
 
-	because that one passed through every `bool dpm` that wrapped a `false`; whereas now we're discarding some of them. But these will work equally well. We can implement either behavior (or, as we said before, the behavior of never passing through a wrapped `false`).
+	because that one passed through every `bool dpm` that wrapped a `false`; whereas now we're discarding some of them. But these will work equally well. We can implement either behavior (or, as we said before, the behavior of never returning any wrapped `false`s).
 
 *	Reviewing: now we've determined how to define \[[Q]] and \[[x]] such that \[[Qx]] can be the result of applying the function \[[Q]] to the `entity dpm` \[[x]]. And \[[Qx]] in turn is now a function that takes a `bool dpm` as input and returns a `bool dpm set` as output. We compose this with a `bool dpm set` we already have on hand: