#	plot the output of SIA floa using Seismic UNIX suxwigb
#	which will perform picking into file su.picks
##########################################################################

	*call	pipe	su-in		# open an input pipe for SU
	...
	*call	write	su ...	su-in	# organize writinig in SU format into
					# the input pipe
	...

	*call	write	su ...	su-in	# you may use several write operations
	...

	*call	shell	suxwigb mpicks=su.picks	  # run SU suxwigb program
	input	su-in			# connect its I/O to 'write' above

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