clf;[X,Y,Z]=sphere(40);colormap(jet)subplot(1,2,1),surf(X,Y,Z),axis off square,shading interplight('position',[0 -10 1.5],'style','infinite') material shinysubplot(1,2,2),surf(X,Y,Z,-Z),axis off square ,shading flatlight;lighting flatlight('position'…