% _______  Design :   3D - Earth - Satellite - Ring  _______________
% _____________________________________________

clear ; close all ; clf ;


%   ::::::::   C o l o r i n g  :::::::::::::::::::::
%   colormap([0.99 0.8 0.1])                % alternativ 

colormap(jet(20))
[X,Y,Z] = sphere(25);

subplot(121)
      surf(X*10,Y*10,Z*10)
      pause(1)
% :::::::::::::::::::::::::::::::::::::::::.
subplot(122)
     contour3(X, Y, Z, 25) ;
     colormap(winter(100))

% ::::::::::::::::::. Rotation :::::::::::
     Hrot = findobj('type', 'surface');
     camva(5.5);
     pause(1)
     L = lightangle(20,20);                     % alternativ 
      
      % ______  phi = 10  &   i = 36    =>>  360 rotation ___
      phi =10;            
      for i = 1: 30                           
         rotate(Hrot, [0 1 0], phi)                   % >   "+" or  "-"   direction
         drawnow
     end
     pause(1)
     % :::::::::::::::::::::::::::::::::::::::::::
      hRot = findobj('type', 'patch');
     camva(5.5);
     pause(1)
     L = lightangle(20,20);                     % alternativ 
      
      % ______  phi = 10  &   i = 36    =>>  360 rotation ___
      phi =10;            
      for i = 1: 30                           
         rotate(hRot, [0 1 0], phi, [0 0 0])                   % >   "+" or  "-"   direction
         drawnow
     end