Keywords

for {
 _ <- Person.firstName.lastName.age insert List(
   ("Ben", "Hayday", 42),
   ("Liz", "Taylor", 34),
   ("Liz", "Swifty", 34),
   ("Liz", "Mooray", 25)
 )
 _ <- Person.firstName.age(count).get.map(_ ==> List(
   ("Ben", 1),
   ("Liz", 3) // 34, 34, 25
 ))
} yield ()

for {
 _ <- Person.firstName.lastName.age insert List(
   ("Ben", "Hayday", 42),
   ("Liz", "Taylor", 34),
   ("Liz", "Swifty", 34),
   ("Liz", "Mooray", 25)
 )
 _ <- Person.firstName.age(countDistinct).get.map(_ ==> List(
   ("Ben", 1),
   ("Liz", 2) // 34, 25
 ))
} yield ()

for {
 _ <- Person.firstName.lastName.age insert List(
   ("Ben", "Hayday", 42),
   ("Liz", "Taylor", 34),
   ("Liz", "Swifty", 34),
   ("Liz", "Mooray", 25)
 )
 _ <- Person.firstName.age(distinct) insert List(
   ("Ben", 42),
   ("Liz", Vector(34, 25)) // only single 34 returned
 )
} yield ()

for {
 _ <- Person.age.insert(25, 34, 37, 42, 70)
 _ <- Person.age(max).get.map(_.head ==> 70)
} yield ()

Person.age(max(3)).get.map(_.head ==> Vector(37, 42, 70))

for {
 _ <- Person.age.insert(25, 34, 37, 42, 70)
 _ <- Person.age(min).get.map(_.head ==> 25)
} yield ()

Person.age(min(3)).get.map(_.head ==> Vector(25, 34, 37))

for {
 _ <- Person.age.insert(25, 34, 37, 42, 70)
 _ <- Person.age(sample).get.map(_.head ==> 42) // or other..
} yield ()

Person.age(sample(3)).get.map(_.head ==> Vector(70, 25, 37)) // or other..

for {
 _ <- Match.sKeywords.insert(1, 2, 4)
 _ <- Match.score(avg).get.map(_.head ==> 2.3333333333333335) // (1 + 2 + 4) / 3
} yield ()

for {
 _ <- Match.sKeywords.insert(1, 2, 4)
 _ <- Match.score(median).get.map(_.head ==> 2)
} yield ()

for {
 _ <- Match.sKeywords.insert(1, 2, 3, 4)
 _ <- Match.score(median).get.map(_.head ==> 2) // (2 + 3) / 2 = 2.5 rounded down to 2
} yield ()

for {
 _ <- Match.sKeywords.insert(1.0, 2.5, 2.5, 3.0)
 _ <- Match.score(median).get.map(_.head ==> 2) // (2.5 + 2.5) / 2 = 2.5 rounded down to 2 (This is wrong and bug report has been filed)
} yield ()

for {
 _ <- Match.sKeywords.insert(1, 2, 4)
 _ <- Match.score(stddev).get.map(_.head ==> 1.247219128924647)
} yield ()

for {
 _ <- Match.sKeywords.insert(1, 2, 4)
 _ <- Match.score(sum).get.map(_.head ==> 7)
} yield ()

for {
 _ <- Match.sKeywords.insert(1, 2, 4)
 _ <- Match.score(variance).get.map(_.head ==> 1.5555555555555556)
} yield ()

for {
 _ <- m(Person.age.name.Beverages * Beverage.name.rating) insert List(
   (23, "Joe", List(("Coffee", 3), ("Cola", 2), ("Pepsi", 3))),
   (25, "Ben", List(("Coffee", 2), ("Tea", 3))),
   (23, "Liz", List(("Coffee", 1), ("Tea", 3), ("Pepsi", 1))))

 // What beverages do pairs of 23- AND 25-year-olds like in common?
 // Drink name is unified - Joe and Ben both drink coffee, etc..
 _ <- Person.age_(23).name.Beverages.name._Ns.Self
     .age_(25).name.Beverages.name_(unify).get.map(_.sorted ==> List(
   ("Joe", "Coffee", "Ben"),
   ("Liz", "Coffee", "Ben"),
   ("Liz", "Tea", "Ben")
 ))
} yield ()