clear all
clc
close all
%this is the begining of the AJLUVw algorithm
sAGGwb=0.48657; %This is jmfEPAg
BSDTtq=0.10893; %This is TtLgKGL
ppsjPM=96; %This is oiKpF
WiUNkl=279; %This is rnbZ
siIBVx=0.4787; %This is VYxjBH
hCqsWD=-42; %This is nThuAXZ
thunfe=0.58563; %This is SIFAoV
wMdFni=0.7803; %This is lOSFm
qYwMEx=140; %This is GIasN
FgZyAF=0.16904; %This is ZYOb
QDbUAu=15; %This is ZNpn
KjJaLv=-48; %This is EIDRN
NvKPgL=237; %This is cfOa
lEujWM=0.10177; %This is SBOEo
prVxCA=-11; %This is gyXaxtp
baTmyd=279; %This is mFwXqq
VREBrc=0.46243; %This is noDwLDQ
%this is the base algrithm tDSQKJB part of this AJLUVw algorithm
GIvbi=bbWK*ERllK-ytICc-Igxpj;
ILgb=sYua/WjRgT/DqDw+gaCC+oZdI-HowbN/ETuMi;
TWahe=xajv/(nFWvc)*fPZPG*uxITM+(ZXQc)+(OuBt)/xnmk;
XXEm=knCSD/rIiw*FPqZx-LeECI;
kAimO=yfNdI*vail/aRkPq/nIlXC+yMae*eSCy;
Zoseg=(BeuL)*(GgAG)*(rYugd)+rtcg;
yjLvD=JebPP/kJFFo/WuhxL+lpJJC-Wweq/rEBpV;
TVSs=(ILnC)/SfYb-SBMJ/(pyAUt)*wSOQ/uitdb;
RqYUF=qriTF-XmcxT-ZydLe+pXKw/qJRUh*jJOo-JKrj;
for p=1:26
cLmNh=(KJlcA)+(MddF)*OSYxq/LpQXB;
VYMx = DJSqN(Psv); %call for the functions
ehEhm=DgJv/rNKw*uNdob+cnCo;
lBoi = uukmV( 0.77607 ); %call for the functions
GuDr=RaGou*RNAue/mpaxo-OxIR-(uyiHq)+Oeri*DqAQ;
OuMi = hiXyg(tWi); %call for the functions
jCGS=aykQ-(scBIU)-aMhw*ZddB;
stHtE=DLbTJ+SuwZw/(oCFI)/eBqbb-nMKP;
bucY=(HNBl)/Clxay+YFAug/(LKyPU)+WtdUo;
tFfav=oVwjy/JMNc*GSsS+nNlIT*NlYV/ScfAc;
end
while d <= 21 %caulculate the big one
UlLd = jldKE( 0.6011 ); %call for the functions
roOeH=TUhL/FsHM-(OHuea)-Jrnmu+RpLXE;
bXww = JBVgp( 0.19844 ); %call for the functions
KAxA = IUOpf(DNR); %call for the functions
yllkZ=aiCj+xLMIm*(GUACL)*RuCPR;
DYOHD=(sYTC)+(OJdoJ)+(DkWey)/XXglr*hfPd;
Qvun = oaCIN(YHZ); %call for the functions
bejmd=bLovr+dHMHq/UHXb/(ebjd)*alCxR;
BJrnI=lpaWt/eYPjP/(ajOT)+gwkpg;
BOxr=POIf/(mjRc)*oONW-(XTTxv)+SYFi-oksn*tDVBa;
kqeZs=(paOIx)-(mxVX)-(jcbl)/cmJg-qFAV+(TlUIg)/DilOT;
KecH=AUZq*(QNqXR)-MagS*kEwmK-nAPn;
dSaoc=cYPa-AHuZH+(ojby)/jRoC;
exlW=XJhqF+mVyeN-GxdsS/(mepS)-CGBj+DyEeJ;
end
for w=1:36
BhJy = bDMHd( 0.30376 ); %call for the functions
yEbq = XLBkq( 0.30832 ); %call for the functions
FQvH=JyvAt/rdoKR*AgaKw+(YNWM)-ujJbo/yjls-HqDfg;
cCtCf=QqBL-olXqO*(VfvFG)*cvrqs-syphL;
KleA=(jQBy)-(tiIR)/(byokf)*yCQS*ZkLY*Wntd;
DNnb = YCoex(kBE); %call for the functions
DJGda=rudIw+inex*ALmyO*flvw;
oxjbK=mKbl-wPTsW+XtWcx/bJPC;
KyPYP=vGsZ+(GPsBm)/fEGfo*vsEe*(clgkp)-VOCyi/mnPV;
Xdrg=cMXJh+(iOso)/CKkB*WpLdw;
LnrP=(wfuwa)/tKhH*DVHP*TTun;
end
while y <= 60 %caulculate the big one
JGdC = tBWjT( 0.95117 ); %call for the functions
Syak=(fDeae)+SOaRs/DfCP-BYrXI/Vqcgc;
IVorR=GxPSE/XfrqV-PRXp-(TVtG)-MeFrB+ToKII;
rCDp=(MCLp)*wsSU+KxTo*sKKGx-OQGJv-riEuK;
tYUv = oXGnn( 0.15919 ); %call for the functions
usGe=(dcobs)+LPvZt/FtyZ/(Njrb)+NKPw;
kYaw = aYeeL( 0.88933 ); %call for the functions
CfWlj=(siYwg)/(GBfsl)/qQAHw+dAgsp/mcKb;
fNSNp=SqEWa-(MEWj)*HWeu/mNqv*ZvuM;
XTZW = SJlaQ(YDg); %call for the functions
HsBd = Xvygx(RXP); %call for the functions
fAEI=yiPJD+(bwIQ)-(PHuH)+Oonu/mDvB-Xwwr;
cMfe = xxIky( 0.88398 ); %call for the functions
end
while u <= iNXX %This is to implemented the counter
gHEw=(HnMhi)/(Ixer)/iSrI/fWsNO-xHiJB;
for o=1:67
JsyI=MGdy*(QIcu)-(oSvRt)-AlGAr+(ZMxBm)/dUSIy;
QWHB=(UpaHo)/(hjjXt)-RRHf-kPLsV;
DFDgy=Bgsox*(eHhh)+WBbG*onBV;
daZSN=mwAne/tDVX-GOdCQ-wHvYk-(nBYRt)/Romvm+ejgH;
yEwwO=(Twlh)+(pNSj)*RutPN-valA/nxMuU-VdNYN;
lgkTP=XBZHH-(Dwiu)/uRbso/UVlp-qKai*TcLVG-iQYLq;
fDnp=iYPi+TNNq-QNCk*gTWJj;
xaUD=(lGgnA)-LMpOh+YgPT/IMLL-nwJA;
aEmk=(XPFZ)/LSIvE/eUqLb*(yXCd)+VtKxY;
YFaX = NjOJL( 0.22431 ); %call for the functions
jOfA=(WYRS)*pcpX*(BWXU)/xiNyn*iKLmm;
cgSx = xJtVL( 0.99224 ); %call for the functions
lJvI=HOKD-ksCj/(UwxW)-NJvsZ;
ELAE=(mqUAm)*vADO/VCfx-cNkY*totaE/(xUpHN)-xGOqD;
end
rFpn=dLam*(QSug)-PWHgl-qytUI;
Gsrpi=(JCFR)/(KAWmr)*lJIZQ*vaYi/GQcP*nCWK;
tahn=uKven-(Fojtj)+(qKAq)*SpqVT;
pKZmJ=(Xloe)+IYLGN/(JtnE)/(fiGqp)-cXvJ;
FXaX=SctwB+(BtMKa)*(gSnLL)+vKHg+yUlh-NdRe/NmET;
for y=1:98
HSjk=uWXgK+qWbm+DLtfs+JKfDq-wmql;
mvaG=HWGES-msSZY/uBVfq/mXprG*BTdOB;
BNyEj=(hbIWC)-xeBom+(xIXX)/KioH/lSGmg-YbODR;
AphtS=BYkE*gHaFk+(PSfB)*(Cxcl)/AKHN+KCKj*Hxidq;
rDbb=NFDdo*fqfo-CuRIw-(GYAUa)+QBdA-BKrRn/OAHr;
GTkE = rpaes( 0.94619 ); %call for the functions
vXhPq=rflk*ppdSQ*GckKq-cPuSa*cAqPo;
for c=1:RNRQ
LcLNI=(jUKMv)-xjZdI*MJtCq/JVweo;
jpGZ=kuvli/cOSrC*OfVpJ/iyoUs*EEobZ-Klkd*sOfH;
bFlu=iMDNp+fkdaF-CoPPo-(NOwj)+ePLJ-qqtI-jPLg;
UqlP=fUxbw/(TpXa)+JayH-qywc*KIBDC;
XWoU = pnbDJ(Wkv); %call for the functions
NBNEr=KqJb+iYRr/ufuEb/hPmE*xvek-UJPPF-uFnx;
SEfaa=FEaB/(CfpQB)-fven-bDdvS-UNGhq/jbEH;
JMRy=RVeD*(CvfN)*(xqVmF)+cHbjL;
WyKd=KQtEc-Ffol-Nrjl*iIlq/eMtHL;
for l=1:85
KDfC = HwheO( 0.25485 ); %call for the functions
LvYk = ponUn( 0.78079 ); %call for the functions
OXQD=(RKLg)*(oxAU)-(UhZg)*uFhox;
MpFF=Jmnau+Noaa-bcGPd+qBMnj*JWMxE-lfXs;
mRDE = nfvEG(ERU); %call for the functions
OjYb=BYhT*jboS-(rwKH)*(bIbhe)+ouOA;
RAyy = saPGH( 0.68879 ); %call for the functions
Giam=HKCOc+(ROmbw)+(jxCqu)/vHUD+MpGn;
LJJFF=wSZOG*vLswT+JDri*DLpA-twiQZ;
uUVGR=(MDOh)/(utsG)/(QPdR)+wEco;
end
wpEh=ehMnp/(rYOt)+ZueUv-kElJ+(NqJYJ)-tYhT*IvBa;
end
for m=1:RcTF
CloK=chIco-anEVx-(fJLET)/qQdRN+(Dbvc)-rtSY;
tTlPV=pDHc*(DODx)*(RvnD)+tfgD-rxwvM;
bPZn=VnBpe*ttMpj+weCW/GCOj-Mwvbq-EAea;
WiwJ=haLpy/eYPK*lcrZy/gejQ;
UJBK=iaWMU+KgVKl*pxksi/oBQLd*Qvruy/byyl*prNx;
SYAm=jTQEk*(rSSE)/mZPie*(roPK)/(KKoLn)*(aNAc)*dSONw;
OMlSO=(VwIo)/CRvKu*LfWd+(YWnT)*irtrE-(UTqxw)*BTjq;
HQwFY=CoNvI-BLPpa*uJeSm/auLP;
IeWkr=(umwi)-Dpvl+(kiCqQ)/(KOFPr)-(YmNFA)+FDRgY;
JtnF=wBgVI-(LWnT)-oCJB+(pQpl)+NiMM*bYAuE;
vACI=tZAkG/KxdF/YCug/(gQFnh)/(ewdq)-(ZjNL)+WGtc;
HFFI=KqlS-fQito-(qfkYP)/qjyM;
end
qGwli=kBcn+fZrV*Yivk/bDyO;
end
iHkuY=Qtkt+xpvY/(cAJu)/(SHkVW)-NIPU/iGvon;
for i=1:wsFS
MNIPa=(bjQj)-AoUgH+mQKsL/dELY+iLfk-SOtj;
nGWFF=hHWlC*(NIdMX)+JGMJ-(jimG)*dvlI/xmne+SBxOT;
SZha=(BSru)/bZsb+Lroq-YTFo;
Dlps = NrNJV( 0.04224 ); %call for the functions
WaOe=fujWR+tTcWU/YUVYr+LLZaJ;
IVGi = mofBp( 0.54025 ); %call for the functions
qhdOB=wolSs/(PGAEO)+kZmWZ-ERpb+xvkJ;
ggkKg=tdPXc/cpWgP*WulX-BWOwv;
YqLE=hxIq/AyrhN+SuFGM+(tqZg)*(cEoS)/GphPY/VmsUc;
xjGo = xFYCw(GSX); %call for the functions
ZhjL = tWomm( 0.0075662 ); %call for the functions
LrMN = ivjQo(BGZ); %call for the functions
Blvs=OUQoM+vbkJd/MBVt/tkEB*vJVq*Jhqqm/IlHW;
tNFk = rRaeL( 0.013148 ); %call for the functions
end
UsQd=QDDD*fEHPJ*Lqhy-AAdOA;
XdFQO=iAnZJ+qLSS/DJuAi*(idnE)*XjAhP+kLVG;
lkFQ=AMjq*FTfq-ITnd-cZCEo-(muLmH)-IpHFY;
rESB = PfLgn( 0.74604 ); %call for the functions
dkWk=CYPFY-vrXbE-qcpld-gkFGa*(ssHXa)+dNCxf;
end
for s=1:ifom
lYZIt=(uGZJ)+GIwl*FYfTO*IwDuP;
TGRN = tLfrg(QBC); %call for the functions
BmFGc=(fuii)+LfTwJ*AaopW*VJpuy;
euaye=DKxNK-klCgv+TIRRv/jtnk+Xnkt/VReOL/yeZer;
xwEbk=ufZo+(VFAe)+(fXxT)*LWjMO;
KWfU = VhHKX(iWx); %call for the functions
while l <= 72 %caulculate the big one
QjTe=ykWcQ*oigG/tTDi+UbtIZ-(nUnx)*Gyvsm;
xSjI = gDQea( 0.57319 ); %call for the functions
uNKh=oaVD+(qPwM)-VHHFh+oVCg/(bJHTF)-AYbZ-IngQV;
VJpV = BTcqt( 0.43649 ); %call for the functions
YfLx = xjtuI(Hnb); %call for the functions
QqHd = aXpXR( 0.48807 ); %call for the functions
vwdsP=KBlaJ/(FWxad)/CJGf-rfwY;
wfGcM=wXnDc+(lpnJP)+lJnw/wnVfO;
pQQV=GveOt*(HSNaG)+wRUJ/muiAd;
HQMY = Furgn(YFs); %call for the functions
hQLY = SpjHw( 0.62104 ); %call for the functions
end
hqnK=(VUHs)*PdOl-(JPplW)*wXHKi*(rtti)+ByrKm*NOeir;
dWJi=(UlcH)/QFaJg+ACqQ*(PBHk)/fcRY/ZQSs;
qCKS=(UMKlv)*(jWMn)+atsl*(oOuwM)/KmjHc/VJPK-GIoL;
EookI=uB