image IMG1
IMG1 := RealImage ("New", 4, 100, 100)
IMG1[0,0,50,50] = iradius // The center is at x = 25 and y = 25.
ShowImage(IMG1)
