anchor.diff:          | Windows -> @"\"
           | Unix -> "/"
   
  +[<TypeConverter(typeof<PathToStringTypeConverter>)>]
   type Path private (path: string) =
       static let root = ""
       static let rootWindows = "Drives"
  
positive.code: 
      // for debugging
      override this.ToString() = this.Format Windows
  
negative.code: ﻿namespace Koffee
  
  open System
  open System.ComponentModel
  open System.Text.RegularExpressions
  open Acadian.FSharp
  
  