function [y,i]=fminimum(w,f)
%FMINIMUM   Minimum of MVFR matrix
%       FMINIMUM(W,F) applies MIN to each component matrix of
%       the MVFR matrix, F, and returns one row per frequency.
%
%       [Y,I]=FMINIMUM(W,F) also returns the indices of the
%       minimum elements in each component matrix.
%       See MIN,FMAX

%       Dr M.P. Ford 4th August 1987
% Copyright (c) 1987,1993 by GEC Engineering Research Centre and 
% Cambridge Control Ltd. All Rights Reserved.
% History:
%   Name changed from `fmin' to `fminimum' to prevent name clash
%   with Matlab, 30.5.93, JMM.


[m,n]=fsize(w,f);
lw=length(w);
k=1:m;
if min(m,n)==1
   n=1;
end
y=zeros(lw,n);
if nargout==2
  i=zeros(lw,n);
  for j=1:lw
    [y(j,:),i(j,:)]=min(f(k+m*(j-1),:));  % break up f into matrices
  end
else
  for j=1:lw
    y(j,:)=min(f(k+m*(j-1),:));  % break up f into matrices
  end
end