function varargout = sblibdrv(blk,varargin)
%SBLIBDRV Gateway function to the private directory of SB2SL.
%
%

% Initial coding by A. S. Bozin, 23-04-98
% Copyright 1997-2000 The MathWorks, Inc.
% $Revision: 1.8 $ $Date: 2000/06/14 16:08:20 $

   if (nargin == 0)
      blk = 'Unknown';
   end
   %
   % Action depends on BLK variable
   %
   switch (blk)
   case 'Integrator'
      varargout = cell(1,2);
      [varargout{:}] = mblkint(varargin{:});
   case 'NumDen'
      varargout = cell(1,4);
      [varargout{:}] = mblktf(varargin{:});
   case 'CmplxZP'
      varargout = cell(1,4);
      [varargout{:}] = mblkczp(varargin{:});
   case 'MultiLin'
      varargout = mblkmdl(varargin{:});
   case 'DataStore'
      varargout = cell(1,2);
      [varargout{:}] = mblkds(varargin{:});
   case 'pidControl'
      varargout = cell(1,2);
      [varargout{:}] = mblkpid(varargin{:});
   case 'AlgebraicExp'
      varargout = mblkalg(varargin{:});
   case 'LogicalExp'
      varargout = cell(1,5);
      [varargout{:}] = mblklog(varargin{:});
   case 'dDelay'
      varargout = cell(1,4);
      [varargout{:}] = mblkdel(varargin{:});
   otherwise
   end
   return					   % Last card of SBLIBDRV
