Kinoform

This code calculates a kinoform.

CWO a;
a.Load("sample.bmp"); //Load image file 
a.Diffract(0.1, CWO_ANGULAR); //Calculate diffraction from the image using the angular spectrum method
a.Arg(); //Taking the argument of the diffracted result
a.Scale(255); // Convert the argument to 256 gray scale data
a.Save("diffract.bmp"); //Save the argument as bitmap file