Skip to content

Instantly share code, notes, and snippets.

View ReedCopsey's full-sized avatar

Reed Copsey, Jr. ReedCopsey

View GitHub Profile
@ReedCopsey
ReedCopsey / Program.fs
Created August 23, 2014 00:27
Timing on Seq.toArray with ICollection<'T> input
// Learn more about F# at http://fsharp.net
// See the 'F# Tutorial' project for more help.
open System.Diagnostics
[<EntryPoint>]
let main argv =
let sequ = seq [ 1 .. 10000000 ]
let cach = ResizeArray<_>(sequ)
#region
using System;
using System.Collections.Generic;
using System.Threading.Tasks;
using Cmc.Core.ComponentModel;
using Cmc.Core.Diagnostics;
using Cmc.Installer.Core.Tasks;
#endregion
namespace TipCalc
open FSharp.ViewModule
open System
type TipCalcModel() as self =
inherit ViewModelBase()
// Create our backing fields
let subTotal = self.Factory.Backing(<@ self.SubTotal @>, 0.0)