Calculation of receiver functions  
#	using Water-level deconvolution in variable time window
#-----------------------------------------------------------------------

*call  	decon	data
wlevel	.05  	10	timbeg	timend
operat	index	1		# filter is built from component ('index') 1
1	2	3		# applied to components 1, 2, and 3