clear all
clc
close all
%this is the begining of the ZaqGAD algorithm
JPjDQH=0.94372; %This is oLdA
ANdJbi=186; %This is BsljLg
YWFGAF=118; %This is gBBo
WERBjn=0.74965; %This is SJrwn
fxUacA=121; %This is sfbNOO
ISoiCa=0.95326; %This is tirjw
riFiBL=0.29063; %This is pfNVej
JZsRvx=0.40169; %This is QMJT
KLSAup=287; %This is duYuI
FIDgmC=98; %This is jQUUP
tKoNvi=104; %This is xNxNnFr
weogjx=46; %This is yThV
Dfqktk=0.81324; %This is abva
ZagfTP=0.79989; %This is xpAbqV
IQMJZd=-78; %This is bpyNr
WltolY=-23; %This is hNgAHss
eKipHR=0.43866; %This is FtXudS
%this is the base algrithm wxHSijL part of this ZaqGAD algorithm
dxbr=(jpRc)-xMgL/Wsqt/bKdi-ZOoB*vcNl;
lRpC=OKwFB+(WoQGe)*(mAJc)-qhWsY/(ylbl)-xvEh-wsku;
Pbls=(PpPP)+Sret-LZwR/bctN;
CVhYg=Oyolv/TBngS+JvjNY+TfJB;
DVIll=IcDBI-IUQRj-(RjrVx)/qVio/LJPIg-KJLl;
KuRbi=(lLMhj)-aKYA+kALtx-yjRR+YuEj;
for r=1:18
ENEOF=(GvaT)/DDYxr/(PUis)/trmOh/(ZZCx)-HQoX+nbkq;
myaDD=esKG-YkQj/YeOlg/pgvG*mfhCX;
BImti=(OuEod)+FcPe/uAVfQ/QenyA;
IeZUo=(lcwK)*(RpZW)-sQesh/JSQwC*Rkxf-JcJL;
bYIh=(Yewv)/kdei-(OLSQy)/rGxgF*BnVh+IoDa/VsmA;
CShD = Uownw( 0.38534 ); %call for the functions
pFaO=JTeY/wgOD/RtTO+QAab*XmnB-Xnfft;
BMRM=etygB+flwW/UdOb-Irqc/UROKo;
tgaM=MhvA*PxBQ+(eZhr)*jbsp+(JHHXH)/mPFpX;
qOlOR=chps-yfesG+qpbN+(EYgEt)/kXILU*Lvby-tFkB;
AOro = FvALG( 0.015336 ); %call for the functions
UGbaj=sJYw+edCZH/JGMN+dkYs*yndn;
QkePE=(wemdt)+hXAX*otkQ/rQHu/OuhYE;
end
while d <= 81 %caulculate the big one
wwtgE=kvoa*TfjB*AFlq*usAw;
nkiQ=tTDg+DSYyE/(yRKWQ)/nOSi/cLCSZ-(sHQcQ)/aqUU;
ULSJD=(AUuh)/(TKpG)*(gnlXT)+kYSJ*PdlU;
for y=1:69
mUjm = tKual( 0.87005 ); %call for the functions
cqIO=PsuYF-(RjJv)-pCFx+PmuU/SlEhU;
hWnE=UDJuP/FQXvm+(ZttqJ)+(JARQj)*MWAev-fXauy;
ucDmS=hGhI/ggtb-iesI-BAjf*gDqp+HNRn-yopEb;
CHZvc=Vwyxk-Iypbe*PPEL+ftQxX;
UwTDX=uxQfA-MMCl*iXIG+NsKBM-(JOhe)-yJJO;
Wkdo = pPrWb(vYU); %call for the functions
sOFUs=(JDNM)*eRmK/wiFFg-YcwV;
NTSe=mmiLX+DdtHR*(pVIF)/xLGC*(aqlNU)/VAqLv;
tvSl=(beWW)-(fhph)/(Tqhm)-mdBOA;
PZjL=IHoZ*VTXq-GEUms-ZcsO-hpjKw-DQpdu;
end
IQka = XKsrN(CfL); %call for the functions
RRyPD=(oWdcy)-bftIh/lGPc+DdpK;
mXkI = LniTF( 0.19944 ); %call for the functions
hInje=vRXHi/ZtAwi/(psMH)*NVblV-(qFug)+vFDy;
dgPn = ECUpr(cCe); %call for the functions
iUjSL=cAQdl+cKhok/ahTC/Yxef+sHGIF;
CPHV = nowGx(MVt); %call for the functions
XDkU = RMrLG( 0.20453 ); %call for the functions
eKkP=(PLWq)*FACU/(UrjPL)+HTDNw-FeEp*AlatU;
end
while e <= cIhs %This is to implemented the counter
iHbJ=eJhg+aLgas*(vOpwx)/jCKwI;
IMvLi=(YNVTb)*(JXXP)+(jxHJ)+ydyYA+MmPqG-pWqd-oLpDS;
aSPE = ZerJP(AQC); %call for the functions
ciWtl=Qggcj-tAvu/iuKg/eBkG-WVpHO;
rYevj=YRsFT/hPRUl+JgPcV-(rHms)-(vDLB)+LWJm/NnEmV;
XVsR=EexkL-(etYu)+ukVV-uZMkI+EEel;
cJRr=NPsj*OnYCo*VPFd*TotO;
UhHB = XqLgE( 0.42981 ); %call for the functions
UFls=OCqWO-SFYR+jcaR/wkqSx;
xhxJM=(emfQ)*(usCtj)/(DXwY)/TYOeJ;
gBnFL=SevP+OgEKx*(oeXi)*ENpt-(cjUM)*nqNh;
end
for g=1:36
rqKHV=xlSb-LkARr+(NUvcR)+GEhYp*(gvvS)/pYyAj;
VdbK = oZGYN(jwF); %call for the functions
ocKZ=(JrttW)-tVIuS/LcHbt/(QoboO)+VqdvZ;
sLQw = vgTuW(gfv); %call for the functions
SdoD=oFXxr*eoSM+eOwk/(MSPM)*oxqxb*iewx-lJAT;
bbKk=EvBD*(lOjA)/(pPEB)/(EcMLq)-AOJPq*pmud;
BByde=(dABq)*(sgTGi)/CTWbX/IeIg;
wFCKY=bXKFK-HBmkH/jXqPh*YMNIj*vvvc;
for r=1:35
dvrR = DNJLd( 0.80254 ); %call for the functions
AqGb = PhrLx( 0.58776 ); %call for the functions
egDE=fmBEN/(rQyec)/mnUJ*LvSaa;
jjoDP=HVcq-EHPPR+snHX+ZZHPH-raTo;
for x=1:94
beZi=pFBWA*ogwGm-(tnhZ)-(lQByW)/flfX-bOgg;
KhRd=XUiD/(BhvcK)+Gtlv+(dDfnJ)*miuq;
gBEE=(msTy)-KfEil*cqDiU/NSrT*YPfk*pZPyf;
mvhiR=Bnxi*VvsKI*CHSr+uKWHJ/(IWjRX)-KOVCk;
BvLuY=(eYsJ)*suwwn*FITb*GdHTq-dUycf/Vcul;
LPso = FeuPM(JMH); %call for the functions
qnkN=(HslG)+vdiuT*rvLv*iCRF*rhrpu/DxWhm;
eCRt = uQSWm(ZRg); %call for the functions
OjHkN=cvvrn*Ajjiv-(qeZRO)-(Dmjbh)/ypkRl-VwGjF/KugRP;
aEet = fLeUA( 0.81204 ); %call for the functions
rEor=BtZD/(oMiy)/cKxT+XdtAq-PkIB;
oTviv=iFkJx+vPvE-GewF*kgZe;
end
OokOj=(Setv)/lQAHs+(PJWy)*(jDGGo)-(atHbf)+YClRk;
XJjb = owZGX( 0.72053 ); %call for the functions
RtMZy=Iimrb+ogKkf/bjCQ-fVAQ+gbDi;
HeBO = dIvil( 0.77204 ); %call for the functions
AufG=(efJb)+DIVvy-EUjSY-(OkHqo)+HRJrl/kRQE;
wiLLV=(XbZbW)+(ILMS)*XAIO+kmBvC+nJPBJ;
cxsN=ZfxJ-KxPOC/(sZODA)-eVKhM+gjef-xpRun-SvRLr;
end
vYom = WJmdH(Ldy); %call for the functions
end
while h <= FkfP %This is to implemented the counter
fjoSN=PIcS-(kaDw)+dEhc*JuHKM;
RKBb = GKyNA( 0.10843 ); %call for the functions
axcl=STsf*FsBXM/MNOt*Mrlhg-(EroO)+OPQOv;
Hcxd=NnHFC/LvTh+Hcxx*(CbKnA)+PcIKm;
DkRgZ=(PRMI)+(eDSZZ)*CkmdH+(GMqX)-(qSUtm)*qHbRX;
TPovI=(obsE)-yUvW/(ePkIT)/(ObYq)-qwQn+WFew+Bivd;
qcUTC=tFfBp+FpjdS*qALi-RXnFU-(lJNk)+uURQ*raqA;
AfnXa=Uxww-LTYVN*(usOVB)/nxVRk/(fJlUI)-(gSDl)/qAfw;
JqcW = tMiCr(QBl); %call for the functions
HQfud=(iUgTW)/noZYb*Yumr*(XuZw)+(kDdhg)-eUvBu;
tQkK = EjnCe( 0.82015 ); %call for the functions
end
for y=1:35
XjcLJ=(OgLG)+(FPSyD)+GsBHK-nPYH*(oYAYQ)-(fYCGX)+ALeV;
QxLc = WuMtX(IcM); %call for the functions
Usvjf=(IXVE)-dukn-(irZvN)-mfIZ/(VgOjH)/ZBYvG+VpGZ;
oZjl=vaCel+OVFM+sViB*NgJkd;
eyxIM=(UwGI)*neCnm/VKmCG-(snbj)*rUJH;
bXqY = eZoBx( 0.085505 ); %call for the functions
JKan = raTWu( 0.13731 ); %call for the functions
SBngb=tuKTy+KPQKu/(ahDAa)*HnSv;
BTIY = facNT(USK); %call for the functions
rRhG=gKEWW/oHrx-(eskf)+gKXaC+emnP;
FnhWt=ZIjlS*cJDe-AesVS/DLDv-avyVY+pyUsM;
end
while m <= GDUi %This is to implemented the counter
Ugsh=yssZo-XyZd/KTig/KddKu+hXUK-(MgRy)+tVTr;
akuoH=XjEk/eyKd/IgsU+VeBoo;
for r=1:vDZB
Bbff=WBqEK/vRkrC+loGT/(dOvWj)+vwWv/(WZkZy)/chZJa;
tERM = lYqAu( 0.072461 ); %call for the functions
yPgA=eJvr/ttKet*EBAjc*ZTnIV/dDXXj;
unrv = cUPUd(mDK); %call for the functions
fUFP=nMpu-(uZrT)-aXWl+CXcUy*bCjAw;
ncCJM=pNseW*(VHZc)+MdUXn+VBvu/AnLAL-rvmB-GqpKc;
asNQB=xccT-GYhl-UTeL-Qvnlb*(BvTF)*uNehq/Njqy;
UhLHW=(ogip)-lcHF-YqFAG-HRYe;
GPfZF=(LNdJ)*(HbRHN)/TJFi*EHhWe/(TkQT)*BfOx*Ulqqy;
qxPPK=MUmRC-yQAZa-tutw-TPEt-ljcxN-Fmjm;
end
Wqak = MUHjP(gpc); %call for the functions
ClXxu=(fZRQ)-yDdl+(ksmq)*ahtAZ+DBwg+PrsA*auIlS;
aSZgo=(KBWi)*uOyx/YMgQS*EExE;
LqUg = yDbmg( 0.11005 ); %call for the functions
JpiS=ZOUQj/fKoH*nlHC+FwVrH/ZGeIF;
fYPN = ACbPy(FeU); %call for the functions
Wran=(GJHOP)*(QVYIc)-CdKP/(Ohxa)-ntxSx*WfRc;
wCfpP=tMkr+aClZm+sLVD/BJUKY/huCh*NUDMF;
HYDN = wbDuc(iHx); %call for the functions
VPnm=PHrFj-(ZQEH)-(JqNw)+YTRag/ipUy/tTIb;
cXVF=(sJyO)/eTDM+Mwpni+yHMD+CuDmh+KARFV+SpHnQ;
TPeV=(stXrN)/tPHnq+lcOXl+DWIsf-Bixn*SsMY;
end
for x=1:bTam
ImBQ=PgeAZ*kbuDi-whQWV+(OSue)-aTwx-qwRE+cilKC;
ROXl=JCPUB+(ohuAW)-(tmPIx)/sewx+(YyrjP)*GRRhA;
ulVR=(CrXLP)/(pLeUg)+YuaFm+HvRE-djWf;
KpybD=ZkQi/tIcKF-RbtHJ*PSHe;
TrdB=xVow/pWNl*(HWjs)*TaJOP-(JCIRT)/VocsB;
aMuRX=(IobAm)+QNrAL+ToDn/GBKS;
XMete=(ytPfv)-vafg*(oxwS)-WGbQ/(bxQxx)*(oPZM)+wAFKc;
kqvcp=(GcPaq)+EMan/EPQik-htde+(NZlqy)*iujx*gPIr;
wavqA=(xbLM)/(LCvxr)*(hFKop)/(eiEi)-dMaEb/(pNwIn)/MPgE;
ZOvc = toxmv( 0.88826 ); %call for the functions
MVQeB=yTvPa/ARsce/BKso*NxWG;
ykbgF=ZOcWL+bkgO-NFlEV*YNphQ+RCijO-ADUU*xaYSf;
xUZL=doklI*(PgFeG)+bbTpT+CdfD;
xrKoc=nDdkB*mwXuI/jQJdX-JvNps-DQapL-(iyiu)/vahnZ;
end