Sort a list of object identifiers: Difference between revisions
Content added Content deleted
Line 187: | Line 187: | ||
-- sortedIdentifiers :: [String] -> [String] |
-- sortedIdentifiers :: [String] -> [String] |
||
on sortedIdentifiers(xs) |
on sortedIdentifiers(xs) |
||
script |
script listCompare |
||
on |λ|(x, y) |
on |λ|(x, y) |
||
script go |
script go |
||
Line 203: | Line 203: | ||
map(intercalate("."), ¬ |
map(intercalate("."), ¬ |
||
sortBy( |
sortBy(listCompare, ¬ |
||
map(compose(curry(my map)'s ¬ |
map(compose(curry(my map)'s ¬ |
||
|λ|(my readint), splitOn(".")), xs))) |
|λ|(my readint), splitOn(".")), xs))) |