#	Copy SEG-2 files from a tape into files named rec0001, rec0002, etc.
#	in the directory /seismic/data
#	Any legal C format of the mask can be used, assuming an integer
#	file number
##########################################################################

	*call	tapedmp	/seismic/data/rec%04d
		125		/dev/tape	# max 125 files from /dev/tape

##########################################################################