Closed HLWeil closed 4 months ago
open ARCtrl.Spreadsheet
let headerStrings : string seq = ...
let rowStringSeqs : string seq seq = ...
let columns =
Seq.append [headerStrings] rowStringSeqs
|> Seq.transpose
let columnsList =
columns
|> Seq.toList
|> List.map (Seq.toList)
let arcTable = ArcTable.composeColumns columnsList
open ARCtrl.Spreadsheet let headerStrings : string seq = ... let rowStringSeqs : string seq seq = ... let columns = Seq.append [headerStrings] rowStringSeqs |> Seq.transpose let columnsList = columns |> Seq.toList |> List.map (Seq.toList) let arcTable = ArcTable.composeColumns columnsList
love it!
But thinking about switching from list to array. Because I have quite a few .Item
calls, which are painfully slow for lists.
Would be fine with it 👍
open ARCtrl.Spreadsheet let headerStrings : string seq = ... let rowStringSeqs : string seq seq = ... let columns = Seq.append [headerStrings] rowStringSeqs |> Seq.transpose let columnsList = columns |> Seq.toList |> List.map (Seq.toList) let arcTable = ArcTable.composeColumns columnsList
Now it's
open ARCtrl.Spreadsheet
let headerStrings : string seq = ...
let rowStringSeqs : string seq seq = ...
let columns =
Seq.append [headerStrings] rowStringSeqs
|> Seq.transpose
let columnsArray =
columns
|> Seq.toArray
|> Array.map (Seq.toArray)
let arcTable = ArcTable.composeColumns columnsArray
closes #389