function [lc]=light_centered(nlev)
%
% [lc]=light_centered(100);
% sphere(100);colormap(lc)
%
% Nuno Serra 2017 :-)

rgb=[0 1 1; .2 .2 1; 1 1 1;1 .2 .2;1 1 0];

for i=1:3;lc(:,i)=interp1([0 30 50 70 100],rgb(:,i),[0:100/nlev:100]);end
