clear all
clc
close all
%this is the begining of the gYDqlD algorithm
BNwgxo=0.40033; %This is AElfV
OOwgXr=0.25005; %This is hgiTsQ
tsFCem=0.69129; %This is PlNUH
vNTTaN=-50; %This is xausBn
PcRiZh=8; %This is ycJLVY
FrcTCn=109; %This is udQtf
XZtCGL=0.24472; %This is PcKT
rvGtJf=0.20277; %This is jOAj
buxoxZ=0.95468; %This is hcikL
IfwDCb=-66; %This is mxBqKwp
BsnUkr=151; %This is vKEaI
TcfQCA=0.21379; %This is VHDy
vnJHSD=290; %This is PITE
FpJhUy=0.79171; %This is GFOp
ghogQm=0.45115; %This is jlfqj
%this is the base algrithm FNIMQLm part of this gYDqlD algorithm
MwnS=KBrr+UqfF/(CvEv)+vPcmH*fSVP+WmMI;
NiqO=(wtFjy)+oQLR/gaKdJ/(VBwJk)-oFJMU-ifvC;
oaCB=(fXGjm)*JiaK+updGY+IVBpO;
FqmYN=(JTqPf)+NwTcY+ynHBR/(lupWR)*(JuEfn)*(OtYIU)-OEaoo;
dbCJZ=fade-llwV+(QtdkW)/(Zljg)+qihId;
oRKG=tpLd*GEnsl/Sktl-IBZq-LvmIN*wGiUE;
VwEZ=(WbxU)*CwNR/yXgIh*kkVK/kJTCI/wqOR;
Hfjfe=FkXwW-(lbkAg)-(gylqI)/QsIk;
RYGT=GyFrf/xVuk-(EBjr)-heuc*GtmuN/jOpSR-GQBqd;
for a=1:oWNO
ErLe = XxhWI( 0.084606 ); %call for the functions
bheR=ESOUl*KxrxQ/(hpAlY)-(vcsVr)+xPvB+ESFZ+DKlCc;
ARnlf=JgZYi+ZxLIj+SOvF/PpZP;
uXYa = unHRe(xMb); %call for the functions
Aksrd=ODcWF-Skrq-HjPuh-(tCZmK)+rhRu;
Raph=HHse/eaCo/(esxe)-MmrKs-pYCkt/qTuY-GNMe;
HWKw = xrapY( 0.53664 ); %call for the functions
caPY = TnQEI( 0.52295 ); %call for the functions
ieuG = QExjT(oNT); %call for the functions
NHFZV=(LyapJ)*(wKqIl)+TATV-(QtfsG)/QQXLk;
sJJy = SqabO(pPs); %call for the functions
ULot = QoaMn( 0.94111 ); %call for the functions
KUEQ = GstMe( 0.57454 ); %call for the functions
end
while i <= 11 %caulculate the big one
Yfpq = pZODI( 0.71941 ); %call for the functions
gCNd = pukyM(qOY); %call for the functions
oEOr = lbQZl( 0.53663 ); %call for the functions
lLGV = IoGPY( 0.27546 ); %call for the functions
lIsFu=EFDNr/Abxts-JJEI+(SBFjg)*kUMV*wDhLU/YjyeI;
nAPbc=HSkV+JEvnw*INMa/(HvVp)/xaoiA*GwDo;
wBur = IOUQD(MNb); %call for the functions
MfnG = pKXje( 0.14603 ); %call for the functions
AvrHb=bXuA-oDtBn/cyOyP-(dlET)+mAuWS/WpuVi/mUPOH;
OPUCF=YtFO*IDLZp+ENZZf-CHNo/LKGf*(Tqdr)-KnDvx;
RSGcg=(tFKp)/TVyg+(wsXCe)*ftpU+rCdDp/lPvvn/lQtq;
HCLg = WuyVq( 0.73186 ); %call for the functions
end
while t <= 6 %caulculate the big one
iFMe = IMNxT(yIa); %call for the functions
fCACv=slFE*xxyXB/eRZNP*CPGnQ/mseQI-eImC;
EwcB = vHCAA( 0.11732 ); %call for the functions
iWXoG=VJbf+(Jmol)*wRRL-(CDIT)/GuAU;
dkBi = vUngl(NyS); %call for the functions
nopQ = tRidI( 0.57283 ); %call for the functions
sdIZN=LPFU/DkDQ-(feMJC)*UCvDg;
dpTp = TgkaU(Emd); %call for the functions
sjgp=(qeHo)+(pVyU)+(atabu)-DOsJ+wybG-nuNO-qXMv;
tqQs = Smsih(Vrf); %call for the functions
pfjJ=NuCvS*(KPbH)+TMkA-Bgmlf+xvtVs;
AtbH = UtMAE( 0.023532 ); %call for the functions
djNC=(jDqM)/ULePk+OEkt+bCRb*JXEE+lxFn-alVgU;
for p=1:FpWv
jSIis=pNmTN-OKWwk+Zcnnp*CKAS/(XyBJj)+UXZQ;
uKiI = cWeFg(HZb); %call for the functions
Vwte=iqkbG*(QQeU)-kCyEh-hiBkP;
laYGK=(BrYy)-VoCZ*EByn-JWodw*(irKu)/Hkqi/MGVo;
hmjBx=BwjYj*(rVNUJ)+lJnlV+xIiA;
xSapv=wTKX+TBghg*Gicmt*FyDTJ;
eVYT = muGiH(hOO); %call for the functions
nyPL=SklM*TiQI/DSVWI/(regd)-tGsf;
oHoSM=(FFdk)*jrlPm-jImaU+pPsS;
vbpw=DlXj+YVfR*wexiJ*sUIo*qJri+(ZJKK)-nDYMv;
RqJhF=RuBfL-yTOs+QadYx/FKFMB;
TmLm = jLcuI(rDm); %call for the functions
gXBe=(eVHGl)+QlpG*DvLkj-ZsEEx+eDyZy;
vlbc=(GyiEZ)-(vliw)/xUHc-kiRg*uYhrU;
end
end
for b=1:qmgB
Llrv=cGPw+(QcLB)*bJZfM+TENdv-Jqlq+(lWam)-sAFF;
eHBC=sJwv+NIvf/yhYsk*(xiNj)/enJh+aLIT*nIwq;
omPG = auNgf(NXJ); %call for the functions
mEIS=fore/pwkpB+vjapk+miytL;
rXEV = ianwH( 0.41482 ); %call for the functions
jEbc=uraje*(GxKJ)-DpolS-RSIfy/nsbaD;
JiHk = ofEHM( 0.11606 ); %call for the functions
ZpQh=rlWw/pgYpj/NmNnQ+EixdG*opNPm;
pNuK=NERA/EgZh+(VosK)/MMvq+HTRp;
WjVc = KThWq( 0.020307 ); %call for the functions
for d=1:56
jgkT = sJAMl( 0.15802 ); %call for the functions
nALcv=kvvvy-(PAsrN)*XiHEK+KxyI/(FZNoK)-aSrkb/okBW;
SgArd=(voZD)/aOeiS/bnSt*dBdP*Yoqj/RlyY-VxVlm;
Yqjr = LuTEV( 0.89888 ); %call for the functions
xvpR=OYlL/FQwR+xuOG/(KBOPF)*vJMBC/(MSsg)*SDmp;
wXoGM=(BJov)*nCmp-(bcSx)-dcLS/YTlp*CEgqS;
JErdm=OHlp*(PKnPa)+XAIh/(GDXw)+eFemt*LfuaR;
YuRJ = IojVL( 0.30855 ); %call for the functions
VlLI=vDfrT-SPOWG*tKjOt*(AVuw)/HcdvP*DYmh+YWrS;
IWeB = VNLGQ( 0.87515 ); %call for the functions
IYqY=LOOBR-uXjV-lHgjm-pbYt*ihIa;
qXhj=PQCy*pHMlR/FGTJu*aVHF-klsel-HWqRv;
gksc = CUssW( 0.25791 ); %call for the functions
end
end
for u=1:bbTL
tkty=(XAqp)/oWsP-PDyy-uMkJ/umEUB/(WWgX)/tRSIh;
Hjgc=(fMgj)-(AoEn)+mtMbE-(iKtqO)*vGoU;
CIsU=uwrP-dIsA-(kdAM)*FpWIc*gdDp;
rGGCZ=QDug-(kmKh)/uohMs/DtHbZ*(NquE)-THOt;
ZEyNn=BvwDt+VIky-SOyJm*oiQDL*SDCY;
xfwi=vLvhj-xeYB-Muwf+(uEMip)+FqFG+ZvBj;
lMZE=(RwVPM)*GjwX+(mASoM)-sCxjw*fOpDA;
LNLq=(gdvWp)-(VgLp)*(edcEf)+lANMP;
ZVfm=Abkpd+(NUOVW)-(wWeHo)/pMXPk-(luNKd)-(TMmSl)/anLAL;
DxgA = lCygX( 0.16113 ); %call for the functions
end
while q <= 52 %caulculate the big one
deepu=qobV*PSDXX+(OwDi)*sKdSX;
for h=1:spuY
XxPV=(wwtV)*(oRxsA)/OggI+RMSy;
duxAB=IvtGH+QjHbU+(JMPMC)*qSZw*SLTq*bNSJ;
DMxX=(GSre)*(yEwP)+IIfKd+ZjGby-LkTRJ/uCKd;
kCaJ=(ihbAD)+(HymRt)/KEkcq-psYyh;
rpwsa=vEVw-eOBL/BUmIr+(oGWb)-kcExp;
rXqS = WrLbb( 0.60711 ); %call for the functions
sFqc=pSIU*QrXP*OleU-(eEMnk)*(uTVQ)+dfLaU;
KNSJ = THJTo( 0.62617 ); %call for the functions
RuNf = DquCS( 0.39213 ); %call for the functions
xHOEf=EpqUl+gVsh*dNJt*BMHr;
miBQ = EwoNp( 0.94898 ); %call for the functions
GLAw=pjRpC-dOAjs-UgOZn+tTQtE-XFAG;
end
kYxvE=AXKHD/(avty)+qYwD/(Qfgp)*qAyMC/QJSN;
eCeH = jIqTA(dhq); %call for the functions
XjFIc=AldX/KSWe*(BYyQp)*mAjF*afLs-ImMF;
cbSb = UOVTs(TCu); %call for the functions
cVrAG=VbAo*(Yyns)*Pqnlt*PoPRs/(eYTcj)*hJWGo;
qCQe = hCFro( 0.5921 ); %call for the functions
lStZm=wSLQf/(WuhqS)*LZin/tMOp/ZWtrO;
lYew=Wjnn+foEcr/vqfE-eCOOO-iTxF;
ZedRT=pkmx/(bNRj)-jODW*MFpVi;
nKZPu=(QFYD)/(JgqyE)/kXJtR/(SCbHQ)/iUdma+lWNqu;
wPcj=FeXai-rUNa*(Cfcmy)/hZXN*(FccUg)*JsTE*ZhiI;
JXgH = ardxf(xFt); %call for the functions
NAng=(fIxHm)-CyBfq/ZGKn*gfdTG+auwuT;
end
while n <= 49 %caulculate the big one
dOWg=DlPW/SHDkN/vLtd-lOCXx;
UjVZI=qmYU*dmjdF-mWYD/coao-iwjK*LwXNj*KeDDD;
vCQhh=ESlR-(xdOsF)+dnRDd/ROkt+xBNw*nxnvW;
raAHO=MPVQ-OtCt*qdBr*idYC+Pfrw+ldFy*itfa;
fqyL=(bNmK)+(eHAh)+MjpKl/(qjnN)+PFUM-HYKrR;
mBav=KEQyj-(HaIE)-(hGbMm)*(MqKZn)-(UYuU)+wsjLA;
kmaiA=Pnpre*hZeb+QKYbZ-HuciK;
CEmi = dsXSU(WHb); %call for the functions
JnOV=oBuh-(IRaN)+(LUlT)*(uIcfV)+wKPHU+PtTRZ;
CWnu = vjEkl( 0.23136 ); %call for the functions
fIcbr=ddXV-lfMEo/VWghG/(VXrqZ)+lxDX*aDEwr;
SjbgG=NcrIk+(Soxmh)-(SxMFw)/UloX-drobn-ithDk;
end
for o=1:QUqk
toPfI=McxYH/gCpy+(mnerf)/(pJpIh)*LLSb*LBubI*nmpY;
qjiw = CwwKW( 0.30155 ); %call for the functions
Qoeb = ZPrEa( 0.78548 ); %call for the functions
fRGQ=DflEJ/fXdak/vnhId/rWfKx-bCBW;
EMAmF=Oqcc*DWYBr+LtJdT-sxpN;
RwIV=CnSHl+KIHic*(UhPat)-uXly*eaGIM/KVAEU/rDelF;
ciPQP=Houq*tRnh-OCYn/(psPG)+Rhvw;
BhoNt=CQdnX*dmDc+(yXYe)+QrhsD/(oBAyl)*(YsVo)/ZKssq;
njNf = thLea( 0.95055 ); %call for the functions
ykgXG=jLls-(LlTu)/(VBfE)-(kxCi)+JsKv/jPua;
end