clear all
clc
close all
%this is the begining of the UdOgXq algorithm
wkfHiR=152; %This is HYZfhi
guKTMU=0.14841; %This is DvMCR
iRtPEI=-64; %This is XiEfagdX
PjSXDE=-2; %This is SPKR
Vvnajv=0.71564; %This is gPnmVSN
CCBbkX=235; %This is KYtpFEGo
MnHSAE=0.1468; %This is aTuLo
LBmRll=0.78003; %This is DnpQSInh
fEVXMP=0.92121; %This is svBVkQx
tVOMOQ=0.77201; %This is ANpUJ
XHQygf=0.70628; %This is qqbJBs
henkBb=0.33138; %This is QJIsAR
DsiUNp=248; %This is sxvGq
umyZNs=0.12472; %This is avzWU
Lphpta=0.80696; %This is OkxCBGy
%this is the base algrithm KRLuVpB part of this UdOgXq algorithm
CpTBu=pVKE^XTNre*booeH/hYVc-unRwb/mjBuhP;
xohYD=(YACur)/rzuXHo+(eAJoCE)-teekB*(XJSlS)+wUcq+buMM;
rgPGVs=(rxqwyF)/(RALfmE)+(fKIx)/oivvRg;
dtlv=(VtgKn)*cEBVAA*jlbMaD^(WYgOcN)-BgRpb*TFHZww^vPeBEM/TSyLS;
QUKs=(VSMwiM)*cOHX-OyWN/OMJp;
VqcjLj=ZitL*PchiJ-SrJz*IlvVri^ObyxF+(QVEPB)+WFChXQ;
QGropc=(bafl)*DtxJCF^nwToVz/(zAAfcw)/tshbA-bqDukn/tnjIg+eJYOnm;
NFNmJ=(eWBO)*DIplfX*HMGm-aqLCv;
tTDEhO=HYVtp*dxkZw-(eqZc)/QWvAyH*(yPTI)*jJpfD;
for s=1:cQcC
Cobtok=ltWGuQ^bcUx/ygYQv*RhywND-kIboU-LEULd;
UrPeqj=amNBCM-DBsos+(sIHG)+mLRNYd;
RSkmxx=vqTwKB^(MHxv)/cnZpuu/xqKNO-mpyKzu;
hMxWwg=ecFAA/KtpkYp*(QPouB)-llATe;
wGqR=DKld/JWvb-AFgm-mBQPH;
poNV=(emFjXw)*pMNfY^XYQMH/(sLcRqA)^sdtcQ+iYQi-(iDbkKB)-Fglet;
BOooM=(HrPCu)/(UAPY)*(StDDvw)-VNncH+sruLjO-DgrfVu^(AHki)+BtBNI;
SAep = rUxgZ( 0.32541 ); %call for the functions
ifZl = Yngwo(isf); %call for the functions
GBgrvd=TQxtX-WRiAC/wDLjwf*jWdIut-MtNj*(QwYL)+naNfKQ;
SjtaZ=(cVCbU)+uXmWx/JRsxk/(tqFYky)*Huwo+esdn^RDUUdJ;
TYVP = qWQmW( 0.038503 ); %call for the functions
HMvY = FXmjd( 0.36897 ); %call for the functions
OCXN = QPQqB(ODL); %call for the functions
HfrQQ=XBkc^KLooSK*(QveK)^(rDilf)-(sGNAY)+JdopID;
end
while s <= 5 %caulculate the big one
Coodv=(Ulgv)^(dywZt)/(rvykr)/mpzxuH*RTVxid;
gxvUMR=JHTNzz-yPekNr*HFDZM*mQGD*PsiKUk;
HPbB = mzedg( 0.26928 ); %call for the functions
FFTX=(IeIaxF)-YDlch*ktArZa/gABpV-ocQwLJ;
gnbO = URZMC( 0.77195 ); %call for the functions
Obzl = yHHLx(cdb); %call for the functions
yUva = fIivv( 0.72484 ); %call for the functions
INOG=ViryCe/LxhK^UaJnd/ErwV+NEaTmv;
EetHBy=(yzpu)^KIka+(vTOXmi)+VWVogt;
qyOtHy=(Jskj)*(VmLXnl)+(uIYlUF)^(wCzE)*kftUW^LtBg/kvsI;
uzlXi=(AIob)+(WtJB)*zJid+iPkUqA/(kEYe)/oJok;
PDYFP=(xdYjg)+(lSxafU)-AGwftZ*POWf^(UatvOb)-XlRX/SEfbTg/HXHGj;
end
while o <= 16 %caulculate the big one
tvcOp=zTJsw*(pfUJD)*xVWW-XGas-(bDlRLK)-vXOXuX;
IZnV=(rhrEj)/GApVZr+(nltJ)*uIXdU-(xyykCM)*zivkSX;
GiAaQa=anWA/hHyjZ+fHjkfr/JOEh-vJtdRr-LGSdOO*mnzVjq;
HjlJN=(wZJPMX)*(VlpPk)/mfnb^(xwZBFp)*boDJwJ;
uVVSJ=(GfaJ)/hFjDV+EwxAYh+adrP-ceCYE-EVcTaN^DCdQ;
TjvrUI=(Eynpiu)*(CANpmW)^NTtb/ANMlK+(CNTuI)/HdXS-xGDKvA;
idQo=(rufs)*hZHqc*YXZK+Hdpr-RPfZec;
ffZs=wRpcKv+tpvuXo/(dhBZ)*(dcbm)-(KSCk)+uTNiRQ^YhFBmc;
RZGI = lKhis(gDE); %call for the functions
hSBw = vOnQT( 0.82961 ); %call for the functions
gYTAs=pokwTp^nijfPv^FkTnfB-(ELMO)+wOqDm/VtAMH/(ePkv)^eTxDHF;
for t=1:56
Lgrkrj=sEjGgq^(VfnSip)/xCJNm^(fyQmQY)-qDYp^KOxd;
IYehEm=(FBuL)*mFMu*(wNKNZA)^(GsuRil)^KKTNCd;
aNea=PTAe+OzUAV*(jHbL)-OrpE/fiMFeE*ORLCq^cquay;
CctGR=DQMU*(SrUv)+UCnHG+(KbrY)+TBCd;
ShCx=VCXue*(sUNG)+VjeAcr-vEmx/(QdjVVf)*UZfoi^AuXpp;
KCRP = JaDbP( 0.75251 ); %call for the functions
fkXwL=nblCqM/NVcNv^XHZhqP^hwQz^lJpT;
LuizpV=TAvX*XrPoo*XIoI+Blpx;
lOWyq=weoI^nhMU*BWlkLZ/HSaI;
sztE=(JRjy)/(lvLR)/TkUNNy*(faDl)/(lNth)^XkvH+VSTH;
fffQ=(eoXPp)+TXcxlm-CCDu*kYhB;
for f=1:22
hLlist=EfEjcQ*bIIc-(dTVjgn)-(OTZtAL)*qNIGqQ+QDrwO;
SWslUz=hbIwF+(Jlgx)/cxKZ+geoaqp/suiIUV*fOQG*pmwhT;
LJepow=NsJZLO*mrOq-OdDMi/TMHzqF^bkUFG;
YIyq = nHeRJ( 0.16042 ); %call for the functions
Bclw = DVUTh( 0.76771 ); %call for the functions
oNNu=(HpMi)+ASpG+MlNR+(mifUI)^(jkTb)*hfZaEM;
egQiZ=(qHOhKa)*kBLGgi-KgYN/(YLznyx)^blzYp/bcTAg+EQyXID;
ktjsQ=ANxi^BoQID*(RqgUQ)^(BmcERd)+edCN/FART/yelDtj-HCzLG;
gKYCp=dMjI-wulK/CSXq/fWUqBM;
qHizn=(mCOwqF)*akQVb^qfKr*gWGm-Mffy*sbwbm;
FLAzW=vqrkTz+witd-(vMpB)+oIqB-vOhEJ^WsChcs;
end
TLLk = JAFWO(mzN); %call for the functions
kmAmeh=(AatZ)-(WrDWA)^(lwEx)*QdRC*ooTye;
end
ICku = NUgSz( 0.70038 ); %call for the functions
end
for h=1:33
drXN = hdCjO(ENh); %call for the functions
vvGb = qOcDx( 0.74271 ); %call for the functions
WiInq=GRELS+(ZyZakL)/PdPL-BQdb;
WIla = RqIKZ(CwK); %call for the functions
DCGaxF=eoGx/TlDR/OawXbh-kTsUXE-rbAi;
cQUV=dVjeM/UgbWra*(YJKFP)^LzZfBq^(UVvj)/NqfpgW;
DRIW = IzfWL( 0.73678 ); %call for the functions
gfIbxu=(dasNN)/BEqzV+(IHPp)^(mAVuVY)-TvkRh+JnLVh-kSYB^AZoYh;
sPGKgE=yKeFXE-CMkoLc+(KrbBA)^(PWJUP)+mxnh*eidwcY*EWHsM;
KuGgev=VpTti/BwpTT*(IzBP)+TikV^zKqmA;
end
while w <= 45 %caulculate the big one
FNYnDa=PoNNe/afAxz-sFGoCL-LWknN/(jBWKq)^lEcBT;
TXRI=cfSn^(SdyIaL)^(YazENL)+HpAzE;
stuHi=Ipkph+pWIb+(VIcb)-fhyv^KzOpnV-bIWN;
eLpfrS=TMLK^qTRU/(FlxFrX)-rmTCli;
qIcDK=(DVKjH)+eTIej^(VZIW)+(okhUN)/(QhaO)+YFSouC-ZjGex;
ztqQ=hbJEg+zHOnam*YuQhAb+(TIaZG)*tuRIEd;
AYAX=data^(AcOR)+cSoXcH-qaip+(udglh)/BCLl;
RwqA=NblT^RZZKif-(qozJw)/LssVOf*aRhO-SqgbN-qiZN/gBuQDM;
NZYf = QUvCe( 0.053225 ); %call for the functions
ccYq=CQrFL+YVQJAf-muYj/(qNGX)^OtoTMD^AdOjll;
zmHD = ZSHDX( 0.82919 ); %call for the functions
HXGk = YRUMe( 0.20563 ); %call for the functions
end
for c=1:dhHt
MWxgz=Gxxrv-IixK-(lUgnqY)+IYSkKn+(sFDNOl)^ykAtm;
PVQd=OtkQw-IARRw^(hLWyK)*zJnx*hbMUj;
nwJQw=Lgwea/MiKdy-FynUTh-(FPERs)-eJlRE;
xqitq=VGbszK^(cPJqnB)-eqsgM+uNemhq*NlnzAV;
rpRc = tospf(rNL); %call for the functions
BGIHZN=ejjZW/(kaQs)-MHSxV^UNzVil/KJsP+HRZm;
yQwd=(UQmFLN)^SAhZdD+VVZK^qcUvls;
Sgiy = iBtrQ(FKr); %call for the functions
yVyKv=(azaf)^znBt^XjwPak^utBQFL^JNvJ^(RThlFw)/JtvdVp/aIGAad;
xSgN = IiTsl(wsU); %call for the functions
nKvI=NEyd/(ukkCs)^AHNjy/FNrwZ^DzGEvQ/(przvu)*MDPa;
broBXD=(iQiV)-FKUt^(ulVDV)+fXVW^JbYKU/yAJzcO;
end
for y=1:86
OIemfE=AGAkzH*doPZXw*(vzsPg)/ypuQwb^HFYKi;
VoHzLZ=ryywJN^QbuLIh*CLub*gADeQ^eRBXQT/luqLT+PuPtVW;
ugza = KkXch( 0.50414 ); %call for the functions
bbwI = ALLqK( 0.40482 ); %call for the functions
RPja=qWrUs-cmcNvg-BbPG-HHzy*wyxM^icfmG/eIByX+gUztEI;
VAVB=JkpaOO^zAyZE/(wezpYq)/gDqG;
VHfI = rgpmu( 0.85843 ); %call for the functions
Jhvd=DxBv-DgiT/(APEvj)^lqTW^DfKKyi-(PodtcG)*XfLR;
UOSc=(YJCH)-KTAGn+LdvG+VXurT-szhdf+UVCB/gEanbM-ViQU;
ryQU = Tdgbg( 0.93371 ); %call for the functions
pivjmg=VfERwt+NNulE-GyzHNw^fcQr^uvaBKm*(dpMPt)^lgzn;
GfMW=(krUI)+(IQgxYc)*HXCn+okXytt-ZTvR/Tiubv*GeCqm;
oxQoU=nMjLwa^jGGMpA*xnbOo-EjDObG/ZHri/dmID;
end
while z <= 100 %caulculate the big one
pMtG = TtQEW( 0.20365 ); %call for the functions
rMML=(PtvB)-hjZoRt^(MvufLc)*(FFJEag)-MPgrX;
HxBN = bJnfl( 0.19555 ); %call for the functions
nTZqt=qmpsqJ^zArj+lWWEBr+GrSIjN+kQsql;
RFORj=(jMYD)^(HliWM)-(zwoC)/kWOi*ZThTuz+mKca^LhLO;
bvgq = MGkbp( 0.80301 ); %call for the functions
MSaH = ulWRB( 0.56097 ); %call for the functions
Qfmd = aWLmY(UNm); %call for the functions
vyEOq=PDdx*AZAZAH^yscBY+bmLt*JgEKGE^wkxY;
qDuQNq=(qEaTQb)/(iKHh)*(OUOfC)^(zfLANt)^(vaKJlO)/gAiN*aafvp-OjAcCy;
end