floyd(5)
floyd(14)

floyd(n)=
  k = 0
  > r, 1..n
    s = ""
    > j, 1..r
      k += 1
      f = ">"+#.upper(#.log10((n-1)*n/2+j+1)+1)+">"
      s += #.str(k,f)
    <
    #.output(s)
  <
.