Jared Hester cloudRoutine

F# Advent 2021 Dec 08 - Fast data pipelines with F#6

Thanks to Sergey Tihon for running F# Weekly and F# Advent.

Thanks to manofstick for trying out the code and coming with invaluable feedback. Cistern.ValueLinq is very impressive.

TLDR; F#6 enables data pipelines with up to 15x less overhead than LINQ

There were many interesting improvements in F#6 but one in particular caught my eye, the attribute InlineIfLambda.

F# Advent 2016 (English) - December 10 - Implementing a persistent hash map.

This blog created for F# Advent 2016 (English)

Full source code can be found here

Changelog

2016-12-10
New performance test - Anthony Lloyd (@AnthonyLloyd) suggested that I compare against Prime.Vmap.

Optimizing a simple problem

I was introduced to a simple optimization problem by one of my interns last week. He was about to participate in a friendly competition where they were asked to find a performant solution to the problem:

The problem

JSON Monadic Transformers

Full source at: https://gist.github.com/mrange/7c39333de480a8de5c812a1f6ba70173

A popular approach in Functional Languages to create parsers is to use parser combinators.

Parser combinators provide a way to compose parser of ever increasing complexity from simple parsers. Parser combinators

	namespace CExprs

	module LogoTurtle =

	type Distance_Unit = STEPS
	type Rotation_Unit = GRADATIONS
	type Rotation_Direction = \| LEFT \| RIGHT
	let STEP = STEPS
	let GRADATION = GRADATIONS

	open System
	open System.IO
	open System.Web
	open System.Net
	open System.Collections.Generic

	Environment.CurrentDirectory <- __SOURCE_DIRECTORY__

	# NOTE - If there are weird character errors when trying to load this profile
	# resave the file with the encoding `UTF-8 with BOM`

	# ┌ ┐
	# Setup Environment
	# └ ┘

	# change to codepage to display symbols properly
	chcp 65001 \| out-null

	open System.Diagnostics
	open System.Reflection
	open Microsoft.FSharp.Core
	open Microsoft.FSharp.Core.Operators
	open Microsoft.FSharp.Core.LanguagePrimitives
	open Microsoft.FSharp.Core.LanguagePrimitives.IntrinsicOperators
	open Microsoft.FSharp.Collections
	open Microsoft.FSharp.Primitives.Basics
	open System.Collections.Generic

	#r "../../../packages/fparsec/lib/net40-client/fparseccs.dll"
	#r "../../../packages/fparsec/lib/net40-client/fparsec.dll"
	open System

	Environment.CurrentDirectory <- __SOURCE_DIRECTORY__

	open FParsec
	open FParsec.Primitives

	let (^) = (<\|)

	open System
	open System.Reflection

	type CLIArguments =
	\| Working_Directory of string
	\| Listener of host:string * port:int
	\| Data of byte []
	\| Port of int
	\| Log_Level of int
	\| Detach