Illustrate displayReflectance creation

DEBUG: The scale factor on the illuminant is not quite right the reflectances

Contents

Make an sRGB image
Analyze the sRGB for color temp
Read the sRGB data using the display
END

Make an sRGB image

setTemp = 8000;
scene = sceneCreate('macbeth d65');
wave = sceneGet(scene,'wave');

scene = sceneAdjustIlluminant(scene,blackbody(wave,setTemp,'energy'),true);

oi = oiCreate; oi = oiCompute(oi,scene);
sensor = sensorCreate;
sensor = sensorSet(sensor,'fov',sceneGet(scene,'fov'),oi);
sensor = sensorCompute(sensor,oi);
ip = ipCreate;
ip = ipCompute(ip,sensor);

rgb = ipGet(ip,'srgb');

Analyze the sRGB for color temp

estTemp = srgb2colortemp(rgb);
[theDisplay,spd,illE] = displayReflectance(estTemp,wave);

Read the sRGB data using the display

newScene = sceneFromFile(rgb,'rgb',100,theDisplay,wave,illE);
sceneWindow(newScene);

END