% function [upp,low,pert,dleft,dright] = easymu(m,blk)
%
%  upper and lower bounds for mu(M). M is the input
%  constant matrix and BLK is the block structure.
%
%  See also: MU, UNWRAPD, UNWRAPP.

function [upp,low,pert,dleft,dright] = easymu(m,blk)
 if nargin < 2
   disp(['usage: [upp,low,pert,dleft,dright] = easymu(m,blk)']);
   return
 end
 [bnds,row_d,se,row_p,pinfo] = mu(m,blk);

   pert = unwrapp(row_p,blk);
   [dleft,dright] = unwrapd(row_d,blk);
   upp = sel(bnds,1,1);
   low = sel(bnds,1,2);
if pinfo(1) == 0
	disp(' converged ')
 else
   disp('mu calculation did not converge - sorry')
 end
%
% Copyright MUSYN INC 1991,  All Rights Reserved
