anchor.diff:  [<TestCase(12, DayOfWeek.Friday, ExpectedResult = "2013-12-20", Ignore = "Remove to run test case")>]
   [<TestCase(2, DayOfWeek.Saturday, ExpectedResult = "2013-2-16", Ignore = "Remove to run test case")>]
   [<TestCase(4, DayOfWeek.Sunday, ExpectedResult = "2013-4-21", Ignore = "Remove to run test case")>]
  -let ``Finds_third_day_of_week_in_a_month``(month: int) (dayOfWeek: DayOfWeek) =
  +let ``Finds third day of week in a month``(month: int) (dayOfWeek: DayOfWeek) =
       let day = meetupDay dayOfWeek Schedule.Third 2013 month
       day.ToString("yyyy-M-d")
       
  
positive.code: [<TestCase(12, DayOfWeek.Friday, ExpectedResult = "2013-12-13", Ignore = "Remove to run test case")>]
  [<TestCase(2, DayOfWeek.Saturday, ExpectedResult = "2013-2-9", Ignore = "Remove to run test case")>]
  [<TestCase(4, DayOfWeek.Sunday, ExpectedResult = "2013-4-14", Ignore = "Remove to run test case")>]
  let ``Finds_second_day_of_week_in_a_month``(month: int) (dayOfWeek: DayOfWeek) =
      let day = meetupDay dayOfWeek Schedule.Second 2013 month
      day.ToString("yyyy-M-d")
      
  
negative.code: [<TestCase(4, DayOfWeek.Friday, ExpectedResult = "2013-4-19", Ignore = "Remove to run test case")>]
  [<TestCase(2, DayOfWeek.Saturday, ExpectedResult = "2013-2-16", Ignore = "Remove to run test case")>]
  [<TestCase(10, DayOfWeek.Sunday, ExpectedResult = "2013-10-13", Ignore = "Remove to run test case")>]
  let ``Finds first teenth day of week in a month``(month: int) (dayOfWeek: DayOfWeek) =
      let day = meetupDay dayOfWeek Schedule.Teenth 2013 month
      day.ToString("yyyy-M-d")
      
  