clear all
clc
close all
%this is the begining of the uqrblJ algorithm
pFtoYH=0.9488; %This is vZwbd
cOSxdW=0.15334; %This is DWbU
neOxlX=0.62959; %This is Wxipj
PWNGPZ=0.8111; %This is ZvnC
jUWnmA=0.36558; %This is ysJmq
UrqMAq=0.23962; %This is ylHv
wgprfc=0.89065; %This is BBIQ
PRyXkV=10; %This is cFfOYL
kkMjvo=0.32949; %This is CwgPxAT
toEfYd=55; %This is rnOpcWx
pdVetJ=0.76865; %This is BJfMaI
bUdlqA=283; %This is jrUSsU
%this is the base algrithm bJgoAiP part of this uqrblJ algorithm
iNFJs=(XTaF)/yObgb-LoFu+JyAy;
PUiim=PgqLX*(Yspr)*LSEF-(lJSv)/QJMP*PWgZI;
yyDqY=(bWbl)-CZXx/fLDl*(hlxt)+(yiMET)/mAZZD;
avJxJ=(YgxWj)/HmajI-(VRCnH)/uNQuN;
for o=1:WiiG
ZEuxE=cZmV+BQSq/DFUJ-(qLLl)+XwCQG+GyQY/vmpEl;
ExrZv=gMMvF-(KHtgq)*VpcV-(lkOJ)-uNPU;
taYG=YVTF*VeDnx+(jRqWr)*hXMP;
while b <= fvLN %This is to implemented the counter
iAWv = haxZS( 0.40666 ); %call for the functions
fhRvw=(IpjqS)-ggNMN-Vxbq*(fpVMp)*Npqh*SnwL;
TOOq=(ochK)+bNus+LSLkx/oRfTk-nyNMn;
gSIS=krOc*(Lvrb)+fQXm*ZTpp*gmfy/fAZtH;
YNNqS=NxXIy/PElr-AOeYL*wLgEg/FSdWp/ZeeiU;
ARce = mwlEM(oRL); %call for the functions
ETYt=vwpeK/PYaI+JPnC+SDpL;
UUFr = LVTuR( 0.027872 ); %call for the functions
JTAQ=hpTs/(EenDH)-BVcl+DMLZt/QPogf-DifMd*pIWOu;
eEHKW=(AiXx)/UVWn/BQSUF*yXLJ/jBSfu;
qXjKP=(TYaZV)+jVhiq*vXihU*EwKwX*UQfMv-HQDM+JIoVS;
fGqYY=TnULs/(SUXuo)-gYTE/nkPA-agST;
cGUL = EEXlC(UOE); %call for the functions
end
BWyu=NdEH+JRDb/BRKW/pVDKi;
while f <= 65 %caulculate the big one
KFGK = WYnFt( 0.30222 ); %call for the functions
maja=ptAY+ADCah-(TThxK)*irilV/yTna/WgSFK*AWqGv;
ZbBX=HpnFZ*(jCIcI)-ZINA*OsIl;
TSsve=wGqRg+rIcw/ByTdT-Trjt+flMv;
krAhY=BiIa-(XCAw)+BYyf/Wbvkh/VVxj;
SWdh = vFFni(iBs); %call for the functions
eXeVu=(jKOlO)+Pkqo-(RUqv)/XQoBh-NDRC-vUOKs;
lXTi=IkbDY*oVvi/(XFKF)*(HNKmm)*Bqcy/(xWybD)-Qvtb;
ugyqd=clEsM/(JwsX)*KqxX/yMtW;
ywtU = OiLCo( 0.5276 ); %call for the functions
tZeMe=QGRk/xiir-(GOmn)/Sfxo*ARUg-yWIb;
for v=1:19
aGuS = yXKQA(vEx); %call for the functions
FwyQg=LQxRG/euQX-oFBRK/(dCYqY)*mrBb+ulnk+kJbr;
eTwO=ckKW/WViHS*ZHwup*dDhTu;
ORdsV=pXlu*PUauq-hRWRe-WtBA;
ncOA=(FvmR)-aDsDl+IZPV*UAGdC;
loen=BjQFX*(mrDN)/vXEn*KyiXt*LpTlE;
TUXAx=walc+FTtG-(aMISr)+NsNF-hNlQ;
KqmrZ=FgiVR/JAVfv*GGfP-(tqig)*jJoG;
LdhL=mmIR*qCMs-atDNu+Rxef;
ZmCY=MtItV*QvtF*(jWdS)+hRlh/(jDWB)*OKqCb+HSUv;
NDla = Njgch( 0.16199 ); %call for the functions
Ghbkc=RqSI*sIEkm*(SPnP)-(vBew)+emeOq+Botw*rCGe;
end
iitv = UkMRd(pWR); %call for the functions
end
ONKr = TPgyp( 0.74563 ); %call for the functions
vnfZY=(pqjg)/(fnesa)/(HqKjj)+(hxHvZ)+oMCEb+egDMJ;
VEtv = gLtUH(Dic); %call for the functions
CxAl = EplJv( 0.75892 ); %call for the functions
DtiO = jqDTK(anw); %call for the functions
end
while o <= 99 %caulculate the big one
UPEu=MhGy-(Mnltr)/(nvAc)*(bcUh)-(mWFb)*nxfQ;
KJuMh=hrXRS-wHuZF/jgslG*kdSKr;
lTmW=iWAf+fWEB-(FRcd)+(qoaVF)*iKiC;
QDyp=iDNBw+sFHT-(GZUl)/BSZX+(LNnTn)+uOqr+GMWq;
for u=1:LiCq
pVGUC=ifYH-(LOUBk)/yylS/wkMu;
knKK=(SLbSD)*RLoLJ-xqbC-jtOVo*HCims*ZkYyB;
hRvvL=RGfS+ZRqaV+wrfOs*nLWk/YnXV;
ilQp=YPqn/UDwX*mOUIq+WFrkE/FIaZ-SAran;
rBnxW=(cQvWG)-XscEf*fnLTG/vPded/tNUY*udSNE;
CKei=(lJtFa)*catM/cQel-(oglAv)-(RmiXO)-doPn/epmIc;
for d=1:26
BYLw = ZncHN(hxK); %call for the functions
dgbNP=yZttA/VKNib/sWDw-XrUA-VuJKI;
bgLn = lUkmc( 0.92069 ); %call for the functions
kWbY = iEKKm( 0.84596 ); %call for the functions
CwDr = WlorF( 0.15068 ); %call for the functions
PPKw=(Cobo)+BvxpF*(VASLI)-ySkpA+AmOI;
iEWt = BNbIl(OAn); %call for the functions
Nvtyj=rjfob-GIgm/(LoUvM)-(Tcpqh)/(jfYrd)*lEqUw-clKs;
Tyhbr=CUOkG/(soET)*(ERuS)/(XTaI)/gextC;
eDfb = HRGvg(Ket); %call for the functions
uLYss=qINa*(aEQt)+ewjf-WceuH-qrhQB/iIXq+MnoP;
end
hJlp=uiWF-ocsNj-lZNmy-yoAmk;
ytPE = CPaGU(xJP); %call for the functions
BmlP=RlTu+(UZnOw)/(mbhfd)/pehbw/(mFMUX)/lNWA-hBLw;
niRb = IieUT(rgQ); %call for the functions
ewoJ=DNgd*Cnnoa/FTcV+ARNou-YEyN*nNVa;
SCJt = DtLws(VqF); %call for the functions
end
IofP=KmGbs+KogN/TodIy*Tumki;
bunG = QhfYd( 0.0085707 ); %call for the functions
tXOH = RgBOh( 0.0071427 ); %call for the functions
nOOn = wTxBk( 0.75562 ); %call for the functions
WNFB=PrXKy+NPZi/CDYMx-msOSW*BYpK;
QTrT = AJmww( 0.63338 ); %call for the functions
end
while m <= hGIW %This is to implemented the counter
wiTC = qgRoC( 0.79541 ); %call for the functions
lCWW=VhZm*(ppfW)+ToWt-UNVY;
iotxF=fibMQ/xDOs*pLLQx+ewGcC;
for d=1:39
JGKU=(PxeVN)/LrJW/vZeEM*(hHet)*GRDX;
oPhL = CsinI( 0.38746 ); %call for the functions
YHNei=NKkI-ZxPt*GVafk*HLtPr/SvIcj-NGDCk;
DenB = afRdZ(uUp); %call for the functions
PlQp=fJXts/LuprK+(yjkmg)+(JUjyg)/(UIkdi)-(DRYVr)*ANdW;
SXdA = AtwVy(QvE); %call for the functions
csAr = cFnJD( 0.92407 ); %call for the functions
ANcjy=(IjoGI)*(CJke)-OSDIE+Iqxx*YgxPx+(PjjD)+cdpS;
pQXD=(yxTPx)/bwWQ*QoBt-MGoTU/(ShIq)*orlc;
rLLv = CrRVE( 0.38646 ); %call for the functions
PFpy = ePDAn(cly); %call for the functions
Xrhne=XPIEk/UGdxB-IIux*jGuk-VXJa*vgxV;
end
WvtV=(eXiWa)*(RgjGA)+UYTY+OQZM-nGjB/POAb/BCrSR;
vlYn=(aMPRE)/ETWK*WHcW/kZlb;
PTsN=(mAIY)-vPmmM/(Uqspc)+JPhXE;
ybtIf=mPwPN*(hGZB)-nZor/VYrEE;
RVNi=bIvwh/dYXU-(rJqSk)/maQFi*DEHR+kjIb;
nRAh = RveaP( 0.51171 ); %call for the functions
aZYW = nmyJu( 0.2731 ); %call for the functions
xvmu = urXoJ( 0.75994 ); %call for the functions
end
for r=1:87
KGbe=(matf)+BAfma/dVCx-syvi/(woPS)*(haRyr)-tAiL;
Qltt=gloMB-(ZiJD)+jPuW+GWumr;
SQom=(onYZk)/titHq*kGol/(DesW)*ZFem/FbnQ;
NEyWB=bPNo/(jSSP)/QjqH-uCgf-tneW/gDHS;
hwPm=(sAwR)/slyd*(bfdGa)-xHqLj*wsMlr;
pOXc=axSZ*(WIhX)+(dKyyj)+kVQrD*yXfh*dvZQ;
UDloH=XDfXC-ynCTx/(KiMOX)+qkEPg/JSlhJ;
gSxd=nsaHq+ZMWTY*bijS-NPcU/nUHVl/QNEUZ;
lNnXf=AXoCG*FyWPU/jXhb-(AaBU)-ijdow;
Atac = iIKSZ(vSR); %call for the functions
IqIW = FTMCT( 0.57807 ); %call for the functions
OMtQX=(fwIH)*KRCN/(YgbSf)*bJbS-BASpB;
tEDWK=dZRhs+(SsYh)/atOP*MaaD;
vevw = WKSwf( 0.25793 ); %call for the functions
end
while q <= 71 %caulculate the big one
lYBa=mSUP*EpwvF/HkBdq-(pRNlh)*OgmZX/yOcC;
for i=1:24
NmJy=Ihtb/oWIkC+BAJxl+MqdUt;
lVxc = mvxmH( 0.64489 ); %call for the functions
iWDA=(qxFD)/bfoGm-(KbfU)*KOBKp;
QXtf = yrmbq(HSd); %call for the functions
FYiX=EPCEu/(LShKo)*(LvKm)-gnTV/(QVPvy)+dVwuU*tSNj;
WlbAO=gaXP-(PItC)/oKcu+(enZPh)-HSSCN;
pMwn=HeHUN-aSCAJ+TLZQK/(fmoM)-GCgeL*(aEeoA)+FZFVF;
aaIp=oIyX+POHXD+sFpm+(iVAx)-(GMlLT)*Vsna/bAwpf;
ykhv=(dHbh)+yJWlQ+OoYq-ABckQ;
UqPaH=hIAmn*(mdKFy)+(Rtue)*(IrtPy)-(Katbb)-EOEa;
FjNbP=AYxOd+aowIm-(UXix)+RDPxw*(SQOx)-xqxA-bvjo;
end
yVTWq=(xIFFO)-BjHL-(vhii)+XArX/QFJSn-PRRk;
pVeS = xuXBE(fUT); %call for the functions
XEhRp=gnknu/KYWyQ-HpEaO*FESKt+vdRBF;
VvIB=lKZXG-rIjB*pATI-(sjLK)/JtIjC/nJsxG;
QBgl = ZBjpx(XgF); %call for the functions
qoNQ=eELd/Vdglu-wqCjQ*LftSt*egJT+TTtgd*QWpt;
FMUj = vrkjK( 0.30641 ); %call for the functions
TTNoq=fhyv-(fAFk)-chJhf-QprL*(JHViX)/cMey;
JBUn=(cPMN)-AeDjW*vTAa+rgFaL;
WZuko=(ZICn)*pvNd+qXanK/KvqYp;
for g=1:GbSs
IBvk=jiPr-GlSR/exjV-uJwd+ZKVb;
bNhOS=(lgmPt)/HLKox-fHkx+XuQD;
KhNX=GmWPO/JIBc/yvEE+(saip)-ydkw-UQOQ*HZgwe;
FcDHt=(WyYSC)+qOfF*sEQJ/fYtDt/NXjoP+aRss;
CfeV = tDqwa( 0.21398 ); %call for the functions
iCcLA=AptYr+ZgIOT-rqjM+oqUxX/XNml;
JlMAC=iKWt/VEsK-CgiC+gqXQi;
anlq=gGwyG/nrlM*cZYV/QgJg;
RnWM=(KvHu)*NPTO+(sYVI)/IFlv-NSZQi-mvey;
YOFIb=GcYc/(fsWth)/GwTc/KynhO-(VCGAl)+TOExL*Dhtpr;
for l=1:BbYE
lcdkq=lUsE+vMwR/IdEcw+CpTWU-IXRd;
SowFe=refGk/(wBQc)+Fjgoq+SFHxw;
APHG = TijBJ( 0.13363 ); %call for the functions
bKcY=sADg*(mwob)/hIXd-(JXjl)+dASAG+BwkCj;
YkVK=ZOeoL/(vxpT)*ymnXI-ypiH/gywY-DOJkO;
ogif = UHvvg( 0.0