gistfile1.txt

let rotateList amount initialList =

  let rec rotate amount myList =
    if amount = 0
    then myList |> List.rev
    else
      let newestList =
        match myList |> List.rev with
        | h::rest ->
          let newList = (rest@[h]) |> List.rev
          rotate (amount-1) newList
        | [] -> []
      newestList

  rotate amount initialList


let skip amount ( lst : string list ) = lst.[amount..]
let take toIndex ( lst : string list ) = lst.[..toIndex]

let range amount  = [0..amount..200]

skip 2 ["a";"b";"c";"d";"e";"f"]
take 3 ["a";"b";"c";"d";"e";"f"]
range 7