fork download
  1. open System;let f x = ([1..x]|>Seq.iter(fun _->Console.Write 'x'))in[1..10]|>Seq.iter(fun x->f x;([18..-1..2*x-1]|>Seq.iter(fun _->Console.Write ' '));f x;Console.WriteLine());;
Success #stdin #stdout 0.06s 11448KB
stdin
Standard input is empty
stdout
x                  x
xx                xx
xxx              xxx
xxxx            xxxx
xxxxx          xxxxx
xxxxxx        xxxxxx
xxxxxxx      xxxxxxx
xxxxxxxx    xxxxxxxx
xxxxxxxxx  xxxxxxxxx
xxxxxxxxxxxxxxxxxxxx