#!/bin/sh
# Honour /* (poetry) /$ (tables) and /p (indented poetry) all of which
# should suppress rewrapping.  Assume none of these can be nested.
awk '\
/^\/[*$p]$/ { in_nowrap=1; } \
/^[*$p]\/$/ { in_nowrap=0; print; next; } \
{ if (in_nowrap) \
    print; \
  else
    print ">>>>>>>>" $0; \
}' $1 | fmt -w80 -p">>>>>>>>" | sed -e 's/^>>>>>>>>//' -e 's/  / /g' > $2
