|=  a=(list *)
=/  n=@ud  1
|-
?~  a
  %napoleonesque-list
?:  =(3 n)
  i.a
$(n +(n), a t.a)