adamchester

I do all my work on a laptop.

Hardware

• Apple MacBook Pro 15" Early 2011, 8GB RAM, Core i7 2.3GHz (MacBookPro8,2)
• Storage: 750GB hdd, plus 240GB OCZ Vertex 3 MI (note: removed optical media drive)
• Apple magic mouse <- I hate this thing
• External monitors/keyboards available depending on client site(s)

adamchester

#r "./bin/NoSpecimenNewInst/lib/net40/Ploeh.AutoFixture.dll"
printfn "%A" typeof<Ploeh.AutoFixture.Fixture>.AssemblyQualifiedName
let createWithNoSpecNewInst<'T> =
    let fixture = Ploeh.AutoFixture.Fixture()
    fun () -> fixture.Create(typeof<'T>, Ploeh.AutoFixture.Kernel.SpecimenContext(fixture)) :?> 'T

#r "./bin/NoSpecimenSingleton/lib/net40/Ploeh.AutoFixture.dll"
printfn "%A" typeof<Ploeh.AutoFixture.Fixture>.AssemblyQualifiedName
let noSpecimenSingleton = typeof<Ploeh.AutoFixture.Kernel.NoSpecimen>

adamchester

private class SpecimenWithEverything
{
    public enum MyEnum
    {
        MyFirstValue,
        MySecondValue,
        MyThridValue,
    }

    public string String1 { get; set; }

adamchester

// Step 0. Boilerplate to get the paket.exe tool
open System
open System.IO
 
Environment.CurrentDirectory <- __SOURCE_DIRECTORY__

if not (File.Exists "paket.exe") then
    let url = "https://github.com/fsprojects/Paket/releases/download/0.31.5/paket.exe"
    use wc = new Net.WebClient()
    let tmp = Path.GetTempFileName()

adamchester

BenchmarkDotNet-Dev=v0.9.1.0+
OS=Microsoft Windows NT 6.2.9200.0
Processor=Intel(R) Core(TM) i7-4980HQ CPU @ 2.80GHz, ProcessorCount=8
Frequency=10000000 ticks, Resolution=100.0000 ns, Timer=HPET
HostCLR=MS.NET 4.0.30319.42000, Arch=64-bit RELEASE [RyuJIT]
JitModules=clrjit-v4.6.1063.1

Type=NoSpec  Mode=Throughput  Platform=AnyCpu  
Framework=V45 TargetCount=10 

adamchester

[<AutoOpen>]
module Workflow =
    type State = Initial | Draft | PendingApproval | Approved | Cancelled | Completed
    type Action = Create | Cancel | SendForApproval | Approve | Reject | Complete
    type Role = Creator | Approver | Completor
    type Transition = { Action:Action; From:State; To:State; Roles:Role list }
    module Transitions =
        let create      = { Action=Create;          From=Initial;         To=Draft;           Roles=[ Creator   ] }
        let cancel      = { Action=Cancel;          From=Draft;           To=Cancelled;       Roles=[ Creator   ] }
        let sendForAppr = { Action=SendForApproval; From=Draft;           To=PendingApproval; Roles=[ Creator   ] }

adamchester

type ASetOfApis = unit->unit

module ApiSets =
    type Primatives             = ASetOfApis
    type Reflection             = ASetOfApis
    type Tasks                  = ASetOfApis
    type Collections            = ASetOfApis
    type Linq                   = ASetOfApis
    type ConcurrentCollections  = ASetOfApis

adamchester

// Converted to F# from https://gist.github.com/davidfowl/8939f305567e1755412d6dc0b8baf1b7
module Analogy =
    type ASetOfApis = unit -> unit

    // Each interface represents a target framework and methods represents groups of APIs available on that target framework. 
    // The goal is to show the relationship between .NET Standard API surface and other .NET platforms

    // .NET Standard

adamchester

void Main() {
    var fr = System.Globalization.CultureInfo.CreateSpecificCulture("fr-FR");
    var enAu = System.Globalization.CultureInfo.CreateSpecificCulture("en-AU");
    var zhCn = System.Globalization.CultureInfo.CreateSpecificCulture("zh-CN");
    var invariant = System.Globalization.CultureInfo.InstalledUICulture;
    
    var chairSitTemplate = MessageTemplate.Parse("I sat at {@Chair} on {SitDate,10:dd-MMM-yyyy}");

    chairSitTemplate.Format(fr, new Chair(), DateTimeOffset.UtcNow)
        .Dump("Format using fr-FR culture uses comma decimal separator and french month names");

adamchester

using System;
using System.Collections;
using System.Collections.Generic;
using System.Linq;
using System.Threading.Tasks;
using BenchmarkDotNet.Attributes;

namespace BenchmarkDotNet.Samples.Framework
{
    public class Framework_LinqOfType_vs_ForListToArray