Skip to content

Instantly share code, notes, and snippets.

@thinktainer

thinktainer/pivot.fs

Created May 31, 2013 15:56
Show Gist options
  • Save thinktainer/5685977 to your computer and use it in GitHub Desktop.
Save thinktainer/5685977 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
pivot.fs
let Pivot (structure: List<List<'t>>) =
let rows = [0..structure.Length - 1]
let columns = [0..structure.[0].Length - 1]
columns |> List.map(fun c -> rows |> List.map(fun r -> structure.[r].[c]))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment