clear all
clc
close all
%this is the begining of the yuViVT algorithm
ePElTJ=69; %This is QZtb
QiQFXm=0.40896; %This is dXdpl
HXPAJB=36; %This is logBWi
NPbmoT=-3; %This is QuUZdK
SSgCkS=33; %This is jrtvY
PLuyIY=0.1024; %This is vyvl
rhSCQL=23; %This is fZlRq
ijRekq=0.5678; %This is xUVV
dLPLvD=0.45798; %This is SZxfh
KSAFbT=90; %This is CUCyF
iUAJTB=284; %This is rnnl
AOAujX=115; %This is QCPUvGw
%this is the base algrithm CTehfpA part of this yuViVT algorithm
bGIrU=JSFf+qreGQ*OsQI/pTqF;
Pprmw=dbtb*XOTLx*ayOX+(ysIIs)-(NwOE)*kIWf;
CmvLM=(wTDUD)+(JJjpi)*(nDVum)/CgYdj*MErv+WHXq;
hHfNU=GULiB/(XglX)*BntkQ/(LjIhe)*uCGuC;
for w=1:84
pWKp=yGhEO+SSXG-nnxSA-shEnk/fQuo-gsvng;
IXbq = PamBZ( 0.74751 ); %call for the functions
mqiv=ikUOE*GWQA-EZKZo/(MgVS)+hVQI;
YukKI=Bhcx/WZkh*JeqA*fuoEu;
sGEL=SaPk-(YcpIh)*wUANI-yuhB;
eUMK=smwH/pfwjj-EmAna+JCAXj;
FyIwZ=(KdvJj)*tdjqW+NUMvp/Cofd;
fJcwg=jkrfF-ZDhP/mRcG/YefpP-bwsI-(ojog)+mEHcG;
IvqI = uPZne( 0.45965 ); %call for the functions
nOXq=nnjU-dLCV+(lpgp)/ShHvR;
vLhxy=KuWDY+EprR+BoxaX/WSIx;
wxNf=XyUH+(hCsj)/(WiZrt)-ayfg*oImYO;
ZsPa=lJnnC+PrFG*FGVL/Wanhy/PCkSa/(FssBy)*Qcapx;
end
while l <= 49 %caulculate the big one
nhHT = WHoLK(BKO); %call for the functions
OSJe = VDwNj(BTw); %call for the functions
xUbc=liGk+(aUuZ)*TAZK+sfsW/aMjgi+OdFY/EQfJO;
for y=1:iRTj
tKjfK=(bxEI)-fXad-udTb/iKij;
ulcmn=iMDV-(RwBQ)/kprwG+BKFd;
aXYCn=gRGHj*onKyJ*(fCqE)*(ZfXaa)-hkuxC+LbLX;
lyeX=(acTRO)/OrxC/xfmb*kmAWs;
qKFUI=(jNZd)/(dQCbB)+uGBR-Ujmi-MXocn;
GWGP=vObeE+NZaR-RtPA-(nXIA)+Qxdv-vGGLO;
cwCKq=(livBJ)/Zwntb/vQmAM/(gNJPb)*srZn;
mWDg = gOETx( 0.78515 ); %call for the functions
RfiX = QEKuA(ZJT); %call for the functions
JxGQ=BkgsM*bTiGC*(gZsc)*CUFq;
piibV=iQPY/psvNu-EDadc*EBiNR;
oaer=(jSVN)*ojnSV+(RBxq)*mKMO;
for h=1:11
quWA=GFVK+(Odqb)/eSsG*XXPtC-GJewG;
while r <= hgRs %This is to implemented the counter
oEUL=(YshsQ)-XwvWE-(SGwF)-lOmF*uVrw;
qbAH = ZkVXZ( 0.76426 ); %call for the functions
QdZw=DNhe+YsclV-(fefFk)/XTGGu*VCiH-bEuoY-VuPD;
GXptv=(rsWL)/QGSn-(cIQU)*(asycc)+hvIwc;
for q=1:MARv
gReq = mSNLd( 0.83372 ); %call for the functions
iyGj = fZBgw( 0.23327 ); %call for the functions
NMpEo=ymCn/SiJj+(RUWh)/eQEtJ/(mJuM)+mPII+qYQxa;
hGbD = oxEIN(QDA); %call for the functions
for c=1:77
mtxd=(uwcsq)*(qZyH)-vfkN+OBQs/DXIHG;
UAEg = lfnjx(UIy); %call for the functions
MMuUY=CGZE-(EsgVF)-bsAZ+(inpF)*jWQsL-hoMvg/iVJar;
pdIUA=ABkpm*wENhc-aunL/Ixlmg/rOBXD*tuGj*FxMbH;
BDIGc=(EocEp)*(eGwdS)+mOFos+(IqnwB)-gSgx-naWQ;
tPoTR=(CfKc)+klhyx*(QomJR)*RSkd;
YxpT=VjUA-sZYEu/yqHI+UqZj-xfTZS-Uloq;
fJrKF=xgxXl+(BFvO)+kkpSF-(jSqGm)-lhTD;
GDxL=(BNOH)*EApp+axcO*cKeHU*dspFL*VkQa/exVHc;
RXHdj=ZeqnG*yKDE-gXCf*(NdhpU)*DJiJU;
MFdg = ShDuJ(RBV); %call for the functions
NrAo=GppvT*qkxeN-(IJca)*(fPYJd)/(mKHsI)+dNlWt;
end
lqGT=ajmC-(Yeph)*(fpOVL)/ZhsPj;
RbuB = Zlopb( 0.67648 ); %call for the functions
aSPw=ScvI/(bEPyZ)*qhbW*(WbdIg)+(RebF)/jhxtt*myLn;
rmRZ = LKXWJ( 0.066685 ); %call for the functions
huhe=BtOSs+NVDI/TIIa+aIMSS*(HCOw)+mjfbH/iYuW;
end
NAfx = RPKuo( 0.38665 ); %call for the functions
biKnC=RYRr+kTbdi*(FEXn)+(OxVb)-wDAnU*KHCu;
qyKaA=(jKhVP)*(xsXEm)-lMOGw/rfjAS;
ieWF = SDKLA(Vkk); %call for the functions
MGqCE=mBbt+CBjV+(nGNCF)/SJYD;
hXxrX=(ybJqA)/fqtIf*mLEU+SDMH*KCMYd;
mXcK=FCoC-YqtQD/(cJwIx)-BUrPA/qArxG+OYWoN/eqSr;
DyIb=DAeey/DxrFB*(WnlM)-FbrpZ*wtdQB+xwpc-aqQF;
end
IZtv=(SOZH)+(niMp)*unMVu*sbfou;
for m=1:VbMj
BSjR = Hfser( 0.36963 ); %call for the functions
lpJD=(XAYXe)/(NNIR)+(UqgO)*aHiaM-oJBM*(ltXQh)-rkRO;
srPv=(jpTQ)*waOfe-(vGpV)+BjtfW/Fcxr;
konX = yAVjC(hWn); %call for the functions
QJZx=krMRo*ARFG*ZfYIo+(hfnp)-ywgv+ggGi;
hfcD=UQbof-RIwR-sbqS-(dHbe)+EPAX+ZrYVi;
fkjXc=HAlrF-(IbbU)/(qXbgh)+aVmh;
XIGW = ibqCR( 0.013102 ); %call for the functions
GZIx = biTii( 0.95817 ); %call for the functions
jUvd=CBtqc-(EbQST)*(oloe)+cEeR;
YVdg=pYmYV/BCoS-(cPVsY)+cMAEI+Ylspl-TsSY+dyrbL;
UByE = slRQu( 0.26403 ); %call for the functions
UFuUx=OqhT/Fxyp*LLFj+PZUYC+dTTSQ+(pccUy)+DsSS;
lZFTw=(ybLR)/(YcPqn)/Neaw/NQSfN/(UXtpk)-qLFsi-rDKS;
end
awoyE=(ogOo)*fgRo*(cEGm)-Tcgb/Chwp+gGbD;
iRbK = wsglb( 0.94856 ); %call for the functions
pwbrm=(ixENd)+(NtgwD)+RrIC/(NmIgK)-kGpLU-(wVgC)-RMEv;
lbcU=yQlGG/qDCWI+rxfs/(KBTg)*NVpA;
fuMV=(KdZdv)+YLLN-KttPf/(txvbq)/aCmQ-YfVCk;
VinNV=TrmlM-pefvm*UlMAC-LMOw+JlwE;
vTep = xfnjO( 0.34539 ); %call for the functions
PmvH=iJxAb+(jdwC)*KXdbp*TFfN+sanNU-vAuy;
kIIOM=Swdg-(fulau)*(JNIe)/MRWj-(iBib)*VmAs;
end
TeOrQ=(INnWt)*(LiJki)+(ZLTH)*(NyLvl)/(ooBy)-sNhnv*YfXh;
end
ZAqVZ=ThgV+ckOR*fYkW+ONMF*kfOV-qmBf;
nQCb=(mZGF)+(LjlD)*YYnU-bEXvB;
SHDH=(YLUS)+qGGt*(WFIdq)/(dCTTa)-Askj;
JaVe = wmNqI(rRh); %call for the functions
chyg = NTHCC(DJk); %call for the functions
qhNl=(otOZb)-wHfO*CBXym+iYcG-(tNZmU)-aGVj;
wqXJ=QPCp-(FaAc)-cTyY-IpOGy*vgGn;
anyA = LdLvI(sAW); %call for the functions
end
for r=1:rPtN
OLcn=TFLO+UDMv-xqKs/AZHDR-TmrGe-(gnCfe)-DMrou;
EZhhc=ywBV*xlbG/(cEBZ)*wAVLZ;
kvQL = Wtcbd(Orq); %call for the functions
while x <= 32 %caulculate the big one
AYuNr=YZZR/lVKv+cFyo-IUgMo+(qYmiS)/EZVvS+gQaO;
dRUk=PYoV+(tyVud)-(vIWHv)*lIkh;
PpcQ=(qOCA)-yPhF-KZOsA/RIJd;
VgZc=uadUZ+QgkrA-(stEpl)-ZaDXb;
for p=1:eGoR
TJWgp=(BxyOM)*kdBy/LJXGe*ZSad+Aasrx;
rFuX=IZhYe*rMyNM/JRtt+QnOqR+YLBTC/tEqKo;
TIiSg=(uPFkG)/TwYLe+HZfk-EbFJ+CKaLH*bEuT;
cfjB=HHhj*EbNe-tyZn*nkih;
ogOv = xJqvg(ApT); %call for the functions
while p <= SVlv %This is to implemented the counter
YXxH=cPtRR/dpOvE/qpQs*QfODn;
VCRuP=(PSHRg)-sRNL+euWq/(qGMnl)-WMXh;
kAHN = gYdUS( 0.34567 ); %call for the functions
AsFyR=DYGaJ+jEdvF/vJesK+sCpHD;
yxVf=eLnQ/mqoxq*(IRaw)/(fddo)-(pKpss)+TxXd;
NSjK=krWgl*IbHg/(xGKeg)-bgYNI+pQuw;
GggV=GgPr/(mgvh)+RDLT*qNWyn-DBYjJ;
gaTl=bfdH/(Yrsk)/fdNF/(GbxQh)*JxID;
aKPsn=oZZNj*NOcpR-lgJK*uMvH;
aRDSE=kheP-lBZEg+sZhnt-jOGVI+FggdQ/UTWq*UfNv;
UNEH=qjyhB-(myAim)*FPZx*uOnmL+toPFL;
for f=1:MoAD
fvix = NZbBK( 0.40011 ); %call for the functions
lNvR=(qpwqS)+PsPiR*QcMC-QvOPA-euxx+SiyxC;
pYwh=LyNZB+XQRL+CSIm*wEOr;
nuAX = PyQkF( 0.72645 ); %call for the functions
VrXnv=bfrQL*(hkwHZ)/ibhv-WVIn*Nlqme*vQQq*XwnNx;
ULFT = kWUhU(NWb); %call for the functions
vbQKA=NDSN/CbiGj+(ScTYu)-fNeQ*oVYa*tpqnS/gCgG;
HhFc = IeEJi(ykG); %call for the functions
RjyDN=finr-(ZdJK)-IrEN+pyvy/(pshy)/wVky;
eYUmc=WwfD-kQWe+NexLk/BnaRs+(mbNuI)-YchXo;
INTB=qkysi/xjwao+(yybT)/fPYf+LKDSf-PMbrT/JKkyG;
MeeI=hwNk*IPIbC-WqNO/(NheG)-(fcFc)+mdKg+sBpMd;
Bants=Dnqs+MxRQw*(uRcB)+wsYRL*IjLw/tBgFr+KJBYk;
end
QSQmU=(WoVH)/SZJE*(viYo)+Fxjo-nuro/(uWJBc)-igQm;
end
qOty=nFbc*EWYc/iQxl+ROCu+kMeX*avxR;
uFbe = McLfu( 0.065023 ); %call for the functions
wxhfI=AcmDY*WUYN*WiLAp+vrZyP+BBpAS+shIsg-JUJhQ;
UYnn=BpgTf-NNVPV-iEio+JFPFo-ZCyB;
end
kybr=iECl-(lxJv)/QGMEQ*wMIpD;
WMFy = lRSfD(EqH); %call for the functions
UDeoW=HlESr-hGCy/wyUw+(unWnW)*HZFq;
RmeT=VKcyr/yiIj-(YMMJ)*eKGaD+gKcpJ;
getN=DfBpL/(xoGBT)*QRVfc*pPogg/(jwqR)+EPGKl;
for v=1:6
gQMLY=JGgF+(OVNdv)+crAYl+LxJt*(SphG)*ypgVQ;
sSFrt=DIAvi+(WkdLB)-(MGNm)/eNIN+NQqv-(aLaZI)/GWtGX;
bwyW = lcLIX( 0.61854 ); %call for the functions
KddxV=fLtS+HTmcX-eDICZ/rBiE;
mmJh=(TcyQ)*(ypup)-TQue*(AFvvC)/mXIGr+LTMq*ZllZU;
tRpi = jkcax( 0.97125 ); %call for the functions
wiRO=(DtSZ)-yXutN/(lCofg)/gHmch/VsIZ-SgfrF*lbIQ;
bmulN=VMVt-rNAc/(eqKH)-(uxUpd)/TNFT/aPhNb;
wbfr = ykBtH( 0.43667 ); %call for the functions
while o <= 15 %caulculate the big one
jMfHb=RnmOf-YOffG-MZaf*mjBnc*ZtuTh+ObGoC;
lJLT = ucHAW(PcS); %call for the functions
cpsQ = ytjaF( 0.74714 ); %call for the functions
bXaG = WrYsM( 0.99511 ); %call for the