function bbs=betaset(type,mn,var,min,max);
%this function makes a set of betavalues to be used in to 
% generate correlated vital rate values. 
bbs = zeros(99,1);
	if type ~= 3
 	 for fx99 = 1:99
  		if type ==1; 
			bbs(fx99) = betaval(mn,sqrt(var),fx99/100); end;
		if type ==2; 
			bbs(fx99) = stretchbetaval(mn,sqrt(var),...
				min, max, fx99/100); end;
 	 end; %fx100
	end; %if 
betaset=bbs;