function res=couleur7(k)


%	couleur7 : renvoie une couleur (modulo 7).
%
% *********************************************************
%
%	res=couleur(k) est une chaîne de caractère telle que 
%   si k (mod 7)=1, couleur7='b';
%   si k (mod 7)=2, couleur7='g';
%   si k (mod 7)=3, couleur7='r';
%   si k (mod 7)=4, couleur7='c';
%   si k (mod 7)=5, couleur7='m';
%   si k (mod 7)=6, couleur7='y';
%   si k (mod 7)=0, couleur7='k';
%	
%	variables d'entrées : k entier
%
%	variables de sortie : res chaîne de caractère.
% 
% 
% ************ Fonctions auxiliaires utilisées ************
%
%       aucune
%
% *********************************************************
%

% Contrôles d'entrée
% nombre d'arguments
if nargin~=1
   error('nombre d''arguments de la fonction incorrect');
end

% corps d'algorithme
switch mod(k,7)
   case 1
      res='b';
   case 2
      res='g';
   case 3
      res='r';
   case 4
      res='c';
   case 5
      res='m';
   case 6
      res='y';
   case 0
      res='k';
end

