#
# Rather dummy input-filter for MARC
#

BEGIN			     { begin record usmarc }
/^00./ / / BODY /\n/         {
                                begin element $0
				data -element @ $2
				end element
                             }
/^.../ / / /../              { begin element $0 }
/[$*]/ /./ / / BODY / *[$*\n]/  { data -element $1 $3; unread 4 }
/\n/                         { end element }

/./                          { }
