#	Use of RAYINVR in velocity tomography
#	Saves intermediate models after subsequent iterations
##############################################################

...
*call	rayinvr	norun	ps	model	# build the model
...
save	model.file0		# save the original model
...
#*call	veltom2	model		# perform 1 step of attenuation
...				# tommography; modify the model
...				# maybe more modifications...
...
*call	rayinvr			model	# this 'rayinvr' call refers
save	model.file1		# to the same model, saves it
...				# in model.file1
...
#*call	veltom2	model		# more modificatons...
...
*call	rayinvr			model	# save new version of the model
save	model.file2		
...				# etc.