TypeProvider demo from @dsyme presentation

typeProvider.fs

// Learn more about F# at http://fsharp.net
namespace ExampleTypeProvider.DesignTime
open System
open System.Collections.Generic
open System.Linq.Expressions
open System.Globalization
open System.Reflection
open System.Diagnostics
open Microsoft.FSharp.Core.CompilerServices


[<TypeProvider>]
type FolderTypeProvider(config:TypeProviderConfig) as this =
    inherit TypeProviderForNamespaces()
    let oneType = ProvidedTypeDefenition("Samples.TypeSpace", "OneType")
    let prop = ProvidedProperty("Name", typeof<string>, 
                                IsStatic = true, 
                                GetterCode = (fun args-> <@@ "hello" @@>))
    do oneType.AddMember prop
    do this.AddNamespace("Samples.TypeSpace", [oneType])

[<assembly: TypeProviderAssembly>]
do()