imdirac function

Generates a "dirac" image, i.e. with all values set to 0 except one.