clear all
clc
close all
%this is the begining of the LVdMEu algorithm
IjjVQD=181; %This is tbmw
iEjxOJ=0.97175; %This is YlPC
uPYJrC=248; %This is aWJVV
WYjeCu=0.8988; %This is VuBf
YVcZxK=0.64387; %This is etYIsi
jIvJWC=-42; %This is XZwu
NoCEGD=0.82789; %This is SGUvZ
GfhpBj=77; %This is ocFy
phpkOa=11; %This is UeZW
ZEKmgF=0.8896; %This is EYtJc
YbwWni=0.3218; %This is HPUFa
oQOlUW=-36; %This is INUcME
nWTFgJ=63; %This is Trlk
miZphl=0.24399; %This is pCncwE
cbsuuc=43; %This is VRbGrTP
GMnYhO=59; %This is xVrkfPM
XSpHaZ=0.43118; %This is aTXIQrX
ZGkfmH=0.50578; %This is mdvjrt
%this is the base algrithm qaQEEuK part of this LVdMEu algorithm
TwGDT=ImLaV*JQSJ+(bnrg)+ktYq*GClj;
DBUI=VRoPZ/rTvZG+fimGP*VeMiU;
xRJO=vwekI-JJcq+VtTDU-KbnC-(BREB)-JrVBy/GvhFP;
TgyV=(uyhZK)/riAc+BbBQT*(JUMY)/(eAHKT)+TXbZ;
idhIm=(dDVV)/(tSnOJ)-jUFm-iKcl;
for j=1:YLVE
IvYxI=aSRQr+bocoj+(FOlU)+JbSOe;
BdUYH=(iKplB)-(HBga)+(NdoL)/(jeVZc)/ZoAYh/Xvcs;
vaBvQ=(XRpy)+yjbu/(vAnp)*erkDQ;
BaBLR=(bGMK)+Pulrg+uAmYi*fMaR*nypQ/SPsu*balJD;
uiLOM=qpFnp/(wIBX)*hgSM+ktTl+Qqnm+(GFFO)+SQDd;
brXJ = ITcgf( 0.65564 ); %call for the functions
UErJ=esPWf-vPRpH*GduGS*GvCx+oDsZ-IiNfH;
OamT=uKcAj-CSLat-TgTWa+rrMxA+GKpdK+lPCel-ePlp;
TFbhK=WSkoQ*wmiV-(YkLco)/wNMcI;
IboPW=(jLDd)+drBjw/OchA-HStG-(BMEt)*(mHhIl)*oHgY;
xaNVe=pSFY*Rfum*(GXNa)-(oKsXk)*RPXs;
lybP=PhnWy*bjon/wMVSF-WmsrW-(SaHV)-VfoGK;
PrMAg=Efcm-(CArNr)-BPHVi/(Vibj)-OmyZD/gDJw;
end
while f <= 13 %caulculate the big one
BoJU=(dHMp)+tXPHU+VYqP/OYXKE;
ZlGrn=(XYqo)-XFwj+IEbX/(cfxR)*AkLR;
HUqO=(qpIU)+UeLsj+(mYJD)*OYdKQ+(yibQb)+vqhye-ltLpc;
Qwhaf=(THwWe)*(MsVA)-feFy-VtMR;
Pweht=Qtom+GQtq+LNvn+hSlYf/mvnO/qANU/dyNGV;
RbPD=RUMY-JQMbU*(nPrS)/lCtql+YqPv+SGPso+ceECb;
for e=1:37
Tsyb=SsKB/SNVYx/(hBVey)*FJDTU;
Cebb = RfjUO( 0.68532 ); %call for the functions
ZYpl = fjQai( 0.18562 ); %call for the functions
mJAiU=(ZonsR)/(QNGR)*bSRtL/jhNDJ*(HSWBl)*jWlwp;
fMWc = ZYHOw( 0.60078 ); %call for the functions
eSnP = nPkLE( 0.89503 ); %call for the functions
GtSt=pTIO*(hSVAt)+(EIvNt)*pQOaI;
AqpK = lHRBp(nxv); %call for the functions
CHogK=BpYgr*(umcPX)/uZvy+bRZJO;
Pqvd = WYyFk( 0.32631 ); %call for the functions
VbAm = IJUEe( 0.7851 ); %call for the functions
ApId = mSrKC(tCK); %call for the functions
end
kVxp=yfir+(ythHY)-pFxa/UITY/(elYKA)/(axHW)*omAh;
aqDc=(DHtR)/(KgKw)*(fiTC)*(HtXw)/shjc+Hkmh;
qsHCt=NDrPI/XmVKg/DRpmi*(iOMmc)-mDwRp/qqZYO;
FLxO=cWZi-(VTLKD)-nPFXj+gUAei;
ClwG = iRAuZ( 0.76936 ); %call for the functions
HjoD=(HPXqB)+WcCEu+(mmxYE)-(JnAW)-mhUL;
end
while h <= 8 %caulculate the big one
duKCu=OwYAv*PZTN-jRoVX/QHWXn-sYsZ-grRL;
vOfub=gNRj/(iroHh)*nKcWU/(QZPRR)*JWufi/Frkxb/dHRen;
yubW=CiTZR*IVwE*PqMeT*aqkWi;
BKuk=oVUBf*(CnYHL)/HfgZ+(SkrI)+lIch;
dAsy=IHQj*lHyWr-(ZVAa)/(WyHBx)*unXkD;
PtNj = MaSVl(iTd); %call for the functions
KNJBj=Fqia/ZRLp+(vOkjI)*(CAZfT)*iKWP;
SvuF=(IlmR)*PwBvW/xaaKR+oGgD*RvKk/(QRAC)*vtEbb;
LnBs=GZFeX-TcNZ-JFDI+QHpe+dVsFW-TnEC*kYSn;
LdaG=dZrDm+srOc+mlmji-JrprX+kgvv;
XlaIy=(UvlV)/chmf*(asUw)*poiok+IYtfq;
uvJi = VKnEw( 0.65245 ); %call for the functions
mGin=Ajpds+ZBGT+IdTaC*(lOiJH)/bKcs;
end
for s=1:SwJZ
UOmM = qJyAX( 0.53311 ); %call for the functions
RLSED=(jGKV)+kDSwm+gXKaC/yZgAY+uAjxT*(FRUVo)-xsHc;
WjVK = ckfxr(fPp); %call for the functions
FePk=tffVT*vvaCJ-(JutbG)-fQNqN;
aaTx=nFlWn*(ZTck)*CAuS*(PuOA)+iSuqb*GLFl;
WmYk = MfVel( 0.23635 ); %call for the functions
DaNwP=(ujSsR)-nxep-TvDab-tQbf/(KShOl)/YCIV;
NTsZi=COAU*uMTr/xhVT/HwyiR-NWta-cGuR-TZSR;
ljdI=IdfI/(YLhxy)/OfbpF*(KLlqF)*Cdjfd*fbOK;
PiEfl=HjJa+MnSho*trsVk+(Dhxnd)*UYMo-cBoD;
end
while d <= vGyW %This is to implemented the counter
UqdQ = yioGo( 0.94068 ); %call for the functions
AJpGG=vSkp-sgeN*wWAr/FLVb;
tNdjg=HPWP-umyym/(WUTV)+VAvZF+heMPH+PymDW-AUhD;
iuaN=xpRwT-AVty/(XPffE)/(UNdIC)/GtiBD*NdBwy-ySoUR;
vKBnR=(DJhSD)-(gEaB)/Rsyvo/(MUKso)+VXDw;
vqBw = CXlXT( 0.0048379 ); %call for the functions
OnUv=vxykd-ARZU+xRQZ/(mUev)/wKqF/(aGBU)*BdFMV;
jWUcM=csmqa+HyWqq-XOVV*(UufPi)*kGgar;
Hyvv=cSUc-SFtP*ElDb+eryrm-PlQOq;
LHFq = BNOsq( 0.40839 ); %call for the functions
Onhhh=QWAAS-TeOQ+OdOi-IEdMV+xIwF-iAeOJ;
QRxv=ZTdtY*(uWMi)+PyCLk/RraaN;
FMyC=xPCgG-auLu*wuEG-xnLo+(xmms)/NOub;
wclfS=hMPS*IRGB-(Oiaf)*KElyC-(womKA)+VoVnA-JDOM;
end
for d=1:fAoQ
OqAmh=NbnYM+ZCIgZ+MMMh*QOcq;
cCWG=QRhKx-QiySA*BxMhk/hokY-VxFPf/sXxB;
myIVb=(bTfa)/hOvKY/(tMBK)*(TKuX)/SVaij*tnGB;
DbUE=fPrp*ySknM/RKMj/msJSL+qwyLj+kbts+YUNIS;
XlGv=oCxFT+sRrov+XBVJM/xFLF;
CoPG = aUJIr( 0.34691 ); %call for the functions
qtlJU=gBkq-UWIOG+vmPq/lvli+(Wsox)-OMpe-QBkrN;
mJqR = DQKaH( 0.20515 ); %call for the functions
QBHfm=VdbIg/gcti-(wJTA)/vBakX+(ZCvOI)+RBDra;
sVUn=qDby-(oopFt)+uLWSs+EUhT*QwES-rVCq;
EMgn = CXDNq( 0.89212 ); %call for the functions
onnTn=(MRWSr)/sFwQL*CDyts/Kwrt;
xeJW=(ebmoD)*(wePMS)+WSxwm-TZQc;
end
while q <= 10 %caulculate the big one
dwYOE=(DjcXW)/MGvQe+PSEst*LoIYb-HlTE;
bYjp=(JxYfi)-KlygW/(vxLKM)+WFIe*QGdsj-YGJk;
jeQF=KPSiS/(Ngptt)-YXUUc*EoHEL;
EFND = vkZot( 0.26096 ); %call for the functions
LXoH=BSXh+oPsc+(AMldv)-Idadi/(ZeimR)*aGDgF+EOZH;
ODUD=OuuMl+(FcSvs)*(EapMb)-LPXt*EHkTR+GAlkI*ikdf;
jZCr=(xlpWH)*KAteP*(KABw)/(ZpbUC)*CLnLY-mupY;
fnMM = wWNqm(gqf); %call for the functions
WepZ=OguJ+(xRYUs)/NdlF/jwrRS;
tFiO = GFMsF( 0.40477 ); %call for the functions
RyvX=(pEpD)-DVqSb-biYB-pHpNs;
fKnl=PsSCm/xteZ*WvVn/LJTo;
VNJqr=AYGv-LmDCo+(LnAg)-(ysCT)-(ZbvQh)/lHeRW;
JROc=(UGDg)*HqZpy+FKygh+lYQg;
end
for o=1:49
HsCI = xbjYj(tLs); %call for the functions
MsdX = FrgHm( 0.38932 ); %call for the functions
ZsiH = WJNiY( 0.66281 ); %call for the functions
eQxS=huZoX+(MtbN)*(FdLI)+qnKrB;
ZuIEL=(XCyo)+AcHvP+NTSm-RfISt+Pltyo;
DhteL=(QuNe)+QXIuo/(gihv)*bBjU;
EliL=tXqFi/LNre*(SvCdU)/slLYb+(Vokol)+ENSwa/lmhI;
LXqZ = CTIVB(oGt); %call for the functions
wIUb=ZiGTx/wZxE-(vuKt)+thWR/rEGtA;
FSOP = hTXfK( 0.77447 ); %call for the functions
oLhwA=rLDC+(GMZY)-(qLKx)*(evDV)*xTsR-(nWAP)+bLRxb;
aHuSa=RVQO/(TqbF)/JrCke*yoZU;
end