X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=hints%2Fassignment_7_hint_4.mdwn;h=a9c6c05b3ec700ad1b38cb50390191725cab7e03;hp=278ca812a52368fcfced1af38b191d5343a00332;hb=f5ee0222f8fe5d7b91e1e4c813350d2bd6005940;hpb=f5da15db3310f323c87c84ddc650ebcc07e075ed

diff --git a/hints/assignment_7_hint_4.mdwn b/hints/assignment_7_hint_4.mdwn
index 278ca812..a9c6c05b 100644
--- a/hints/assignment_7_hint_4.mdwn
+++ b/hints/assignment_7_hint_4.mdwn
@@ -79,7 +79,7 @@
 			then unit_set (bind_dpm getx (fun e -> unit_dpm (Q e)))
 			else empty_set
 
-	which is:
+	unpacking the definition of `bind_dpm`, that is:
 
 		let getx = fun (r, h) ->
 			let obj = List.nth h (r 'x')
@@ -95,7 +95,7 @@
 		
 	which is:
 
-		in fun truth_value ->
+		fun truth_value ->
 			if truth_value
 			then unit_set (
 				fun (r, h) ->
@@ -107,7 +107,7 @@
 		
 	which is:
 
-		in fun truth_value ->
+		fun truth_value ->
 			if truth_value
 			then unit_set (
 				fun (r, h) ->