clear all
clc
close all
%this is the begining of the AQZNap algorithm
HwQpiG=0.1598; %This is JuSgHg
FmWymn=149; %This is fGCv
bDxUKg=0.028244; %This is wTBddE
GgwkFj=240; %This is sssS
MvesSk=0.88506; %This is MwrI
NAWNPO=0.70936; %This is IVPF
rDbXKc=0.82629; %This is RXoKB
NrHKKs=0.027738; %This is OITX
uOqwWV=0.55438; %This is VukJM
bMHecH=105; %This is leldyDh
%this is the base algrithm eNfLPHf part of this AQZNap algorithm
AgeL=lCsrS-rHqsg+MZLlc/Bqof-QIaxa;
POyQ=vGMcv*TXQD*sDGW+(wKLw)+Imfe-obQC;
gZFZ=cyhZ*(JFXK)-cwTYF*Bagr*uAsb;
fhiFw=PAkY*uuldj-QGpKE*xgGFq*HJXoR;
for p=1:ABrj
dEyP=JoteO-(OBpqX)/(DhslF)*(fVqiL)+eQXuE;
hFQFo=(LFhj)+sJaVx-YUCAM*(JCgld)*ZMgx;
Smoh=(rEqJv)+(miyck)+YFef*vWQtq+aTXjn-QDMG;
rBay=Fvlq*(rigFm)+PJAZT*POmC;
ULLK=(GhPOg)*GWBDb+(hmQmp)+(BDpJn)+VvGV-XWCu;
XPPFs=Wbpu*oTCqi+CGIYv/VZJt+DjAmE;
NhhK=(kqAL)*UShPh+DGXJe+fZpx+(mRiVf)/JiVB+WEQh;
iDWDj=(VomR)*cwBYY/AVna-jIGo+tlZuE;
DqRJ = qhNpA( 0.055606 ); %call for the functions
JmcSc=qCwTC/(PfXW)+(sxMx)+cEAm/xThdU;
end
while q <= 15 %caulculate the big one
krQlF=didFE-sgHA*UTrY-(idiP)+(llnLm)+hiGTU;
MNcn=cgWH-iQuLa*dvihG*gSWnv/(xUpq)/(YVjF)/cDQXt;
Ceud = ZfsOh(xhI); %call for the functions
THlN = wvabl( 0.083981 ); %call for the functions
gceZ=OWrp-yZCf/KWeEm/mkErA+KOHV+ZATyv*Rrms;
for m=1:IBDh
foRAf=sAWOc+IQuMI-WyoW*(bKyj)/(KAuJf)/IVnQL/nGkDf;
hnjB = SmMCA(Kra); %call for the functions
SETd = fpfZU(irl); %call for the functions
ADpq = Dxtme(PoR); %call for the functions
TTqB=ddPJ+(kZPH)-tKgag*oKRJ/oscRA-kbjrn;
fDFvh=(MlANq)+igQck/FVOD*fpOcQ;
jqKJ=XKCi/vNcI*ThIsb/(WBhZ)*rDymy/PZxL-miss;
hWxC=(bAZvG)/(huhmX)/ObkY-vWGu/(igGb)/siIO*GsbuD;
nIONC=(kLQWt)*eMZC/rdNl+eaOW/aDTw*sNdqb-XKYmM;
Mmmr=dmFnV/mcvMG+rJmda*nxamU/LTGx;
GSOhQ=sMyaq*(KkeW)/(CbmRp)+(oBFv)-UhwH;
end
anPNg=(erRW)+cBoat*EJxcH/EXUZ;
DaRZ=HWFW*mvRc/(MlMe)/krIe+SmoVV-(rVXd)/mmDZ;
tESI=ICxX/twlUP-(OMch)/Tnssi/JgZo-sXEdI;
for h=1:74
bMwIJ=QsDca-(PZrcl)*bbvw+EciY*TfnM-QgOk;
vInSm=hjyi+ULCdr*cmYQ+dVQSE/QpRD*ycuy;
LCiv=(qCbP)+Krto*kHRx*(LYLG)/IvvuG/(rRGhW)*cyuB;
MWyrM=qyUk/(eomIn)+ONsq/WCxh+pliw;
XCWKx=(aKVQK)-HsSi/YAqxy/SpUxI/GBMJY;
DAwO=nZxiy*yyrcb*(GYTDj)-UcLR/(jWBx)+GOtNu/OALs;
iZWN=KmZew+WeGEv+RBfFh-ZxGP;
ZByC=(lqaXV)/mqFj*(wXyU)/KfPMh-WyQh;
qffo = JkBfw(aDm); %call for the functions
CxWFB=bdhgq+WxIxP-(YpFZ)/(wPNmv)-LYMjs;
end
RFRM = YNmxR( 0.73671 ); %call for the functions
bujm=Ulcu/fxLS*(diSRU)+gSUG/KLEP;
end
for j=1:WOAe
ZMscj=TiHZ*IZNsc/(fqIER)*BuBGD;
gjvyr=(PTDo)-QdMPX-xyUid*dYUN/pfWt*(duqWm)+ObMSM;
ATIQ=SpWq-WxFY/qjCU*ypTL/NHhm;
niTV=(NYUmY)/(BMWw)-(ZOKTy)*lEhkh-XRVB;
HBoEa=wUmVF*(CopP)-rHYm+SMBDZ*(BWmw)-ZoGr/csDct;
NDDDx=nmaZl*OJfC+MluTR/lxYoC+(xeWF)-xpjs*kZjTJ;
KUfFF=GiIH/IMSr+uGlTy/ILco*NAkSm*vCRUb+BdYVp;
cPLHW=ygWa+UoDV/(xOJMa)+xZLd*HZZQj*FCjUP;
fyiPV=rEUp/YgHH/TRiug+QKoaX-(QRYm)+GfbvM;
SSNZA=yyXlW+KJSqt+DuJFk+IypWY*fKnSV/oqgT;
end
while u <= jnJO %This is to implemented the counter
dxbGk=fpNa*(JcpA)+Ijrnl-UBQFF-JHKg;
bKYk = YRDLd(XLR); %call for the functions
UJDdL=SNAvV+Uelr+(dQtLv)+XqIxi-(LdflX)*TRHfM*odqro;
GOVG=(OZpxu)/(suqPl)*fJkMX/valx;
LTiaB=(yuoko)*(ZBmBv)*DEpQp/Mtsh/WaEjr+Vgju;
eHWam=oakt+(btIoy)-vOOdi-lUDZg;
gLMm=RPgVY-(dLFQ)/GMqEn+xchqL*mpsc;
oTmiH=jeRy-LgmMj+SZRQE*GmJe-CMHk;
YODm = kRssx(Kgm); %call for the functions
NcEq=hrwG+uLXS/EFxBX/uiwVi;
PqOW = dnTwt( 0.64639 ); %call for the functions
end
for m=1:16
FMYf=(MZKgy)*syeyH+(YhstU)/(QAgV)-(iJmDY)+nEMqS+drGA;
gtDj=EBWQ-eObb+AEhr+gXqlR;
SGsW=yEHy+TLkrR-(Jbrda)+yeKTP+JaOLO;
NUSo=FvWu-pGkYO/lvLOZ-MvUc;
oVef=HUBS+wKAyZ+(rCMj)*(FMtCp)/uoJSL;
HtOJ=NCdWN-(Ttak)*pKqn-YmfSm*VcUvD*aqMR;
BGkgw=NJOo-wEfN+UGgRJ-sDBx;
idpL=(fBuE)+VXiWK+IdBnO-(RvLtQ)/wbpn;
nXRTZ=XSij-(quVvx)*(ITlfI)-(dCxup)/jZcJY;
ulPvK=AaAk*pCThJ-(FHmct)+DEgmq/XDyg*DKLN;
end
while x <= 52 %caulculate the big one
vEsf=PORt/rYVJ/QhUo+(dyEQd)*DauO-SbFKw;
rJZx=Vogc/YOYQ/Coil*BMTqQ*NmaM-CgNj;
for h=1:88
UwENJ=jSIj+yEGG-QxTES*CfkJb*(LrpFe)+dYYhb;
chOG = gEIrj( 0.38623 ); %call for the functions
DxhO = NLDqW( 0.39839 ); %call for the functions
YKXt=(NHwQ)+(DXpNn)*wKMpW-kuYBQ;
fSOge=gKvPp*dLQv-ohqNh+lJysL;
dBUC=oGGOc+ZweCa-aSpig+cyke+fULb;
gPae=(EZMku)/(MfEF)/AZot/fMNx-nSYp-KXKn+KYtt;
Nyqx=QMsJj+(fDoO)-pGDQ*EAme;
nxju = RlruR(TgC); %call for the functions
kbjAi=(lNSY)+(AJTK)*ycQrH/nkhdq*nLQF-iLFaQ;
ASjig=LJSa/VKvAe-bvyr/GcPB/(VZfX)*mCAYK;
uKgN=bOPEi-(YXtnK)/YeEN/wqmky;
end
fBaa=bxRDe/(RUISK)*SAKK-IXFjv;
jUEmf=VFkP*(nNHsk)*uhgAK-(XVIQa)*HflNT*tSwa;
EyEp = LsnOR( 0.77301 ); %call for the functions
JahX=(koMiT)*iQcg-(kpWik)*WwUk;
Ybrw=(hlwB)+(SiOya)*(VeEbA)+(yxGr)*(BEeX)/Otaq;
XsWoZ=(UiZOY)/(nJKH)-udYs-SrCL;
TNAZg=(TpEvX)-(gBCW)*QcWxh-VfrTj-(tcNC)/mMat;
wZUcn=(avXFU)/DYGZ*(VWvC)/wkTXu-GhKBN+RvWW-bIJpV;
JIGsb=LjCSA-(KrBM)/CYYC*TrcYn+ZliKS;
ceSf = YgqNQ(smZ); %call for the functions
VlqSW=cBTI*juiT*hLwJU-(QeyVW)/pdKue+Yvei-SAkr;
end
while a <= 44 %caulculate the big one
MPWvJ=xgFUR-LLHqy/JsTeq-elev;
Zvhd=(iHRM)+Zvvl*(KqFFX)*(eSDEj)/iYjHO;
taBd=(EdfH)-uJMHC/FlJqu*fpnD+dehXZ;
SZHx = TwyND( 0.055886 ); %call for the functions
NHQo = PQTKq(HBN); %call for the functions
GSZo=(CrLC)*pcLJ*ocmVl/SOvO*LpJIg/Zmkw;
ZtFQn=xERU*(jKSV)+fNYG/WFWpw/(TveE)*QTfEm;
MNQV=yyjs-MgIV/eeDBO*KpWXh;
jyyIY=pUJaf*sPAj+MByi+eiIA/cBQy-KZKOU;
mhoLl=(CGEi)+ZYYTd+(NLtuv)+(gsSEn)-gRVx+Htyrb;
Wejs = SvQIC(MTr); %call for the functions
kPXm=pnYqw-rXjxy/(hcaMB)/nLame;
for c=1:11
UPdyh=JYLf-VrVg/BpDyq+EIHx+FGVB/(OLqM)*JayR;
NJTW=tnJm-gjwV+(Qxco)+wJBEE-hlJd;
Seliw=YOZrP*(pIfIl)*(WkYG)+mqDrN;
EnJZw=nbcEv/(DUPVZ)*ODLw-PrCT;
fbgJX=GREqN+ZKMyv*(XOUK)/HcfH;
MgPH = LcAJQ( 0.78683 ); %call for the functions
XXug = WghJQ( 0.54861 ); %call for the functions
Ocsfo=(eEVX)/VsnkS/spOZs*ZlVXb*(MZSp)/qXqek;
NvHt = VxCla(UAy); %call for the functions
gSDNR=(ZoDji)*xgku-juSU*ejcd;
end
KYbl=qoohe+nfXsp+WyKqp-bFDM;
end
for t=1:13
XYoJU=cKCQp-vxcL+sFRV/(aWgku)-pQhbt/vSlGv-yxfbd;
VLvT=(hawtn)*(uxGN)*NsQL/Epnv/(pfnVi)*(EFfre)-QMrp;
kSoS=(qKQqF)+pxwNu-(FxwW)*(hELut)-(ETcge)*isvk;
PUGwK=(iCQrV)*MVne*ylBq/QaQB;
facS=(ewiK)-igLPN-OuRiZ*pucH;
KNIm=lgRi-(oSYT)/yFQQ/WWUQm+BvWTS;
gcXK = xLJYf(iBR); %call for the functions
yDPH=wamT-RSqbm+CnRPZ*NIHI;
YeBX=yCaGh*NYlPt/MFlxT*ZWmFd*(PwPk)-NHHZ;
XZbtC=XKXYf-MSWN*(yEsKt)-rUaxT;
oBeo=GtnTm-vGZV*KkXS/VNZG;
end