Skip to content

Instantly share code, notes, and snippets.

View 0x53A's full-sized avatar

Lukas Rieger 0x53A

23 followers · 2 following
View GitHub Profile
@0x53A
0x53A / itemx_up_to_9.fsx
Created January 12, 2018 17:20
#r "System.ValueTuple.dll";;
type fstsnd = class
static member Fst ((x, _)) = x
static member Fst ((x, _, _)) = x
static member Fst ((x, _, _, _)) = x
static member Fst ((x, _, _, _, _)) = x
static member Fst ((x, _, _, _, _, _)) = x
@0x53A
0x53A / C#
Last active December 30, 2015 22:16
F# using patterns
public static void sample1()
{
FileStream fs = File.Create("x.txt");
try
{
fs.WriteByte(1);
}
finally
{
IDisposable disposable = fs as IDisposable;
@0x53A
0x53A / gist:53f45949db812bde5d97
Last active August 29, 2015 14:22
open Microsoft.FSharp.Quotations
open Microsoft.FSharp.Quotations.Patterns
open Microsoft.FSharp.Quotations.DerivedPatterns
let println expr =
let rec print expr =
match expr with
| Application(expr1, expr2) ->
// Function application.
print expr1
@0x53A
0x53A / gist:8848b04c2250364a3c22
Last active August 29, 2015 14:22
open Microsoft.FSharp.Quotations
open Microsoft.FSharp.Quotations.Patterns
open Microsoft.FSharp.Quotations.DerivedPatterns
open System
type Variable = Variable of string
type Expression =
| VarExp of Variable
| Const of float
@0x53A
0x53A / gist:393517e955736ea7f4c5
Created June 9, 2015 22:47
open Microsoft.FSharp.Quotations
open Microsoft.FSharp.Quotations.Patterns
open Microsoft.FSharp.Quotations.DerivedPatterns
let println expr =
let rec print expr =
match expr with
| Application(expr1, expr2) ->
// Function application.
@0x53A
0x53A / ParallelForEach
Created May 3, 2014 19:11
using Microsoft.ConcurrencyVisualizer.Instrumentation;
using System;
using System.Collections.Generic;
using System.Diagnostics;
using System.IO;
using System.IO.Compression;
using System.Threading;
using System.Threading.Tasks;
namespace ConsoleApplication3
@0x53A
0x53A / StreamPipeline.cs
Created July 27, 2013 09:13
using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Text;
using System.Threading;
using System.Threading.Tasks;
namespace xxx
{
@0x53A
0x53A / BlockingStream.cs
Created July 27, 2013 09:08
using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Text;
using System.Threading;
using System.Threading.Tasks;
namespace xxx
{
@0x53A
0x53A / Ringbuffer.cs
Created July 24, 2013 11:27
Ringbuffer in C#, fixed size
using System;
using System.Collections;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Text;
using System.Threading;
namespace xxx
{