Hate_Speech_IMAYFLY_and_HOR.../limit_chk_process.m

23 lines
607 B
Mathematica
Raw Normal View History

2022-07-14 07:27:48 +00:00
function dataout2=limit_chk_process(datain,upper_lmt,lower_lmt,data_pass_to_loadflow)
datain=round(datain);
upper_cond=datain>upper_lmt;
lower_cond=datain<lower_lmt;
dataout=(datain.*(~(upper_cond+lower_cond)))+...
upper_lmt.*upper_cond+lower_lmt.*lower_cond;
if(~isempty(find(upper_cond)) | ~isempty(find(lower_cond)) )
dataout=randsrc(1,length(datain),[lower_lmt(1) upper_lmt(1)]);
dataout1=dataout;
else
dataout1=dataout;
end
if(length(unique(dataout1))==1)
dataout=randsrc(1,length(datain),[lower_lmt(1) upper_lmt(1)]);
dataout1=dataout;
end
dataout2=dataout1;