function [y1,y2,y3] = jmeno(x1,x2,x3,x4)
%                        STRUČNÝ POPIS ČINNOSTI FUNKCE
% function [y1,y2,y3] = jmeno(x1,x2,x3,x4)
% Vstupy povinné:
% x1 ... popis parametru x1
% Vstupy nepovinné:
% x2 ... popis parametru x2
% x3 ... popis parametru x3
% x4 ... popis parametru x4
% Výstupy:
% y1 ... popis parametru y1
% y2 ... popis parametru y2
% y3 ... popis parametru y3
% Volané nestandardní funkce, resp. požadované toolboxy:
% tinv (toolbox stats)

% (C) 1996, V. Veselý, Masaryk University of Brno (Czech Republic)
%

error(nargchk(1,4,nargin));
if nargin<4, x4 = []; end
if nargin<3, x3 = []; end
if nargin<2, x2 = []; end
% Nastavení implicitních (default) hodnot:
if isempty(x2), x2 = default2; end
if isempty(x3), x3 = default3; end
if isempty(x4), x4 = default4; end
% Kontrola dalších podmínek, např. že x2 je čtvercová matice:
  x2sz = size(x2);
  if x2sz(1)~=x2sz(2), error('Matice x2 není čtvercová'); end
     .
     .
     .
% Předání výstupních hodnot:
  y1=v1;
  if nargout>2
     .
     .
     .
     y2=v2; y3=v3;
  end
