/myself { [
    (/myself { [)
    null
    (  ] dup {)
    (    dup null eq {)
    (      pop)
    (      {)
    (        dup null eq \(    %\n\) \(    \(%\)\n\) ifelse litstring printf)
    (      } forall)
    (    } {)
    (      \(%\n\) printf)
    (    } ifelse)
    (  } forall } def)
  ] dup {
    dup null eq {
      pop
      {
        dup null eq (    %\n) (    \(%\)\n) ifelse litstring printf
      } forall
    } {
      (%\n) printf
    } ifelse
  } forall } def