kickstart list

kickstart_list.fs

open System.Collections.Generic


let csharpList =  List<_>();
csharpList.Add(2);
printf "%A" <| csharpList.[0]


let numbers = [1;2;3]
let numbers2 = [4;5;6]
let doubleNumbers = numbers |> List.append numbers2

printf "%A" numbers
printf "%A" doubleNumbers
printf "%A"  <| numbers.Item 1

let zeroList =  0 :: numbers 



printf "%A" zeroList


type MyList<'T> = Empty | Cons of ('T * MyList<'T>)

let myMList =  Cons (2, Empty)
let threeFour = Cons(1, myMList)

let myTuple= 3,4

let rec printMyListElements list =
    match list with
    | Empty -> ()
    | Cons(head , tail) -> 
      printf "%A" head
      printMyListElements tail

printMyListElements threeFour

let rec printAllElements list =
    match list with
    | [] -> ()
    | head :: tail -> 
      printf "%A" head
      printAllElements tail

printAllElements numbers