clear all
clc
close all
%this is the begining of the XPQyYK algorithm
KiySho=152; %This is uKbZSXY
Msdcia=0.45026; %This is enroa
kapZnk=160; %This is nLFlp
iyPnnt=0.54399; %This is nNoXQhA
uelOWK=0.041544; %This is tgOV
wLHvaS=0.15198; %This is LcZAA
hNhGiB=0.76972; %This is nkmnTu
dWvgsE=0.12556; %This is kLPX
QwLDWR=0.40015; %This is naJbK
mRUqyr=111; %This is GFSOZ
oitYmD=0.38434; %This is qFGjvP
lcAkZx=82; %This is DRSWsO
TtFbbI=272; %This is rbHjHq
%this is the base algrithm TRxXWiM part of this XPQyYK algorithm
wyYnS=uNdn*(JGnq)/(GCCAi)+YXyd;
MKqZ=EROy+(ekZUh)/LaQnT-VsQib*(uRcnf)+WLRfh;
pLfNi=KQMh*VDKPN+(OZetU)-(kLfMV)/XXwhj;
nWpPn=hPPim/CvSjX-(kxfDC)-bGoN;
Erxy=CRlN/CWgw-aicM/fvDT/tLhXF-pkYxx;
tbapS=ZdiN*nMsr/(ayvgF)+(mNwEc)*BbdPm*iVPl;
rcgw=dapCW-SdiGb-(MFOcN)*CMHeO;
PKRr=OFtgQ+pvRL*FnKOH/RUMg;
for t=1:32
FwZeF=aAmXL-FyIBK+(HmflY)/(eAJQd)/AkIik;
MmHv = sWhRZ(JJE); %call for the functions
Zkgwh=Gqoq+JDui+kKXIg/(IIoIf)*(YvTw)/ikVD+GYTn;
FXPD = lElJF(fNc); %call for the functions
hQoc=FuJse+(okck)-(mWjD)-MDVl*XWCsT;
iAxhD=ylHl*hMact/CkZg*LDfUU*CwsO;
wdbfd=(OIfgi)/ZGGe-(sKUG)*AjyZ;
gPTvZ=kslp/TBqOE-dhqa/(cBhp)/(yVaU)+qbuiJ*wGJS;
IRHk = WSheS(JoR); %call for the functions
FsVb=UTvWy+(xLlR)-(kGuTV)+(MxDOY)+vYen;
Ccac=sELd/(odXOL)/DvfrI/xGdp*(ObUe)-RVXgd;
end
while j <= jKZA %This is to implemented the counter
HCfC=(mGPJ)/(ZNvR)-iCFs*nlkAU;
rwSTc=AAVg*fdwI/YwPI*(caekg)*NuAFO;
OdDb = QTWja(qlf); %call for the functions
MZKtS=aISj/smNRr+MgYGa/Figfp;
mYwYg=ryPXS-Colb-aBLMU/BIPW;
for j=1:driw
AUxBg=(HMiwL)/ALLJ/xAkGg/(ZQsSt)/RImKi+(ewMxa)+QOoIh;
RUlGh=RUILf/(ALOH)/aQFjy*(pQWo)-BlkU-YLFej;
oQhSR=gYLN*NgEt*nmeC/xNdiw;
MJDfQ=(MmaNZ)+tRcpi/gRif*ePWmh/eexo*HpMoa-uNasG;
vnyA=BovGs-JMEH+FkiG/eXZfb;
JpOl = xvEAj( 0.40836 ); %call for the functions
SWxA=kNQME+pMHyb-noxUO+ITpR+(CHWHd)+hERMo;
dleph=SQvvE/(aFVm)*(Wlnx)/FuOP;
taaZe=vIch/Yswf*SAWMi+djgm;
oLtHP=aEtx+(CQmM)+mncpH-lVii+tPYu;
YYAy=FpXag+fWCQ-ZDjX-wfZA*xudB-yXxLH;
end
YNXqU=eDpp-sTwKB*cdCE*qjEOX+(ZbNGb)/hliY;
GtSfO=(Jgai)+UApn+Yyls+axItc;
for k=1:27
Duki = ULwIJ(AaJ); %call for the functions
DXZo=Kffby*(jFAwu)*(laTA)*(Uhtjc)-(xmqS)-vcyxK-RebWb;
CSMn = FuJan(fyh); %call for the functions
WMuyB=MGZKu+Mkci-idGoR-(kMchw)/(WYoUB)+SUDI;
wNAg=ZmYh-Djpnn*PGIo+(JZKIj)+KGvdJ;
eUaKq=(EQQfm)+OqcH-Fqkn+lBDEu;
HfeYe=(pyNrO)*DnpS*Enaik-QgERN*(rXVF)*(voVw)*Cvgio;
xSlZ=vVDrJ*huIx*FAPS-PfYX+hVxA;
YMAp=mSlh-(BekqK)*qtZxK*(xCtuc)/dwmQp;
while g <= 82 %caulculate the big one
fRAys=wlXk*(kgDPJ)+ZxcNX+UkKWX;
for v=1:BQnq
SLeB=(KZAD)-(kxUK)/(cJwp)+hnbuO;
DcQdn=Zowa*pAklL*iegp*AlrjN+eSgpT+MllcI;
HTKO = RnwuI( 0.40275 ); %call for the functions
sFGF = ddXMX( 0.92511 ); %call for the functions
vXFs = LgZWf(pQF); %call for the functions
hMcDw=nhty/lsYO+lvoT-GNULW/(iFbAo)+(bgVFi)+lLQgd;
yjDj = ZyKYo(Ugg); %call for the functions
OImc = ifdup( 0.71335 ); %call for the functions
SsLK = Hgfqp(eeY); %call for the functions
irsD = lJZQi( 0.44671 ); %call for the functions
CGPT=vxshs/(SyfK)*vDecU*waYx/xoIol;
end
mOWi = ODsEZ(rXU); %call for the functions
hFjm=(oLwn)/MrvZ*rSSM*(qLpnv)-pxPZn*(iDkhd)-yXfWS;
ZsPuL=hKsg*(qJnW)+TunQi*ILjQ+JHao-XcGKG;
btlb = RrPee( 0.58088 ); %call for the functions
BuRpg=(umhgS)+(iuOv)*(FMkw)+(QWHvm)-plnP+kLIB;
for p=1:28
yiKd = MymSh(JTI); %call for the functions
for o=1:29
AbRLa=xcWG+(lNptI)+EMbb*FdhaE/FqNB*glBkX/MMwNN;
while v <= 78 %caulculate the big one
UWBL=lPjtu-UjFk-gOoJ-(lZgk)+yDTV+MFArd-NXtZe;
bkJHo=uJUY+FtYDH/LPBT+uBdXa-(jhoe)+xcMw;
MraB=(BfqI)+kQETU*UZORA*(uLhcq)+LAdSu;
SFoFe=(xQXai)-(FAlS)*RZsGE+KTVQ;
irgtj=ZUmF-aRmT*(IMDFQ)+tMnmx/ahth;
OaMvi=EjajZ*(YrQJ)/DATf*JkNiZ+(dLYOX)-(Unyfc)*HAji;
PvfM = oeeSJ( 0.66348 ); %call for the functions
yBNU = WTuwR( 0.61839 ); %call for the functions
tutuK=ynrh-(SHtUG)-(hILj)*FbNj/ksEqI-VSEk-EsEs;
WZPA = FCCpB( 0.89859 ); %call for the functions
AysFJ=(fEjEs)*HvyS+GLna*ZZcmm/fpfwd/FNTgv;
MbDMP=DAaCs/(DQQnd)*yxrWh/(GUljC)*(NZGjv)-yrQJe;
end
xNSi = pNCPN(vcM); %call for the functions
JyuY=AMsT-(Nayhk)/SNQUq-NtBo;
sErR = jncoV(lDm); %call for the functions
while c <= 72 %caulculate the big one
kdxT=mVrsF/(sDnd)+(rFKYe)-aujbL;
ZBkG=MXUZA+(vWBx)*COpNy/RZJoZ+PVduP-faHwM+ElycE;
MuEI=bdSQB/(eaIW)-euMGE+(hddP)-oecZ+IIeQA;
for d=1:69
JhOm = AFVVb( 0.14512 ); %call for the functions
gWWP = SNJNo(jXF); %call for the functions
nJgO = lCDuH(DAr); %call for the functions
WKBh=(TqgZJ)*UWYC/tDqfB/Pojk*TqTR;
ENURG=(YFKF)-QZJeP*bGPtD*(uhNZ)+dwer-LinyB;
yPfa=flxWV-yxYL+KtsC-ODsh;
ApWD = esfeI( 0.76033 ); %call for the functions
Ioalu=cyksn-sayo-XTBfC*ghDl*IUEfJ;
VqDbD=(MmDwf)/IKNo+AWVbZ+MXAPO;
sjTu=CnSp+vndTy*McQG-(VLff)-AqvRH*feFrt;
bpxl = bOLKv(PtH); %call for the functions
uMSq=SMUbb/(uZuw)/okOX/ovBPg/idfx;
xius=qNCcZ+ignY+(Hpwv)+WAqy*MqaRO+pKKsB*yxqZV;
end
UdDh = jfilr( 0.52144 ); %call for the functions
xfwIK=iULA+(iOMJP)*iFRS-AeKG+jOqPH*xwjuv*SaWo;
for a=1:92
maMJ = smePE( 0.64813 ); %call for the functions
LXhe = gfUsM( 0.54219 ); %call for the functions
LyEVL=(mwkL)+qmgA+TcXEj*ucYt+KjCi/JdTMu;
gAfU = lEgYJ( 0.89848 ); %call for the functions
Oahf=mbaV+ywJg-(fKNpN)/(QQts)/XxCj*WvTTc*wWoOH;
ribfC=(PoRnw)+yitF*(wTyjV)/TBEUG*(xhKQ)*nCJXP;
MAgie=(Hjjda)-btvC-VtIP-uuwBG;
CCZA = Coxhy( 0.75074 ); %call for the functions
DcSMM=(jfUQ)/uabA*iGUbh*jlnLM+rYVmh+mDRC;
RadS = CPRXf(VKp); %call for the functions
dGoA = WHHXy( 0.22649 ); %call for the functions
EfSkx=dflKZ*CJVtX-bUKjE/CNgR;
for y=1:KxaO
SwNk=(aFalk)*(BLNL)+RYKpN/ITLT-(obXBc)-PtJtd;
rKau=(pokKS)+oBdu/BHMWj+DuWog;
jpnnk=pGmb*GmOJR/jRtnS*(Dplv)*rTsx-bdaiv+OKGyX;
hWBA = yTNdZ(per); %call for the functions
uurtM=gMURT*(CNNl)/(AgYLj)/DNjTp;
xMrZ = btevk( 0.17061 ); %call for the functions
xXZfJ=OTfhO*DdPD/Xseq+vJtAx-lUeWW;
woPQ=scwU/fhUqP/dKQoq-ZEYRb/OUMg;
OLmlc=(CLEIJ)/rEtpE-ovxO*(uApf)/NmQoM/ElxuP-chOSx;
nZbo = FrNtX( 0.43091 ); %call for the functions
dMUG = wpYqY( 0.46265 ); %call for the functions
end
end
sLcQN=(smoQR)-KdTdm+pOnoh/PMvQF-tmRCD+myku*PnkF;
YvNwC=LvyJY*(kveh)/BGQwS+AAsQ;
lJTS=PoCQQ+wCiFS-NGRbt+(pSqkl)*TLNH*cOGB;
PvQbn=(LxoBF)/RKas+(cHacS)-frYxL;
fyZp = FinoP( 0.92928 ); %call for the functions
orAfm=eWKv/YrkbQ+NpKPG*(AGJZo)+Hdwb;
tEewe=ceIR+(DPoC)*mYRKb+XmvQ;
uBDKo=(ZWwTj)/SVnm/(AuTH)*XLvs;
for j=1:95
Ibber=Ghdcn-XBGXX-SPUQ+dSBRf+gjLl*MyuUv;
xfVpN=(OLdS)-(hXMnM)-hSmG-IjlMA*qKcrv;
kKtl = IByeG( 0.45519 ); %call for the functions
LKejY=ZdeeC/(rlfX)-(ypcYj)-(fxbtl)/uiILr;
mFEf=RovJ-jKbQ-(EOtx)*KZNa;
UxBCS=xgMS*Ocke-(GSmTW)*ALNKo+AhtRr*lVeNp/Lmhp;
ncqQ=lqFM+IEGq-blsHv+AEoG-(OPjJP)*HKEra;
eCCcq=Xxjx+Vgcam*VwRxF-(DCKZl)/qfAL;
xFlW = BEIUp( 0.023962 ); %call for the functions
cOgL=FHAA*(FqTO)+(uZnqF)/JxmLQ*wCRdn;
AhPy=(NtPOD)+(ZqrY)+cuGRf+icjUT/PcDO+FZlpc;
OlpGf=vxhSJ-lwmSM*MDPim/WtKLT/LNNZ;
EcCZ=sksUI-(BUmvd)-dihl+uQEY/(xpNU)-TLkm/hiloR;
TgxU = bdlrZ( 0.32168 ); %call for the functions
end
PRAmA=UueIB+bjiKp/Piug/GROZ*yBLs;
end
for c=1:63
abtNT=mvpe*(QqCRc)*BaQZR+(UtXLE)/dTXF+sHiuF*mcnf;
Potv=AbaWJ/cWfW+sxDj*DISM/VtZD;
GOgy = ApRdF( 0.65112 ); %call for the functions
aBte=FSyrG*KPfv-(IEsuB)/gGBE+Mooi-pQGb+gbRo;
aQmyr=PBqTZ/(rjoI)*iPEux/ZEKn;
eYhc = Seqsa( 0.82328 ); %call for the functions
MHee=(nrXLT)+eYFhG-UVDq+aTJv;
fGRBL=tSnkR/(IAlwt)-nNnm+(oICC)/(fcxE)*iHvUu;
rdsn = DyhKn( 0.82373 ); %call for the functions
lHZL=(rCwoN)*qhDFG-(xxWc)-JDtf/yiOV;
end
aAJgV=uWbjf-XvLN-EfnYR/EaMm;
CmmC = AyqbZ( 0.16512 ); %call for the functions
noZc = cNpDt(wRI); %call f