
	#macro XIF ( xarg )
		__Get(paramDB(),#xarg).value
	#endmacro

	#macro XDIM
		valint(__Get(paramDB(),"xdim").value)
	#endmacro
	
	#macro YDIM
		valint(__Get(paramDB(),"ydim").value)
	#endmacro
	
	#macro HVAL
		valint(__Get(paramDB(),"hval").value)
	#endmacro

	#macro SYNC2 ( a, b )
		val(__Get(paramDB(),str(#a)).value)*val(__Get(paramDB(),str(#b)).value)
	#endmacro

	#macro SYNC1 ( a, b )
		valint(__Set(paramDB(),str(#a),str(SYNC2(str(#a),str(#b)))).value)
	#endmacro

	'hval = XDIM*.5
	#macro HVALSYNC
		SYNC1 ( "hval", "xdim" )
	#endmacro
	
	#macro PPL
		valint(__Get(paramDB(),"ppl").value)
	#endmacro
				
	#macro PPLSYNC
		valint(__Set(paramDB(),"ppl",str(XDIM)).value)
	#endmacro
	
	#macro GAMMA
		valint(__Get(paramDB(),"gamma").value)
	#endmacro
