#!/bin/sh
fields="A1D1"
files_to_sort=""
while [ $# -gt 0 ]
do
	case $1 in
		-f) fields=$2; shift;;
		*)  files_to_sort="$files_to_sort $1";;
	esac
	shift
done
echo -e ".R1\nsort $fields; join-authors ANDALSO ANDALSO ANDALSO; \
no-discard; bibliography $files_to_sort\n.R2"| refer | sed -e '
s/\.ds //
/^\.\(nr\|lf\|]<\|]>\)/d
/^\.\\\"/d
s/^\.]-//
/^\.]\[/d
/\[F/d
s/^\[/\%/
s/\(^\%. \)\"\\/\1\\/
/^\%A/s/ANDALSO/\
\%A /g
/^\%E/s/ANDALSO/\
\%E /g
/./,$!d'