test_dirac = ->
	run_test [
		"dirac(-x)",
		"dirac(x)",
	]