function [AZ,EL] = ModificarView(AZ,EL)

NotPerfectView = 1;
while NotPerfectView
      disp(sprintf('Modificar VIEW: AZ=%f ; EL=%f', AZ,EL))
      R = input('','s');
      if isempty(R),
         NotPerfectView = 0;
      else
          switch R(1),
              case 'a',   AZ = AZ+2*length(R); view(AZ,EL)
              case 's',   AZ = AZ-2*length(R); view(AZ,EL)
              case 'q',   EL = EL-2*length(R); view(AZ,EL)
              case 'z',   EL = EL+2*length(R); view(AZ,EL)
          end        
          switch R,        
              case 'yz',  AZ = 90;  EL = 0;  view(AZ,EL)
              case 'xz',  AZ = 0;   EL = 0;  view(AZ,EL)
              case '-xz', AZ = 180; EL = 0;  view(AZ,EL)                  
              case 'xy',  AZ = 0;   EL = 90; view(AZ,EL)
              case '-xy', AZ = 90;  EL = 90; view(AZ,EL)                  
          end
      end
end
