Calendar.cs

using System;

namespace Aperea.iCalendar
{
    public class Calendar
    {
        public void SetTime(DateTime dateTime)
        {
        }

        public int Year { get; set; }
    }
}

CalendarSpec.fs

module CalendarSpec

open System
open Aperea.iCalendar
open NaturalSpec

let  october = new Calendar()

let setting_starttime_to time (calendar:Calendar) = 
    printMethod time
    calendar.SetTime(time)
    
[<Scenario>]
let When_creating_a_calendar() =
    As october
       |> When setting_starttime_to (new DateTime(2010,10,8))
       |> october.Year should equal 2010
       |> Verify 

let setting_starttime_to time (calendar:Calendar) =
printMethod time
calendar.SetTime(time)
calendar