anchor.diff:      let gdkToHsl (c:Gdk.Color) = HslColor.op_Implicit(c)
       let hslToCairo (c:HslColor) : Cairo.Color = HslColor.op_Implicit(c)
       let hslToGdk (c:HslColor) : Gdk.Color = HslColor.op_Implicit(c)
  -     
       let cairoToGdk = cairoToHsl >> hslToGdk
   
   [<AutoOpen>]
  
positive.code: open MonoDevelop.Ide
  open MonoDevelop.Projects
  open MonoDevelop.FSharp
  open FSharp.CompilerBinding
  
  [<AutoOpen>]
  module ColorHelpers =
      let strToColor s = 
          let c = ref (new Color())
          match Color.Parse (s, c) with
          | true -> !c
          | false -> new Color() // black is as good a guess as any here
          
      let colorToStr (c:Color) =
          sprintf "#%04X%04X%04X" c.Red c.Green c.Blue
  
negative.code:         |> Seq.append projRefAssemblies
          |> Seq.filter (fun ref ->  not (ref.Contains "mscorlib.dll" || ref.Contains "FSharp.Core.dll") )
          |> Seq.distinct
          |> Seq.toArray 
       
      let orderAssemblyReferences = FSharp.CompilerBinding.OrderAssemblyReferences()
      let orderedreferences = orderAssemblyReferences.Order references
      ensureCorrectDirectory()
      sendCommand orderedreferences
    
    static member CurrentFsi = interactive
    static member CurrentPad = pad
  
  type ShowFSharpInteractive() =
    inherit CommandHandler()
  