Skip to content

Instantly share code, notes, and snippets.

View fs-tree-func.fs
let rec drawTreeOther layer height =
if layer = height then
printfn "%41s\n%41s" "xx" "xx"
else
let w = (layer + 1) * 2
printfn "%s%s" (String.replicate ((80 - w) / 2) " ") (String.replicate w "x")
drawTreeOther (layer + 1) height
You can’t perform that action at this time.
You signed in with another tab or window. Reload to refresh your session. You signed out in another tab or window. Reload to refresh your session.