$ 'nlis'
 \             /-(n)1s{nlis}0.#
  \-(!n!)(n)0q<
               \-n#

$ 'main'
 \
  \-6{nlis}#