#	Define a 2-D MAP (velocity model),
#	with 2 entries: Vp and Y
#	Vp is read  from the file Vp.d, and multiplied by 0.001
#	Y is set constant = 0.001
#---------------------------------------------------------

*call	readtab	map	RIGHT
X	float	1	.01
Z	float	2	.01
Y	float
Vp	float

set	vp
.001			vp
argrang	X	30000	1500	125
argrang	Z	0	1000	26
file	all	Vp.d
Y	.001

#---------------------------------------------------------