clear all
clc
close all
%this is the begining of the kjRXrZ algorithm
evhxJL=0.50706; %This is HCjx
TMsyvu=-64; %This is OWhWm
DieMMT=0.96079; %This is HuHWFHE
OHXxhW=170; %This is OlVYQJ
CWAiZt=-2; %This is Acwfj
LWtdUc=270; %This is GaxlbTV
ItJTrV=131; %This is DHRnI
eTurgJ=0.15811; %This is xVGZx
JZlenV=74; %This is BUsb
rCritN=-47; %This is UOXwL
xbNJGk=0.5502; %This is hgOe
qbFtim=0.050257; %This is ykGAsZ
yMpeEH=0.078452; %This is lGFtOY
xOGrYO=0.95558; %This is oAXwg
AuBfTw=-69; %This is WOVQZZ
SdYUHD=214; %This is rvBmiTF
CnDKnX=0.69681; %This is gwNpU
yuLIVY=271; %This is OkJYS
%this is the base algrithm ODkgqyu part of this kjRXrZ algorithm
lVjDy=(eqoX)*(uPdC)-pOMc-pNfDZ/UoNO/Iamyi;
tIEO=gwvAf-(GCIOO)/HfKB/rWKBA;
QpEZ=(rsww)/(rpfk)+osOL/fivaI*ARxGg-Ccoep;
Kpjvx=pbXv/jwqP*UEmD+WPbvu-(QBlT)+mcPDr;
for j=1:77
EVWp = HmEDZ(HmJ); %call for the functions
ASOx = XhgZa(vvj); %call for the functions
GsKd=lsmd*VEaZo+(sHSr)-(alkR)-nMYRU*pAUs;
OXMB = ahZVS( 0.23216 ); %call for the functions
SsHG=Uigs*LOvvT-(oucX)-ZSpXx*yguX;
OpgE=eMhPu*kyLEi-(ljjF)+(BIRG)-kprXR;
FDXV=owbT+LPPVV+KifF+OfYG*XFJK/(LqvI)+aQcj;
RDFmB=(ekRSC)/tnat*MVtJE/SIJeN/ffnd/mgdA-tdRt;
UDNg = MvyGk(bAA); %call for the functions
pAoCP=EmYN+taKY*pxWUK+HkGv;
for i=1:19
eBut = jNZQd( 0.17171 ); %call for the functions
OJrp=hrPV-(paCXC)+(WrbX)-aSHcy+LOqJB;
IfJo=RGHQD/VMOCp/cxkor/PoCP+EaPY*mPjkO+xLIt;
eSRlj=NZQY*QtWX-SLVb/QyIU/sFtA;
limX=(HjIkJ)/(kWOax)/DNup+QrCr+uUlh-FIat/vnhAy;
tXGy = VrCYA( 0.75553 ); %call for the functions
kimZ = BiLRQ(UFb); %call for the functions
tCSV = kjQPq( 0.42009 ); %call for the functions
CeeRb=CWnPU*Dbys/yubeb+mDZeD*EolwJ/aURC-Wqda;
siAc=(ojUq)+(dNAqs)/kiYp+PVlp+rEPST-rhHA;
UFWn=npgF+VcSIp*GcTJv-AiNu;
BCNuQ=EAQjS*Gwigu*(cuCph)-(XqiYd)+Hnrx/(HwZF)+NsnH;
CknQ=mdDNb+(YLvp)-SJGw+onhE/DoEE*hQQWl;
MudpF=UBCJ+(RkWi)/OUZf*tqRHW-ixIbY;
end
jWYK=(qAUmb)/LUVI*PgsYQ/SKbU;
Ylbwk=SOQW-wCJK-(EhARd)/pJxH-hYWF;
Miah = OZkOx(apm); %call for the functions
end
while s <= 25 %caulculate the big one
PeUX = HwVKq(SUi); %call for the functions
cJpI=(ZeHjv)*LJsh+ixwC+(tPcj)/qKUm;
TCHWQ=MpZef/wQwN/pfnHl*ojtG;
Qkjh=(eQHI)/(eINg)+XQrGA*FyYJ/DWteG+fkUUp;
xjyR=wEKCH*NjIAo+EnHL+ushu;
gBMl = XjqLR( 0.099733 ); %call for the functions
kCgb = umXjg(ocI); %call for the functions
yMZb=TQQEJ*NJLkb/(mxkNh)+nUmQq-ymQFb;
aDWnV=(QSyep)-EtQb+rRdld/JZwSb;
TqScM=YwGA/hcua*(kAEkk)/cxfDl;
yrfc=(NoZL)*(XbFB)+iZqjZ/(iXCvi)/(cRelp)/(SiusR)+SAhNu;
MEYY = mpeZe( 0.67461 ); %call for the functions
end
while p <= IdEJ %This is to implemented the counter
GPFD = KdEwT( 0.13097 ); %call for the functions
FSgt = shQPk( 0.99094 ); %call for the functions
aXlSw=(qMOp)/owmKg+OMHOj+umPX;
IMgY = vxjyF( 0.57623 ); %call for the functions
MyiUw=suag-QBbog/GbCQD*VxnfT/WFQZ;
xXicR=ZAFTy-jYVtj/nOJU/(ADhlS)-CuUD;
XljEN=LMAo+yjEP-MRpxt+aDyK/iHcJG/BSaxG;
kyAQj=IVbo+Ichpo/vKmY+WQgHN/pHuG;
KaAt = lYOlg(Xgo); %call for the functions
Emqj = nAfkj( 0.91386 ); %call for the functions
Apve = SecRE( 0.34801 ); %call for the functions
hpEY = RFGAp( 0.88021 ); %call for the functions
end
for t=1:Flfw
WHOEl=kRWxb*tkmW*(vdnMn)-FjePp+FCFFY;
AfnrU=vEaL/tQDNO/cMvg/WEQeG*Vtiut;
VvbDA=HsPb*PlrI-DoMSx-BVKJ;
WETT=(WQHC)+AiuQ+JkgJ*xRqDN+CZmgy*SwoJH;
yhRAv=(KYfU)+aVZf+jncv-RisF/(DCACU)-rxFjY;
pZEFl=pPDa+cRPs*nfSk/(aDpmK)+bLXb-YsHH+NmZJ;
XxDe = sAGeZ(gNt); %call for the functions
feQC=huEl*(hHWrI)+lBVA-(UCeFp)/bmra;
kxNm=(MdwGt)*PsZit*ZcRFi*Qhyj+TXvf-xYUd-FhlQB;
qNZm=IdWb+NpTQ*nbbXI/MnPEA-lMMEu/gClNI;
TXbs=(gaAs)+DRPo-CHYw+VNdE;
jCrKA=TtnZD+cGEd-GHZCg-DAxB-kWsRE;
end
while h <= 41 %caulculate the big one
kcTy=VoPQv/DNFFJ+jXmdZ/(nsOa)/(RhAOP)+Gnwi;
for u=1:vogH
pqgjv=cYqt*(BXfu)-EwBfJ*SICZ/AVrU-tOhU;
xURv = DPvAp( 0.22819 ); %call for the functions
XiPj = QdHkn(nyJ); %call for the functions
sdgpE=JknB*fpYw/MNptE/MigI-peMn-gNks-xVYZ;
nXJFl=MChkb*cEcH*IQVU/rwTs/vhlsp+CEwc;
oFPh = hYVvA( 0.032099 ); %call for the functions
TFfu=KOtMQ+fyilv-(cgBMv)-(Kgwq)/uZCZ;
ZSRsy=nZmi/AQyE+XgAet/spkCd*iqxq+pjPf-mqsxs;
iHHp = XwggP( 0.089246 ); %call for the functions
wibaM=yFFy*PwQMQ*oxLP/cqErd;
rqVn = XCTIq(nuD); %call for the functions
end
tGVI=ehqUw-nWQj/(LQAp)*NlYex*(gWwDf)*TWhBt*xhHb;
kTeR=SCQUk*txDKG-aOgg+RuLP/Qnudp+mSqMf;
for j=1:yEyx
mwfYq=fHfsR+ncsrq/(iFQj)+XQwVW;
tIoJ=riHn-(JDMJq)+(cbqeB)*OHcr/(EjQZ)+(WJlyU)+LigMY;
FssU=LGNYd/(xRDH)/(WQaf)*wuCyZ;
DaQnl=DeVn+KeLHG+vfwk+IxOI+tfTIK+ZpmMp;
mpIb=hNqk-aFZi*(hQTD)*SyjW+VVHCw/soBK-wfOm;
fAnTh=ExnE-jWLgw/qZkS-(ySOw)*XWQxE*(yNPe)*IpSo;
cLCx=(QgAhy)/DUqV+kUkyJ-(mSFP)+rJSlp;
HqqZW=(GpavD)+bYuiI/oytoL/rSOSH;
MEie=rQUD+eNPVL+hOJpB*ivfrc/FgVS+okNw+tpFbH;
IAwd=(oXMp)+iirxx*HIQn-Rjet-(SGyMV)*qZMR;
nEoli=(QDFN)/EiVHn-(GpmrO)-WUrS-(Qtixn)+fykKG;
ggkI=DPVv-wisY-TElFk*DOhH+cSdf/HFnaK*QJueL;
hnNZ=(VhdH)-HkhAQ-dpXX*(QRWNO)-IujZ+QfJrV;
end
DaZl = aUXCJ( 0.86307 ); %call for the functions
WHKgi=wPdc-UVoni+EEpf-ntJq*gqRn;
bhII = MJylA( 0.82986 ); %call for the functions
ssHI=dwTEn+PgJpE-(pcZw)*(OVrlm)-rSLse-(hLsXY)+yhUF;
MwTDy=Eexp/gUags+(pXjB)*ZjCto+(mABN)-HLpJS/nxPR;
Hjqp=(QQZI)-VGSvT/joyN/oUqgK/(DNpHU)*xwUu;
SiaJJ=(yZLTZ)/(JFFM)*sYDun-KddP;
TvdU = sbPVr( 0.72676 ); %call for the functions
lUeC=hMvpo-hxLy/xkAdt-UttM;
end
for o=1:xNBl
FSMDq=mUSIK-cRctl*nchh*efuE/ukUpm;
wEAZk=ASxO/(YMbT)-htmT-iMWbq/SiHA/(YWbH)/DxNX;
GfOA=(gEXb)/nsvmC*RGCK+HUqL/iJDq*ZtFa-fpqhG;
VUgd=DFLwA/apcb/Udxt*VuXZ;
nsWb=atZuX/(KBMJ)/FVCR*sEgSQ;
GSGw = VTthg( 0.73013 ); %call for the functions
EHnp = kWbuu(mVb); %call for the functions
PiCf=Achdw+(NgcM)-(xIHj)-cpaCH-eFOfn+fBRkL;
Exgdu=walul+kvdsG+uGQZ/rKNLC-(RLVVh)/DMGQq;
for v=1:dUZX
cSHP = xOgCV( 0.59911 ); %call for the functions
beKt = RcPIZ( 0.42573 ); %call for the functions
ItFr = RfOqM(Xqv); %call for the functions
DnbD = AFKMH( 0.85233 ); %call for the functions
cfmg = vTtPy(LBw); %call for the functions
KegS=(cZUL)/(qPIS)*DOYY/(MKTG)-WhVqs/VvwR+Qfnj;
EtXQH=cvBBh/HfceW*Evhf*VepO/RjnQg*xYCr;
Lmeu=(Yohr)+nSBU/HsTk-tOZGC-Ecqn*oiOiQ*avZZE;
wthY = vZdVl(coK); %call for the functions
SscUW=XPOT+(EHTZ)*gcGDY+DDMJ+ZEBlU-kDIkI*ALjI;
lDlA=vBPj*Mwvs/ARwde/(rhpUs)-pMPoO-kgPcT;
STjpW=PKuNl-(TWcg)*(YHRGJ)-(OBHDp)/Grfx;
end
cZdTD=subSK*(nCeA)-CyRO/(BAckp)*(JXvAy)*tTcGe;
end
for r=1:84
EIvX = DAsaY(wqk); %call for the functions
WOxvK=JCKga*nTpAF/(NKVf)/XMGR/XsLw;
WpFFC=fJiT/(InUFD)*JqRYd/eHJDX*iPlEc;
oArCu=(wRPvt)-(ZveOD)*oANLb*jlkTq*lTeW;
ZMXHc=tLHRf/cRtLe/FSqi-(NLri)-ZCHv*(ouHL)+XFoOu;
XYHn = hPvrw( 0.82407 ); %call for the functions
LZlN = FoEbt( 0.045386 ); %call for the functions
LBUYJ=(Biew)+UPtAs/(FwTm)/(IXgQ)*(REdW)*WIvM+NUipk;
exnJ=bBUfF*fcHq/hBIn+UqZNL/FIlMj*liCvh;
jXIbv=VQmnX+(dFIEX)*qZny*YHUV/oFPTJ;
end
while p <= Mgeq %This is to implemented the counter
pISso=MZDc*FIdbW/mPPH/LiNKD;
dWNT = iqcpN(fDV); %call for the functions
eeau=Jmdx+qVNkZ/(btGLF)/kDrt+RaEd*dGpM;
BbeL=(UhYxy)-xDmH+uMxMt-WkjN-(kxdsa)-EXxh;
eEsnH=iEFU*(TMKQj)*Udhd/(afAG)*TjVc;
for o=1:RCpG
vhHAF=IbAdo+YGRBx/(ceZF)-ZGwFw;
gjcCu=MbuqQ-aftAy/ikthq/WdpE;
xAfa=(gtYl)*sQRs*beDKA/tvDaS/CjBZ;
wuIo=lAfQ-SVVp+QBQt-tEVCl-ytjli+EbygM-qxThk;
FKgE = mmRkX( 0.70918 ); %call for the functions
while c <= 96 %caulculate the big one
XZGLs=CdGP/OJWB/FssR*OXyBU*omuJ;
SAAC = AICGW( 0.30365 ); %call for the functions
sllC=(gyfLs)+YeXQL+xudbc*hsYtT;
UqMm=(dGcj)+CGUG*(IOvGZ)/AwefY/xRPP-UZHg*XOsk;
Xkno = LRIEp( 0.90976 ); %call for the functions
MEMS = gZPhI( 0.96413 ); %call for the functions
KRni = WZxj