anchor.diff:  
       static member inline (%!!~~%) (DefaultParser, literal : char) = pchar literal
       static member inline (%!!~~%) (DefaultParser, literal : string) = pstring literal
  -    static member inline (%!!~~%) (DefaultParser, CaseInsensitive (literal : char)) = pcharCI literal 
  -    static member inline (%!!~~%) (DefaultParser, CaseInsensitive (literal : string)) = pstringCI literal 
       static member inline (%!!~~%) (DefaultParser, predicate : char -> bool) = satisfy predicate 
   
       static member inline (%!!~~%) (DefaultParser, anyOfThese : char list) =
  
positive.code:     static member inline (%!!~~%) (DefaultParser, anyOfThese : CaseInsensitive<string> list) =
          choice (anyOfThese |> List.map (function CaseInsensitive s -> pstringCI s)) 
  
      static member inline (%!!~~%) (DefaultParser, (count, parser)) = parray count parser 
  
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<char>) = anyChar 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<float>) = pfloat 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<int8>) = pint8 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<int16>) = pint16 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<int32>) = pint32 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<int64>) = pint64 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<uint8>) = puint8 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<uint16>) = puint16 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<uint32>) = puint32 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<uint64>) = puint64 
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf<Position>) = getPosition 
  
      static member inline (%!!~~%) (DefaultParser, _ : DefaultParserOf< ^a >) =
          DefaultParser %!!~~% (null : CustomDefaultParserOf< ^a >)
  
  /// Represents the default parser for the given type.
  /// If the type `'a` has a default parser implemented, `p<'a>`
  
negative.code: [<AutoOpen>]
  module FParsec.Pipes.DefaultParsers
  open FParsec
  
  /// Parse a character case insensitively. Returns the parsed character.
  let pcharCI c : Parser<char, 'u> =
  