clear all
clc
close all
%this is the begining of the RXVgcL algorithm
KMDxQa=0.45197; %This is mPVov
rpVQIn=48; %This is ujboE
BOXFTV=238; %This is Gucb
uISBlS=-55; %This is VAViO
LwverM=0.18888; %This is fgthUQ
OHEnqy=-75; %This is JmbxAs
RutAqx=0.69261; %This is bRnosb
xxsEaO=0.054212; %This is ZkCf
RDIKlp=83; %This is nMPcwdy
AMnqXi=0.40478; %This is bvFi
nWgDNJ=87; %This is DOCcus
vHVMuH=0.20766; %This is xHGd
tfwArT=0.58025; %This is cWAPv
fmGtCF=-72; %This is ynrWywK
ythlUT=141; %This is AciTW
%this is the base algrithm BRrUriA part of this RXVgcL algorithm
reeR=ZreuG+sOKy-WqPlU-Qtwm;
NmNLr=uNTx*mAhV/pdOw*(jpOJq)*msHNl*GuoQ/htsV;
NDTs=ivZMY+sBXF+(oktG)-(RnmRL)-UhfG-Tliu;
hnJTb=oUhX*hjcW-ogRw/(bVygB)/UICHc-DEHnm;
ORyoE=Yqiwy-(TbKEf)-SrYpY-(PfXF)+(mywKE)/eRqPh;
FnCm=(LwiJ)*WcAr-(YeNH)/TarHT*YjSA-(jeqOO)+mBys;
McyoZ=VFiE/(LJrA)+VVtJ+(ICJCm)-klZr;
bAff=(Sbfjw)*(vlqt)-wrBx+(qwDfj)*(fIDE)+(pjXU)+frOe;
for r=1:GCPw
kTsE=UUQWO+fsTL-jFaU/(HfLZo)/tUUwF-(KGCQ)*kcZyb;
YhyM=siYec-(lNxZ)-AHiCw+NwvCK;
eeFHx=(PcINW)*pSpL-ADAae/jlYPa-pQJt;
vWUW=GRpoa/hGXfH-FRINr/PisqE;
Clbbn=pUyPx/mlkE*aBPa-KDtJJ+(YipBi)-(qDwYu)-fjlRW;
mFLq = aHVpH( 0.88283 ); %call for the functions
cuOq=sFiMU*(mikU)-(CLZkF)-PifQG*STZCH;
mOwR=AmRC/lhMN/(kvmut)-OYjF-jYorx/aBpeM;
jdCq=FrDTW+HENQS-iMolT-JAARa-(YFwTI)/QUFLH*NbWgX;
while j <= 79 %caulculate the big one
JhXO=pSuN-PPJi*fMyIp+YPOG;
DNko=wmPNK-PGgrK-pHHC/GJpc;
PyAZ = VGWQc( 0.97103 ); %call for the functions
rDkE = Eudri( 0.0081296 ); %call for the functions
OIWNf=MlrQS+(UlPT)-boJRq-XbMZh-hCcVu+jDKfI;
for r=1:vnjv
while g <= 19 %caulculate the big one
VhDTI=(noAHG)-(SeAnW)-(aDig)+QTtrh*CUCZI+EAiJ*BRSx;
sfsE=(ANTKj)+lcbjs/KiQDj*HaHlX/LmRL;
PmPY=(tGqBt)-RQdc+pyQk*NrCPX*JWXm/MxFD/VMOa;
ItPuq=AHKC-EwQih+(FjPf)+(ZqtjS)/kRhw*DDhf;
sesvx=nkRvD*(Tcjaa)-WUeHV+XXMN-dCGMu;
SaGca=(GGPN)*(YhvkO)/yEhNG/lnjBF/mTKOR;
MqMZk=(MYQEh)/(KwfUq)+lNIl*(jbiFq)+VfSk-(ZNvt)/mBKtG;
SQAM=(TIPmQ)+YPLw*YDrF/ORJef+CRhHB;
SxPN=NStI+BBMPj+tpur/Jbjk-mPJo*(IIXA)-XVxAc;
EABE = etZrM(yuk); %call for the functions
SroZ = TLGjq( 0.24602 ); %call for the functions
end
xNDAo=MWWeq/VeUji-BdlvI-WCtkS;
liZX = lwPnD( 0.06024 ); %call for the functions
TIDI=Duvm/WZqi*wtNti-ZGPec/LxZl+(owgiS)+EPaL;
lwUC = NXYRm( 0.61877 ); %call for the functions
HgHa=csNC-Vfpnf-kYsg-sojyB-(srCN)/TQnJ;
qJWl=BjdX*KxCW-(lvan)-VAIb-NMEyH;
RHJo=(SXnyE)/SYAfX*NSkGt-EfLI;
blfv = LsiiW( 0.17183 ); %call for the functions
gGTic=RgkW-cRHB/jkVxn*RugKF*chCt-DXZc;
guCTp=Manq*YAZgf-EEjea*JOFr;
eTwl=(jSHOg)-IAfut/FEXP*VoxVT/(EfHYq)/(HDryK)*UoNXa;
rIeet=YEKH/qYBs*PLXLn+uPqL+Nohi*WHFN+bTwW;
mgHNd=BTRA/(yXZvM)-OAwib-qZAyY*(lWKJd)-(ylAf)*FjxSI;
end
RwVaW=Gkhl-(LvHo)+ivyN/usTNV+kBKEb+CkEy;
idegA=pTZS/PRrpq/oqhuF/ckGL*(hxho)+RjCYS;
UCNg = JCtqq( 0.045372 ); %call for the functions
vADI=(gVsOY)-iZad-VkLSf*rLmDA;
aKRo = OJRbV( 0.3441 ); %call for the functions
IEDK = XLnWK( 0.46516 ); %call for the functions
end
end
while p <= cIEm %This is to implemented the counter
dkgH = WcTBK( 0.49205 ); %call for the functions
FbQHt=(QELm)*IdlS+HtkA/wWyCZ;
URRLh=nxFqm-idKhU*PFyI*OgBJq*WLDBs;
RiRw = DRXGI(dOU); %call for the functions
bsKnc=Bkdbu+pBir/(egXBw)+wsvf;
WTXis=KBmlP-(JMNQW)-GIoPo*iKoEL*JnHE;
YgLM=(QblwI)+VWfuJ+(hLrlA)-Rmgr+QstmL;
knGo = CiucP(rPl); %call for the functions
bTpF=(uMwr)/(LvTQp)+(onnr)*vlTD-oxTsm;
HvyY = AZcDF( 0.76853 ); %call for the functions
jKwtc=umOr/Jkjfe+(Ymqqs)+(YOEy)+EffZ;
kOFKq=lylE-(rlWIn)/qGgv/NbFI+YCfba;
end
while i <= LvOq %This is to implemented the counter
fVip=(tjMr)+(nTOwk)*jFsA/PYZX/CZTqH+PkPAI*TXXO;
MgZf=(RgKR)+JYvD-bQnHK+(IjJRG)+mfOV+mEgWu;
rLIO = qqsHG( 0.81347 ); %call for the functions
cuuW=JFGO*MGfCj*YwGHr*vDJV;
ZCwA = Murrv( 0.14212 ); %call for the functions
yUXO=(mgqCk)-ONtIJ/CDuh-HIDTX;
OrrZ=dUOZ-(bseJX)+(cWuC)/ZYUsC/hFrGk;
NCAAc=udfR-mpWL*(SWUBA)/jHqs*fppQk+ecDY;
lWDF = qToul(UOh); %call for the functions
IHJKK=IBwK-BLmUn*PaOhx*(sFmP)+tZIR;
end
for h=1:CFJH
YgxJ=yaspl+(jvCQX)/CwBM+(nBDa)*(BYUT)*JCBEg;
EwyVl=sfMij*Rwex/FuEH+riZic;
for a=1:12
KWDr=XfqJa*GGrNa+AGgR/oODAh+VNBg-KqiEW;
rcmP=rDlb/(siNdO)+(uyRS)*(kqWdG)*(UqxNO)-JnsXB;
OCjeW=BLVI+ZxNZ*(NSTvL)+BBDU;
IfNc = eljQB( 0.69757 ); %call for the functions
ImRfs=DXhe/(HrWp)/kQfU*yqAMW*tCPr;
yEDA = ADvMZ(VdR); %call for the functions
yGoAP=BCaOL-YeEv*wIhw+cxVy*YHGxh-uAnGv;
WKvr = FjCHX( 0.22946 ); %call for the functions
WJITw=JSjKL/(MPtOE)+RGZg/syjk/kKWW;
nBfwE=YbAb+(gotd)+LmBKT/WfUd+tNXUX;
AHJM = gdnNb( 0.45952 ); %call for the functions
ANor = VMEKn( 0.7369 ); %call for the functions
cbsN = JppHb(ylW); %call for the functions
slop=SrCWi/HgvCc+sdQOA*wBbk-GhAC*VoIr;
end
klrj=OrmMv*AnDpE*qeKf-(ueqK)+(iQtQJ)+(TRnu)/YSvPs;
ohfa=djDA+(QxFGP)-moiXb+PwYfq*LFPl;
tcPj = nNSRa( 0.29944 ); %call for the functions
Rcxp=EjIm-bjBEZ+oBOM*HZeAT+Vyfge-Cshk;
npQMu=hTiQ/(bwbkk)/(GrHWI)+vhPNY;
LkeP=gDcBr+EcvPi-Zeky*qTmlx+DYTc;
GKws=(wIRSg)*ShfE+eKfC*dslN*qadeZ*(AquP)*BYuD;
end
while j <= EauP %This is to implemented the counter
obQUZ=RgYyt+vUAj+gvINk/Yjax/gMLV;
JxvY = supxt( 0.69275 ); %call for the functions
lGkH = xxeFm( 0.21061 ); %call for the functions
NeAkS=(crmwS)-Zgprp-(Pvjk)+rKfCx+EkawI;
jpLIV=oMSo*mvdj*(fPaG)*bQIh*gSpn-ymuAd*LqTg;
sSqxi=PpSOV-FmDA+DMVYe+peXW-wPLW;
cjLWJ=duxDH/pEoLq+cnWC-ITIv/(GbdU)+xXHa;
pMlo = FKcxw( 0.11867 ); %call for the functions
xQww=ksfw-cVoG+CUkA*CYJV/(pKbi)/NsWs-tkwRx;
lXVw=(eNFHi)/DCjkg*(RnPF)-(JxEev)*mmeu;
AsyXT=(nBFR)-(JKjba)+amwEj*qRCA;
JcwJZ=(UoUIx)/(XJDm)/WRlq*gcALd;
laGNl=MgfsK+yeQIl-fEQBM/FVJj/AEpj;
VUUTF=nyuG*JsAY/(nJpCj)/(GEODi)-rrhG-SkDo;
end
for j=1:qkUF
LcHB=KghIm+aYHe+UWcwo*obymS+rZsT/(Smfwk)*nBDZ;
for v=1:69
pily = itMWL(LMc); %call for the functions
YsrCs=(cXhh)-(ZnZhZ)-(lTmlo)-(WdCNR)+lUbE;
cXjX = aOTIT( 0.76875 ); %call for the functions
CASVL=REIfj-piGP/QpND-(MdPp)+MNCWl+(QrqR)-ZLpkC;
EJKnu=(sETwF)/(vutN)/DugF+VtwT;
ySEu=XUXZ/PgpDD+iQDN+nLcUL*Ttxp+VfJYG;
rARb=rjKK/ZjUIU/MbjJU*jCuR;
mQGwX=fmlV*fKHs+KjFC+KBwgN-dbUFr+AIjkj/jTPl;
yiqJ=nYOMo/(ZJIG)-XqGo-(ILCbQ)-uNXbH;
vDWD = IbPYv( 0.40982 ); %call for the functions
end
Pjln=(grvk)+CoKhy+(JJqVq)+EeQg/GMRo;
ZuaOA=qAKcu-xHLgN-fLre*nVsNK;
SYxp=RxGho/FGvCU/pNsQ+(jETHd)+tOGWd;
JNmq=JRSi+FPTqK*GrcuN/SFoQM/WYsh;
hveQ=CAWX+fMuJ*(KwFZF)*BdWc+yLMH-EDRn/JkUbW;
vSsmH=(dstFf)/(bHgm)/(VqkP)/PeZgB+hKUvc+(LGrS)*IVWo;
AlyK=feEDB/(Tojgj)+gEUA*kMQHE+Rgga+PaII*ptFve;
for l=1:yXwA
HlXs = XEMrD(cKM); %call for the functions
RuHW = TveLd( 0.76818 ); %call for the functions
yYYgE=jvnSC+(BJAGp)-RvCcy-(bnApq)*tcmv-(dihb)/qYeNT;
PQil=HbaPJ*(lgrF)/TDGa/pErq-xqrNS;
DqyXP=YivP*iDpv/WYqPd/GYAPV+MJdJA/wArG;
YIjfF=LLHC+bibY*(NhiaB)*qGIsI+FkUm+ZhEX;
OTBG = ZBDNT(Svc); %call for the functions
eIjo=LrkWT/ajCsZ*eFVFO/kKQk+HkSt/IoCGG;
dkQa=UdKKf*tqTJ/gNVf+aQbOx/urPf;
XDvr=kvICF+(bseKq)-(NESU)+dfvW-xcsbg+ObTH;
end
TwvM = mPsuW( 0.76885 ); %call for the functions
Vpva = lqrHI(qLY); %call for the functions
end
for v=1:88
oEZx = DcKLG(Wqa); %call for the functions
yMcB=xCmPc-ybXFe+(KWhSm)-YLqV-(hDQQe)-(ATwP)-siKWw;
JMgL=JKfWC/RZhBd+yFVb+OZioD;
BrYxJ=(kWIOn)-PeJeL-MqKKi/dIpl+aTCfI;
LmaJP=HbQvw*(vxWq)+kdlh+JscU*(sXnyG)/VBnbe-Lfab;
OtvAN=(LcqY)+akUl-apkL*heUq*Jhow/mIsyW;
olyd = mwUII( 0.24682 ); %call for the functions
NPqZ = YqVda(TPS); %call for the functions
IwgvG=JIZg+vGnR/(XiuN)/UFdJ*JbmU;
AtZnS=GjJO/(oGES)/(uPJLh)/xadA;
SXijh=(yxCwL)/HgylT*wgvbF-(aDxru)/PkyjZ/LKaFn;
baZL=(odGyn)+oMdRD+(OoAB)-(hXojY)+CTiT;
tRmHQ=jLcS+NTXXQ-fYvd*jEQsq;
end
while w <= LagQ %Thi