/^\.\\\"\+sep$/ { sep = 1; }
/^\.\\\"\-sep$/ { sep = 0; }
/^\.\\\"\-opts$/ { opts = 0; lines[n] = lines[n] ".RE\n"; }
-/^\.SP/ { print; getline; lines[n] = lines[n] $0 "\n"; }
+/^\.SP/ { print ".TP"; getline; lines[n] = lines[n] $0 "\n"; }
/^\.TP/ { if (opts) { print; getline; lines[n] = lines[n] $0 "\n"; } }
/^\.SS/ { if (sep) lines[n] = lines[n] ".PP\n"; }