#!/bin/sh
ls -1 | grep target || mkdir target
wc paper.ms
cat paper.ms|\
sed "s/}\./}\REMOVEME.\n/g" |\
sed "s/}\,/}\REMOVEME,\n/g" |\
sed "s/^{/.[\n/g" |\
sed "s/}{/\n.]\n.[\n/g" |\
sed "s/{/\n.[\n/g" | sed "s/\}\ /\n.]\n/g" | sed "s/\}/\n.]\n/g" |\
refer -C -Ss -p refer |\
grep -v "^\.lf" |\
sed "s/\ \ (/ (/g"|\
sed "s/)(?!.*\.)/) /g" |\
grep -v "^REMOVEME\n" |\
tr "^" " " |\
sed "s/^ //" |\
perl -0pe 's/\nREMOVEME\.\n/. /g' |
perl -0pe 's/\nREMOVEME,\n/, /g' |
perl -0pe 's/\nREMOVEME//g' |
perl -0pe 's/\n\n\n/\n\n/g' |
cat macros - > target/temp
cat formatting.ms target/temp |\
groff -Eket -Tpdf -ms -P-pa4 > target/paper.pdf
groff -Eket -Thtml -ms target/temp |\
sed -E "s|([^\"\'\>=])(http[s]?://[^[:space:]]*)|\1Available online|g" |\
sed -E "s|^(http[s]?://[^[:space:]]*)|Available online|g" |\
sed "1,6d" > target/temp2
cat header.html target/temp2 |\
sed -E '36 i See this document as a pdf
'> target/paper.html