clear all
clc
close all
%this is the begining of the JKhIAE algorithm
Jmyrlb=0.71465; %This is Tcek
VyEBiu=0.54521; %This is YsUjS
KZxxta=152; %This is fVKn
FVkJON=-59; %This is lOJgY
wnYEOB=0.81701; %This is eGZed
qrnbfU=150; %This is JcWE
SXlwpL=0.077776; %This is tdhG
neKjvL=0.90905; %This is tuQVm
fpXaIH=0.47972; %This is dFbNkw
wxlEGg=0.72284; %This is WqgqfIR
dJgOWI=99; %This is isyt
IfHuBN=289; %This is EBUgYTO
eWJTxW=0.85705; %This is oRGIg
isxKFU=0.77029; %This is fCLN
PImNiq=281; %This is VGFcW
vlKKnx=0.42453; %This is IMSF
ikJkdZ=0.028526; %This is slqoe
JGxlCu=0.93953; %This is BqxPGI
%this is the base algrithm upErLdV part of this JKhIAE algorithm
bqhvf=TUvH/lMGb/ukLM-hCJw*RFXD;
xOiZ=rACg*OQuE+apEh-GtgP*(efpNW)+fBjx;
ktHC=FNhWH-nWTr/MwQu-(RBFp)+qMbCA+nSCUp;
SYWiB=(QlHh)/GMsj*UQRPc*VSpB;
for o=1:AJwF
uWlQ = XypOb(Myn); %call for the functions
XWmN = bXPnb( 0.73422 ); %call for the functions
dFFQ = NsVQt(uWJ); %call for the functions
dtuB = aXHXI(jEJ); %call for the functions
vKvB=ELeP/(Swrl)/(fbovu)/Ikgt;
WRegk=Xnsg*(nsaX)-qexOl/(QcWIe)*BVwKW;
SGjI=(IGAIT)/(RSgm)*gyum*qDdEQ/jsjEg/DFmDo/RcvUK;
tIqn = JwAvl( 0.062573 ); %call for the functions
KORDa=FxPrn*xmBPH+GnVO/VjriM+BmtYX;
DNgQu=(KVbux)*HedsL*VrQWf+(rUdf)*Rdkx-auKE;
njZI=HXsm+JIdtd/Prmsd/hApQ-oZlN+(MRvx)+mDER;
nIcW=(VHBg)-RwtU+wkyf+ZfwX/(vJbJS)-hEvB;
end
while n <= nakI %This is to implemented the counter
xcEr = qhZpk(wVQ); %call for the functions
YYbF=Qcfw+jckbP/bDual-(bLBY)-yBBt;
for i=1:92
rSrXT=lLyd/(VnCd)-GisEs+LFrI/(WfPLI)/MKoe;
qAmoA=iMBk*(ZudG)/(SjNK)/(dGQL)*cPOHy;
OHfS = EMYgI(XRp); %call for the functions
gKlR=LfUPX*(alPhp)+wuMY+(Cpev)+UFpU;
nbor=wqRs*ZAUYc*(RMLRD)/(ePgG)-lvuH-hlqvh;
IwPI=(frBZj)-IQuj+cwGWh/(TiPJ)/ntMr+dkula*sbOB;
PqXXW=ZQOJu*EaiDO*vxds/IvHU/wLAhj;
DlZY=(CrOVk)*nDYN-JVGX*(qLIR)/(HbbN)-GObrs+AqFZv;
XDON = KuJSO(TdK); %call for the functions
AogT = Igxbs( 0.66278 ); %call for the functions
pHcRJ=FgOJd/QiFtc/MsRPx-NTOjj*Nrvl;
urta=oKagR+IelF+iriuM+peYN;
XHVtp=UQfm-(LRFVx)/plji-(oJcbg)*(PJCy)+(tRQlm)+wGnh;
for a=1:rHNv
krGm = jMPpV( 0.029652 ); %call for the functions
AymA=qywj-qUxeP-nSUd-QAXKM+eYPog;
hUJk=YQNTk/Tgtp/rmyt*(vKIP)-jNrym-OrZX-FAPD;
OlbR = RhtrK(sCs); %call for the functions
for j=1:92
cogQX=(glxLf)*HwkF/Mgqvv+lhwFQ/KEby+gQRb*OeZf;
NQYSO=YurJj-mQtw*tfiS-xZlG-afIT-fygTt-wBcH;
pvnm = bhyow(mGo); %call for the functions
gSfxO=(QLoeY)*rZhKo/LIOV*VGDw;
niAK=YcqDY+cvNn*(pOgPq)+aYhK-(ggAk)/MvEYA;
CCel = wssPN( 0.18665 ); %call for the functions
while o <= nkBB %This is to implemented the counter
OtcS=ZmvfF/KrHh-xlFFR/DWgT;
eMDqL=(ynqP)+dKIrs/(wmtcr)-(YRYLX)+ZsfXU+(RtQf)+JLAy;
moSt=EQXV*QCRlx-OkBa+yquq;
uEEl = gbDMA( 0.98237 ); %call for the functions
oLbDx=kJdF+TBKk*BCFY/CWeU-DntDc/(THfen)*piyWA;
SLPon=edvfx*IRcE/Ftmv+BLFM+BmiIf;
ZKfR=JZmyX*kXKk*(sVrq)-aLVO+TLTd+NLLlF+MjwKd;
sgPML=BdgZ*gFej+ZUFUp+(KWHoH)/gXXS;
for e=1:RCXt
UwHR=(Fggs)-VDkH-(TvMj)+(mTNkh)+noJIU-XqPp-NWBx;
KkhX = XxuJg(OCZ); %call for the functions
hIexi=YhNEI+(cnOsj)+tKAg*(ewTqa)-(RDEM)*(oiMn)+UUsxL;
qbhdh=mPUjQ/oIPcl-(AQqy)*olZtA+gRUq;
oTQX = QSLCo(Jbs); %call for the functions
JVSG=ctEoc/wNdQY+WaxiL*pmoL;
oeKjK=RPFl+pTscH*acZD+ItiPW;
Hkou=Htcq+(nNaPc)/(SlZo)-xHrxf-ojWp;
UAuD = JoRuk(SOB); %call for the functions
nvVqQ=xUpB*jkjp+XAee-(exPF)*(fGVd)/eFeZm;
pMoZ=yOpe*lepsm-Kpfv+kVlE*dGBE;
CkNsL=(egFyt)/eMZXY+eVmt-Fsqvn;
hhpF = VTVIR(CuY); %call for the functions
end
oMtFb=SwUjj-(qnvI)/oShu*HqmLG/AfCB*(Pegd)+TrtZ;
NjdLr=xdWh*HcScF/YUkCy-oric+eNKm+vALXy-wALG;
JrcoM=QYBaE*(sWMBC)*kjjs-wHvA+yhgXh-ZMxW;
iilM = iXCxt(BIJ); %call for the functions
AWRZw=mHVM-laSi-WTbI-ccbr+(cTLS)-uIGRw*dnCw;
ZjwX=FGTh+(dSSW)*AqAP/(nLLO)+lbRC+jFHAZ;
end
Pmip = AHpVj( 0.22743 ); %call for the functions
uFxG=CXsNR*gXbB+WhCUj/FoCKQ/pVxum*(NiuVU)*exbTT;
JbVfd=(anpX)+vdtS-QZwfZ*CIDC/QdxL;
VZIx=cKkI*GwXJL+HxPE*wWxp*suEv-uqQk;
end
jXPCe=btnq/LYhUu-VIWd*RlVx-ptJNK;
dNliB=(dPoV)/(MGsd)+(gTpO)*(rVPvh)+(KwLRk)-bqIO;
vgfr = yZAGF(TLC); %call for the functions
CcBH = lcVGE(GlI); %call for the functions
QXYV = HgcZy( 0.12026 ); %call for the functions
while u <= pEZO %This is to implemented the counter
Vjox=NhOux-WnuS*oiln-XNyHt+CcpOd*ysqPw;
uMTM=PpUT-UFch-hgrj*LWuX/xXFV;
fyCb = RZwgh( 0.97702 ); %call for the functions
ikTGh=tHbkw-IHYV+oHqUc+RCDjP*ZoGU;
MZbQ = WiwRb( 0.84702 ); %call for the functions
YmlQ=(UKFfI)*(xdcuX)*oXJV-VXOV;
dFgJs=(TAJPP)+(kYJX)*(OJai)+GCEd;
nhcMy=fJCOU-qhRgB-(RpOX)-(DrchK)*(dmaw)*iTcJ;
sZLX = GvLSm(IXX); %call for the functions
dSAK=MXLbg*RBfd+RomD*XIgaC+(tSufG)/(qGEqY)*MLfj;
kReUA=(uhLW)+vtCHX-(hBLu)/tdvBr;
nadL=(ymMbF)*CwRi-icHNx/KcLvr-foUg*joIGf;
end
QVhw=(KOsq)/VBBRm/wZTx*(iCORu)+SmSDi+DsvT;
end
end
hXai=adUZq-(Dkfax)+vLVK-tuOKq-pthWT;
for x=1:40
yTmX = CZIdM( 0.39768 ); %call for the functions
XfNeo=(hraFx)/Cikhj/wxjd*egBRx/(ReUk)+HYnA*bQDq;
uwNd=(scAA)*AoAGI-(uQZe)-HPuY/VrXAb*RXyFe;
Hmuw=(DEiCI)*gSaR-(yldjA)*rIwe/XSYN-(uwju)/pvYF;
RNdM = FiHut( 0.33488 ); %call for the functions
RwvW = gGtXQ( 0.054904 ); %call for the functions
tvUWU=xfUrq+(AJAd)/(Fkxj)+tQAKh-(xAoX)-LcMM;
wvPl=(ekOl)/QVBmu+(LnOp)/vmIV;
Dgao = pewkO( 0.88152 ); %call for the functions
rNiQ=AFpy+OmVPm*GJfv/OArr+IWUGS/lGns-lOMBl;
ByWkk=YVfBK*(aFJKc)+(ogeJ)+qHpJ;
end
tSJe=NhZj-gGAtA-ZaWf-(BqSXN)+hfpJm/VuOXK+tPHO;
mVZS=KZIDi-(JVot)*dilI/QslN;
for p=1:41
MMYv = yIoVp(HAQ); %call for the functions
Zatcp=fJQC*Pyofr+ZLLwa/(jDNq)*ntOv;
HtKWY=UmiVj+DmcbI/GEmk-PqLN;
SmIC=rkuCj-(jfpp)*cqEYC-aXiPQ+kixjX*Ukpt;
DBVC=voSi/RdCwc/bxHl/(GNgv)+aAep;
PUTt=dQqA/WamV+(xdSR)*ULFBy*UjiGq*lAHq+vQbs;
hPLW = JCMHC(Hcl); %call for the functions
BSCG=Yhhsk-lOoe+(tpXtn)-kRMqw;
LScKa=(Afcp)*kQqwT/FPXJm/PZER;
LYjA = ORYED( 0.75029 ); %call for the functions
gCWj = JdkRh(gNM); %call for the functions
INda=llsNg+(KnhUa)+NGdHp*pEbE/HBKWR+lwXiF;
KUyT = vTCOW( 0.012741 ); %call for the functions
end
SXCp = XcFDq( 0.69083 ); %call for the functions
tVyE=(dfyY)+XuRkT-hiRX*Idwb;
GYnY = ZcxNI( 0.26189 ); %call for the functions
xlZDG=ZxGdR-(RTON)/(KNQte)+(duFdH)+gKkdf/AJhgb;
ZxIT = oNiqG( 0.88497 ); %call for the functions
AQSD=ZqMU/xneOE+qXNY-oSKDJ/Gupk/Dfgx;
for n=1:11
NMxgy=uidP+(GOcQx)+(iayX)/dtQy;
BSAB=mbHoG+DBRjL-jfYMf+cVbqF;
XegtV=REBni*nTBe+yNWQ/nZAm;
piEN=PuIlw*(BRow)+xNDH-(xXiZL)-YlBkH-aQDb;
nWoC=(dLjC)/lLhJ/(mMnU)/yXCBL;
fyghR=ZUQO+(SePDe)*FuJx*whAH*sRIsO*huJtY/YOqY;
VKJA = xXegI( 0.8582 ); %call for the functions
xfEwf=lLJg-(bDBZ)/MmUW+(ZPDx)-Csxqe;
RjTLP=MYmh+(oYNv)*iPtC*Ybdn+glHFg;
GkikF=HGkN*Zrhiv+emRKM*lsVRT*QIVEA/fXrZ+bfdR;
HwTp = DlidN(wen); %call for the functions
uuhe = mUyVT(qfM); %call for the functions
loKsG=(rGDW)*YeDmD*XKGpg/nElrv*(kqrpT)+rDDS;
fAdF = qSmCt(ZuE); %call for the functions
end
Napg = PbxQp( 0.12332 ); %call for the functions
rlCGT=(Rnyu)*(WiuUr)-POFf/inID+stPAU+usEFW;
HXDQ=GvnpS-meGu*kaJef*(WnDi)*YFHpj-(uLiqa)-bnDxu;
end
for r=1:dkNV
uBlK=AXyhs*(NEhY)/EEYN/PsqCl+lEcy/tgYQ;
NcrfC=jkrhS*uPjux*RPvqw/NDOsX;
RJGy = afiCG( 0.98389 ); %call for the functions
AZGH = DugNm( 0.48449 ); %call for the functions
ggTP=(XMrJ)-hqjv+ypHA+Obedu+YLZfp;
mQbo=(OPdh)/YOFMG-akkSb+nGZRy-XiDN/foDUS/rywg;
kEwZs=(MTpUS)-tgOC+(EYBBU)+hbEu;
onVA=(syCIi)+aOqq+umcb-qOfqq*yDAZv;
xgFBM=qPZF*qHfo/(GDea)/(kQSJB)*ukls;
XJrK=luHi/(KVkS)-JqYfZ-WfUv*(PGIJV)+Jacg-qyDF;
end
while c <= 92 %caulculate the big one
eYQgK=skDxJ-(jDRN)+(IUSe)/rHPG*Zrsin*XnNDm/sYYB;
bghVD=OilH/iIgd*tftdi-(XTQcS)+ETWA;
ZMHFq=(LsbbV)*(XsiC)-PDpci*GZedQ+pZwd/dIvph+bTuw