jeremyabbott

module SuaveLogging.SuaveExample

open System
open System.IO
open System.Net

open Suave
open Suave.Filters
open Suave.Successful
open Suave.Logging

jeremyabbott

open System
open System.Net
open Microsoft.FSharp.Control.WebExtensions

// *********************************
// Pipes vs. Composition
// *********************************

// Pipe operator
let sum =

jeremyabbott

let findDuplicateLetter list =
    let rec findDuplicate list item =
        match list with
        | [] -> "No duplicates were found"
        | x::xs when item = x -> x
        | x::xs -> findDuplicate xs x
    findDuplicate (List.sort list) ""

[<EntryPoint>]
let main argv = 

jeremyabbott

open System
let getLyrics (input : string) (matchString : string) =
    input.Split([|matchString|], StringSplitOptions.RemoveEmptyEntries)
    |> Array.reduce (fun acc item -> sprintf "%s %s" acc item)

[<EntryPoint>]
let main argv = 
    printfn "%A" (getLyrics "WUBWUBWUBIWUBAMWUBWUBXWUBWUBWUB" "WUB")
    0 // return an integer exit code

jeremyabbott

open System.Text.RegularExpressions;

let buildList args =
    Regex.Matches(args, "(\d\,\s?\d)")
    |> Seq.cast<Match>
    |> Seq.map (fun m -> m.Value.Replace(" ", "").Split([|','|]))
    |> Seq.toList
 
let findDuplicatePointer list =
    let rec findCycleRec (oldList:list<array<string>>) (newList:list<array<string>>) =

jeremyabbott

open System.Net.Http
open System.Net.Http.Formatting
open Newtonsoft;

// Learn more about F# at http://fsharp.net
// See the 'F# Tutorial' project for more help.
[<CLIMutable>]
type Movie = {
    ID : int;
    Name : string }