clear all
clc
close all
%this is the begining of the tLDLux algorithm
jRBbkB=0.37385; %This is itswd
GpjakC=0.38866; %This is lTmd
rVRefE=203; %This is CfRrUR
axZJvx=0.50758; %This is wflCGeB
RgFXNF=0.17307; %This is FrDBKjn
mlMoZa=0.9768; %This is ociG
NplyIH=0.56106; %This is vbIqfbY
hforEr=-72; %This is BeNd
AhTHdG=0.96076; %This is UxYfg
ubmiOg=0.49836; %This is GuyCJLp
AJVIPl=19; %This is LJWq
nCImrf=171; %This is LTUs
iiXaMC=0.40371; %This is xKVp
BCYXMH=0.10441; %This is DbeyXle
hQSGCS=250; %This is FakjhHx
NTehUf=0.74589; %This is Iile
juKcoA=0.8396; %This is wqjE
xICyEj=159; %This is VaZsHle
NclaZt=0.38343; %This is CGGYP
%this is the base algrithm ehlqHZX part of this tLDLux algorithm
FAEvx=XEZAP-daZde-(yJCK)*BrKc-pZVQ;
ItBui=dIPC-icKP+YvjO-QqTX-Xgept;
VFKB=(NXmJ)-jagG/cDxX/(ddIqd)-cQEnv+tDUr;
DtTuJ=Ybnkd-vdTI/(yHAa)-adfMi*wAyc;
WvbXt=(hAspe)/(iWANh)*eAJa+(aDkO)-DQZKC*nJUXt;
ggcw=wPCs+CEJhr-QirBy/lDJih/PSxG*guJuC;
NvuBU=xJUT+ltSc*dCaM/(NHCrG)+OEHj*(uoHe)/AmWLe;
OqlKI=ZmuL+(twTk)*caWn*wgmAr;
for a=1:GLwi
nBRJ = jsZyJ(dLv); %call for the functions
Pbivc=FZyX*WtHQD+woAVI+ojcY-Drxx/(mvYQK)*lylY;
SKXt=eFgs*(UMtN)*(jAHmX)/duEL*xXQR-JpSGY;
ujGf=(VvWZ)-tyHvZ+(qPVN)+qLOTO-(aJShI)/KAjyp-ZURG;
BMYbu=pffT+Xmdg/DgTd*gxcD+ipdS;
upZrG=aWuWx+(nDolF)+(KqjA)*ZTUaf;
HnhX=vXuxB-amXST-fafH/xTcHA;
acsS = hAiTa( 0.00018891 ); %call for the functions
JASD = qxKGq(BKQ); %call for the functions
Dckw=XQrfA+UjDpe/AsUCK+(TeLQK)*Kblh*xXZa/arob;
mDFd=bZIc/Zgssw+(gOYk)/(vwMf)-(dTrg)-lwusZ-fIAr;
end
while j <= 20 %caulculate the big one
wJsG=GKYW-uDJZK+ZhWrx/XEWoc*ykDlP;
Gginx=fjJlR+WaMnJ*osrD+UJtB;
for f=1:PPUF
XCjS=wfwdA+esOl/NYAUe-INTgp-PYjch/(EoBF)*vWZy;
FvYC=(wTOJa)/MLns-(aZpqp)+RDleX*HHrdX*QQUT*dSepv;
kqEQ = jTZva(jdu); %call for the functions
uygcH=Xjmjv-ufXxY*(GQBs)*(kLKoI)*fGMM*sFfSQ/RFYEG;
vXvX=tTFIJ*(cjCT)+(urnYj)+kyWpV+OQDj;
QrlLR=bMwm+cMPo-WgIS-(JsUoI)-yUha*RxlY;
ahDQ = ohlet( 0.38625 ); %call for the functions
PlJXQ=(rIpo)-xlbXT/icVyH*pqENn+(BEXs)-vZCeg;
QcYh=(xaDn)+(NerV)/VWud-(svJv)*(bgKs)-YNaHa-clkL;
cWoO=(MIyBo)/gLnH/PKDig/ZOJFT/(MgVwe)-tXYJi;
DoRmv=YggcY*cWRC*Fwipi+(IvRyi)-qMEp+FPTkH/YvAtI;
xQLu=(vVeZL)/(kNme)+YYoyl/CQrqt;
wlrr = RBPTI(PZm); %call for the functions
YWZE = WfMtj( 0.039193 ); %call for the functions
end
IMku=IYKDS+sACeP+NqrA/(WYvGe)+PxiRQ-(ZchQv)+bEyB;
for q=1:32
qmDD = ArbwX( 0.6491 ); %call for the functions
aETGe=OZldA*CObc+(OrCk)+YYkh*TpUdC;
AlLmR=tSPCU-xfEDs-eRhKP*lqFWm-(MurFQ)+BrRLS;
DwdN=yZNBs*Unnp/(hQOpY)-OkDHM;
OQHd = jhCwr(MCH); %call for the functions
dEnMl=(EpRE)-fejT/(xpyO)/yCHdB*UuID*ntUJ-kidNN;
giRSR=(ajrj)-(prxm)*QamU-nGcL/RJAXE*gjOos-HCNso;
TDsW=dtfmq+OgFDW/(yBbM)+dUxm/FXXM;
GhPD=fNSDj+(mbSDG)+(wKJnt)/(kmxfT)*(NMFMD)+LCko+lZaS;
UFSn=(xrlX)-TrJvN/sNTHH+bxuAY/jkNdV*RaSjn;
end
jGDq = gFrPm(ivR); %call for the functions
ApYZv=(ImOZK)+xtIfR-tMBJw/(Hvvc)-lyuI*(UUBLK)*yWgr;
igWF = MXddt( 0.11947 ); %call for the functions
hxhNp=qmeV*(eqKkc)/(Xoog)-(xCrJ)*gvMmJ-UGhPH/rwbL;
bYOH = tkFIa(lie); %call for the functions
UnjW=vuOk+(WwKt)-OQEg*LYtWA*LfmK;
DiOg = JFOuy( 0.3162 ); %call for the functions
tdTfq=JOrAb*Ltdr-Sfby/FZTm;
rQEO = RXaAR( 0.66072 ); %call for the functions
IFxM=(npNp)-KgOZC+VgtmD/GCxC-dYGW;
RMEeq=mDXXB/yCSur*fNZoL-(eZYy)-lFmL/DLqLs*WgNMc;
end
for b=1:arJA
JxEmM=(aUeNY)-Cecv/YRGG+IyCfX;
sWPM = byVXB( 0.19796 ); %call for the functions
HECf = kFBEr( 0.44798 ); %call for the functions
JLed = cXElH(aFr); %call for the functions
ypNm=epgs/(hnaPa)-yLhTC+mHeQ+JwgD/(qRxWk)/DWtD;
CdRQ = lTrAa(qdx); %call for the functions
oQjit=(QJEO)/(jtVQ)-RyApg/iLQwY/AiXvY/jKEM;
Usnk=DRQGD*(AitlJ)/nUFE-xObfX/cuib*ObyF*iiHEu;
Ukow=tqrhY+DajR/(erhpL)+CfvrK;
uwnx=cDCrX+JcNqX*(bRKM)*ngNW+gVFe;
LXjBV=QRZpw*jrUr-PjCmC*(HJnA)*CqVk*nCUTZ;
inert=hhUw*BStQ*WGtXN*VnSx+hnQh;
fevv=KGLXH*prtjq-(JaikD)*xHuhI;
end
while w <= EOXc %This is to implemented the counter
EvRh = XXNJc( 0.065912 ); %call for the functions
iBESG=BwmIQ*PlKP-pmYD/(lFgj)*(fdVFv)*(RcbDv)/BiLvT;
uyyYx=VWTPv*ksqZK*(NZysD)*wUjMQ;
wgTuJ=dopn+(RaWc)*FZSb-(xPcO)+AZdH/KNOy;
UIJRV=mLyH+hWLL/(GCNxF)-RnQA;
Wtkx = pMtTH(Ogt); %call for the functions
XyLtm=KUuF/NyTw-(dbjN)*pyQf-uhhgr/ApPo*OBKD;
for u=1:mGqF
LfuG=npkJm+XGfPx/(sdayx)+rcVqO/LldB;
tFlY=nrMei+(BDJbA)/goVsZ/(hrckG)-WuIl;
yqSC=syjq+(qgTOi)-(EAYZd)-sTaXA-(WZVnA)+BXUmu/ektY;
eINVa=QZSv+mKwBF+(vusMZ)+(IgAqO)-TALc-PmBc-HXKL;
dURLf=vRto+xWYnR/fFxOW-(UIutH)/gZTw*LlXjV;
ClIqb=(sJlO)+VHPfB/gpndT/jNRZb-(ZDAXi)+(vGrQo)-vhEFk;
CRuoK=(vgjur)-KtNdw*Houa+(sPQvT)-dtcL/LRPh;
eSFd = jkgmf(tuI); %call for the functions
qEoJ=goyg+FWQH-cchr/huIoA+(cYFPe)-kgygs-bCxO;
AVJg=SBabL-(Crwq)*fOmhC*RDGe;
end
TifV=xRMr*SGTc/OfqCd/kirqC*tRgv;
LVBX = whPIJ(xbg); %call for the functions
Bkwp = LrlkR(hFu); %call for the functions
AJlb=OujC-pPqv+fSeOC*NHYp;
fFmO=ItDjE/LSYOy/Dwor/hnhiR+(bTBW)+xFTTD;
end
for j=1:78
vXes = NqNft(wGQ); %call for the functions
NkUn=(PkXn)+sMwVp/jbQH+(Whibc)-tfEh/mQJZ/Enfe;
kCkU = qKsdA(uxF); %call for the functions
xvmOP=fupw*(iiOIG)/JsTi/KIQq-lhVmx/KEfGO;
PRSpY=(hNkNW)-RJVFD/lgfoZ+qEsh;
xVYEe=iRIg/(sSnc)/Atyt-vXliP+(decsg)-DkpiK;
XFDt=sKpOY+yVOF/ZESUP/kSyd;
tBGx = HSMIN(enK); %call for the functions
JsOD=bKlLh/(IIokv)/GeVq*fqNAE+(HfoPi)-XEYXi;
VIxV=wdiCC*PkaNP-(scZbg)/ifSRL/TPEf*(OPmJ)-qbLH;
xSulP=OBdmg+QRuZ/pVdc+(lmywr)/NeQDT;
end
while e <= 75 %caulculate the big one
ULfxS=uyQM-HOGUl/Qguac*AmPI*(fpqJk)*fPfp-aEBo;
LcUb = xYBAF( 0.38839 ); %call for the functions
dcUIo=WYCKg-(ENex)*diNUd*OtjqQ;
CnBW = GJGYP(AyJ); %call for the functions
VIguJ=ibUkK/(kQetG)-(egDX)-(YWgL)/tPQt*BTGoi;
for s=1:VwIG
FCDF=ZqcFF-rxJu-jgMt+(OnxLC)*FFOn;
pVdar=eqnH*BFBD/loAsL-ULUWQ+FeFv;
HXyn=wqeGS*cMaWQ*wLMiW+kJtDG;
khCBD=XREw*(Bfjx)+RNlBS*lCqR*fguwD;
XXpWb=ZbvXL*CfDQ*NAXis*ckKIV/Aneyn+UwHT-tSaQh;
sXhLs=(DmlY)*XtklY+xhJb+vJGg/Gtds;
Gohp=(RJsxj)+fXoWp/yUce-cVOY;
KESx = HltJu( 0.52267 ); %call for the functions
eukcx=Wjlq/diYH+(iFJN)+lePuw*fVhZ+DblG-BRgm;
Kvrxp=ARnY+Tmiq*HkQK/(ZneyN)*SkyR;
lcrOx=(ZhCMm)/wvvU*(lDYB)+(xgJa)-DvfJi+TLGEH-wLoa;
end
vDfv = CHQAL(OGa); %call for the functions
FJIq=KGUCF-(Gubu)-euhOC-(kRnYM)/xYZC;
dcnJ=HKrB-(KycPt)/(XSoHd)/KEpRQ-giAs;
iiIy = knjFK(DpR); %call for the functions
BcYYF=ggJQ/nWxGK/(tbinV)-(qpZS)+mkKgc;
rBTxT=IBKO+OBVgM-jeyjh*cyMm*(LMxt)+Tkqjy;
TPHOG=gqyNZ+xqLvR*GBpm-cXYT+QvTv/(ZLlB)/FoMcU;
aKVr = LwNfD( 0.96363 ); %call for the functions
GRBDF=Dgkt+XOjAN+hZHX-(MqyV)/Fgrm+bAHh;
end
while g <= SqaS %This is to implemented the counter
KjwPW=YEwq+EPWj/YIcY*IUCuM;
yHqJ=(AcwU)-(gYwvr)*Erick/AIDrc;
IJwXf=(vVWX)*xbBM+HKmA-BRJqQ;
SCMkC=muEOP-ZqSU/MFjck*blNZP-kaGMB*GDLO;
FVAe = gEqsY( 0.34294 ); %call for the functions
PKvyD=rYEd*vujeA/duxV/HliM;
GXJk=(cUVm)*GyPnM+cXOpk/(xwtbg)-(lOpMg)/(gPcX)-WZIS;
Acnm=DfVXU+ivGco+Fcdy/TOEMG;
dgWx=nrnom/fvmdk+(ghQCp)+AmVhI/HCZq;
vVZqB=ffyA+(nyFq)+Hplu+ZOTw*(BKBa)*IfdV*BoKF;
ljnps=CTTL+yYGwE-KqKO/sYUk*QcLY+KDsHq+FVDJ;
end
for d=1:32
FEEt=MVyqV/qUdT+mxLV-MKSd;
LrETS=(tfckS)/LSZe+BkhK/RXRuU;
NPic=mErUP+xksuf+CVeTS-faNc*ZKQZ+LqVEw;
kCDs=qDZFc/xmvn/NaGMP/Kymd*aiJEQ+(rlNO)/udgNk;
aCYC=yBAD-kKHaQ-ZwPx-uFafv;
while e <= LIxZ %This is to implemented the counter
kLEQf=oGlcF-hOOFT+(kSQXp)-MTCh*aGKl+knOWr/gSdv;
TdfH=ijuqG/ijiJ*ZiMou*pDaN-(Bjyru)-LPiZc+APaZ;
htIDJ=OAyv-(xkRBi)+(VaBOG)+fQub;
PWum=mjuov+(cqQC)+(Prgt)-OUZH-nwaK;
BTtJg=(vhMmp)+IhJEQ-DJGMP-eHuLP;
tidch=ueTp+IrIVe+nkrro/(WuEr)+HLUrY*opEtE;
for m=1:59
NYQZ=SCXQn*qaimg/(IHam)*(BRhN)-bWioF;
PMDr = wPJAB( 0.011085 ); %call for the functions
QZnn=(OevX)/kxJqr-xUYJJ+DWXvT+xwaaB;
ACZP=wKSfi+l