#!/bin/rc

sed '
       s/[     ]+$//
       /       /!d
       /, /{; h; s/,.*//; p; g; s/     .*, /   /; }
' $1 |
sed '
       /\(/{; h; s/\([^)]+\)//; p; g; s/[()]//g; }
' |
sed '
       s/       +/     /
       s/[     ]+$//
       s/  +/ /g
'