Contents

module SimpleLinkedList

type LinkedList<'a> = 
    | Nil 
    | Element of datum:'a * next:LinkedList<'a>

let nil = Nil

let create x n = Element (x, n)

let isNil x = 
    match x with
    | Nil -> true
    | _   -> false

let next x = 
    match x with
    | Nil -> Nil
    | Element (_, n) -> n

let datum x = 
    match x with
    | Nil -> failwith "The nil list has no datum."
    | Element (y, _) -> y

let toList x = 
    let rec loop acc item = 
        match item with
        | Nil -> acc |> List.rev
        | Element (b, n) -> loop (b :: acc) n

    loop [] x

let fromList xs = List.foldBack create xs Nil

let reverse x = x |> toList |> List.rev |> fromList

Version data entries

463 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.2.1.119	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.118	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.117	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.116	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.115	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.114	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.113	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.111	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.110	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.109	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.108	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.107	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.106	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.105	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.104	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.103	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.102	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.101	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.100	tracks/fsharp/exercises/simple-linked-list/Example.fs
trackler-2.2.1.99	tracks/fsharp/exercises/simple-linked-list/Example.fs