# KEHOME/bin/cyc2text
# Aug/29/2003

# convert CycL list to text list
# usage: cyc2text <cyclist >textlist
#    input  format: ( x1 x2 ... )
#    output format: one x per line

cat $*		|
sed 's/ /\n/g'	|  # change blank to newline
sed 's/(//g'	|  # delete leading (
sed 's/)//g'	   # delete trailing )

