Skip to content

Instantly share code, notes, and snippets.

@einarwh

einarwh/genLists.fs

Created February 10, 2015 22:00
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Embed
What would you like to do?
Learn more about clone URLs
Download ZIP
Generate quarter of diamond.
Raw
genLists.fs
let genLists lst =
[ for e in lst do List.map (fun x -> if x = e then x else '.') lst ]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment