iwasdavid

let addNameAgeAndAddress fname lname age town =
  sprintf "Your name is %s %s and you are %i years old and you live in %s" fname lname age town

let addNameAgeAndAddress' fname lname =
  (fun age town -> sprintf "Your name is %s %s and you are %i years old and you live in %s" fname lname age town)

iwasdavid

<Content>
  <Blah>adasd</Blah>
  <Stuff>asdadas</Stuff>
  <Thing>asdasd</Thing>
  <Other>asdadas</Other>
</Content>

<Content>
  <Blah>adasd</Blah>
  <Stuff>asdadas</Stuff>

iwasdavid

let words = [
    "Title"
    "Some text"
    "Some other text"
    "Some text"
    "Some other text"
    "Title"
    "Some text"
    "Some other text"
    "Title"