BennieCopeland

public record EmailAddress
{
    public const int MaxSize = 255;
    private readonly string _value;

    private EmailAddress(string value) => _value = value;

    public static EmailAddress FromString(string value)
    {
        if (string.IsNullOrWhiteSpace(value))

BennieCopeland

#r "nuget:FsCheck.Xunit"

// Domain types from production code
module Types =
    open System
    
    type EmailAddress = private EmailAddress of string
    module EmailAddress =
        let fromString str =
            if not <| String.IsNullOrWhiteSpace str

BennieCopeland

#!/bin/bash
# Import DoD root certificates into linux CA store

main() {
    # Location of bundle from DISA site
    url='https://public.cyber.mil/pki-pke/pkipke-document-library/'
    bundle=$(curl -s $url | awk -F '"' 'tolower($2) ~ /dod.zip/ {print $2}')
    #bundle=https://dl.dod.cyber.mil/wp-content/uploads/pki-pke/zip/certificates_pkcs7_v5-6_dod.zip

    # Set cert directory and update command based on OS

BennieCopeland

#r "nuget:FsCheck"

open System
open FsCheck

module JohnHughes =
    // F# version of John Hughes talk https://youtu.be/zvRAyq5wj38
    
    type BST<'k, 'v when 'k : comparison>  =
        | Leaf

BennieCopeland

let inline toMap kvps =
    kvps
    |> Seq.map (|KeyValue|)
    |> Map.ofSeq

BennieCopeland

Some of the books I'll be recommending are based on .NET. Do not be discouraged. We shouldn't strive to stick to a specific technology stack. Your ambitions and goals will evolve over time and that might lead you a completely new space. Moreover, there are lessons to be learned from an environment that's different from what you're used to.

Software Development

• "C# in depth" by Jon Skeet (Book)

• "F# for C# developers" by Tao Liu (Book)

• F# to C# interop tips by Scott Wlaschin (Gist)

• Effective F#, tips and tricks (Gist)

BennieCopeland

public class IndexFileBasePathTransformer
{
    private static readonly ReaderWriterLockSlim Rw = new ReaderWriterLockSlim();
    private static string _indexHtml = "";
    private static bool _transformed;

    public static void Transform(string contentRootPath, string basePath, ILogger logger)
    {
        Rw.EnterUpgradeableReadLock();
        if (!_transformed)

BennieCopeland

open System

type private DataGridHelper =
    static member inline IsValidRow (this: DataGrid<_,_,_>) row = row < this.rowInfo.Length && row >= 0
    static member inline IsValidCol (this: DataGrid<_,_,_>) col = col < this.colInfo.Length && col >= 0
    static member inline EnsureValidRow (this: DataGrid<_,_,_>) row = if not (DataGridHelper.IsValidRow this row) then raise (new IndexOutOfRangeException("row")) // TODO: F# vNext nameof(row)
    static member inline EnsureValidCol (this: DataGrid<_,_,_>) col = if not (DataGridHelper.IsValidCol this col) then raise (new IndexOutOfRangeException("col")) // TODO: F# vNext nameof(col)

and DataGrid<'TRowInfo, 'TColInfo, 'TElement> =
    private { rowInfo: 'TRowInfo[]; colInfo: 'TColInfo[]; elements: Map<int*int, 'TElement> }

BennieCopeland

# setup certificate properties including the commonName (DNSName) property for Chrome 58+
$root = New-SelfSignedCertificate `
    -Type Custom `
    -KeySpec Signature `
    -Subject "CN=DevRootCert" `
    -KeyExportPolicy Exportable `
    -HashAlgorithm SHA256 `
    -KeyLength 2048 `
    -CertStoreLocation "Cert:\CurrentUser\My" `
    -FriendlyName "Root CA Certificate for .NET Core" `

BennieCopeland

public class HouseId : IEquatable<HouseId>
{
    private readonly string id;
    public HouseId(string id)
    {
        this.id = id;
    }

    public bool Equals(HouseId other)
    {