anchor.diff:                            let t = replacer.ToRuntime typeof<Async<Indicator>>
                             ProvidedProperty
                               ( indicator.Name, t, IsStatic=false,
  -                              GetterCode = conv (coerce t (fun arg -> <@@ (%%arg : Indicators)._AsyncGetIndicator(indicatorIdVal) @@>)))
  +                              GetterCode = conv (fun arg -> <@@ (%%arg : Indicators)._AsyncGetIndicator(indicatorIdVal) @@>))
                           else
                             let t = replacer.ToRuntime typeof<Indicator>
                             ProvidedProperty
                               ( indicator.Name, t, IsStatic=false,
  -                              GetterCode = conv (coerce t (fun arg -> <@@ (%%arg : Indicators)._GetIndicator(indicatorIdVal) @@>)))
  +                              GetterCode = conv (fun arg -> <@@ (%%arg : Indicators)._GetIndicator(indicatorIdVal) @@>))
   
                         if not (String.IsNullOrEmpty indicator.Description) then prop.AddXmlDoc(indicator.Description)
                         yield prop ] )
  +            serviceTypesType.AddMember t
               t
   
           let countryType =
  
positive.code:                             GetterCode = conv (fun arg -> <@@ (%%arg : RegionCollection<Region>)._GetRegion(code) @@>)) 
                      prop.AddXmlDoc (sprintf "The data for region '%s'" name)
                      yield prop ])
              t
    
          let worldBankDataServiceType =
  
negative.code:                                GetterCode = conv (fun arg -> <@@ (%%arg : Region)._GetCountries() @@>))
                    prop.AddXmlDoc("<summary>The indicators for the region</summary>")
                    yield prop ] )
              serviceTypesType.AddMember t
              t
  
          let regionsType =
              let regionCollectionType = ProvidedTypeBuilder.MakeGenericType(replacer.ToRuntime typedefof<RegionCollection<_>>, [ regionType ])
              let t = ProvidedTypeDefinition("Regions", baseType=Some regionCollectionType, HideObjectMethods=true)
              t.AddMembersDelayed (fun () -> 
                  [ for (code, name) in connection.Regions do
  