anchor.diff:  
   module private TypeShapeImpl =
   
  -    open System.Reflection
  -    open Microsoft.FSharp.Reflection
  -
       let allMembers =
           BindingFlags.NonPublic ||| BindingFlags.Public |||
               BindingFlags.Instance ||| BindingFlags.Static |||
  
positive.code:         
      /// use reflection to bootstrap a shape instance
      let resolveTypeShape (addOnResolver : Type -> TypeShape option) (t : Type) : TypeShape =
          match addOnResolver t with
          | Some ts -> ts
          | None ->
  
          if t.IsGenericTypeDefinition then raise <| UnsupportedShape t
          elif t.IsGenericParameter then raise <| UnsupportedShape t
          elif t = canon then raise <| UnsupportedShape t
          elif t.IsEnum then 
              activate2 (getGenericEnumType()) t <| Enum.GetUnderlyingType t
  
          elif t.IsArray then
              let et = t.GetElementType()
  
negative.code: 
  open System
  open System.Collections.Generic
  open System.Collections.Concurrent
  open System.Reflection
  open Microsoft.FSharp.Reflection
  
  