  We can also some operators to make this more expressive:
  */
 
-let p3 = project |> creatorLens • nameLens *~ "BLOB"
+let p3 = project |> creatorLens • nameLens .~ "BLOB"
 p3.creator.name
 
 /*:

 Now we can do:
 */

let p5 = project |> Project.lens.creator • User.lens.name *~ "BLORG"
p5.creator.name

/*:

}

/*:
 We can also change multiple fields at once. Recall that applying the `.~` operator to a lens creates a
 function `Project -> Project`. Such functions can be composed with the `<>` operator, so now we can do:
 */

let p7 = project
  |> Project.lens.name .~ "Mural in Brooklyn"
  <> Project.lens.creator.name .~ "Saunders"
  <> Project.lens.creator.location.name .~ "Greenpoint"
p7.name
p7.creator.name
p7.creator.location.name
