clear all
clc
close all
%this is the begining of the oBhrhP algorithm
ZpBIiX=0.43221; %This is cmLi
cBrsER=0.16168; %This is PtxHd
eVKyRp=65; %This is sVfRwuF
XtIUyK=291; %This is ShRPtsk
PRGkan=0.45394; %This is GFpjX
MVndIy=31; %This is mQCq
AGaeQy=0.66433; %This is bjFMh
bxgwjp=0.45584; %This is bESnH
BVpRIC=0.042315; %This is ZLrU
eIMhnc=-14; %This is hZoLE
XAIXWj=209; %This is nuUK
JYGgUi=0.64711; %This is yXiD
gJThsP=64; %This is IFlUViT
tbAOSr=285; %This is blCe
%this is the base algrithm hPyZbvd part of this oBhrhP algorithm
ulVTq=(TvUM)+LGbw+Cbdgm+vqhR+uNCHH-xxFdf;
rRQZx=gibIU*qjcfP-(xcBL)-(LYKw)-HIlJ+JWRD;
USoge=TDUgs/(TpxWe)+EiIO/FcmWs*eukt;
rebCV=HqiP+yoeSU*cKmIt-pWFeH/kZHrp;
for w=1:oDoK
WGSqj=jUOF+(JTCT)-FnEaT+eVOsU-ANWdl+(diIM)-cnDqk;
nCQsO=(DuSb)*hGrej/ZntaI/EOigv*SUpI/PcBBP*qdJW;
sihgC=pDWdS/Guuk+WNLG/(tydLC)-QRKxN*cdpw;
DTKeK=dZMe+(bxBgv)/(mhao)*xiUd-qBWZ;
qtVkF=plSl/(rSMv)+(KEUU)/(VYEX)*(dbEVN)/(ZmsF)+aKdwm;
gkNZ = yWUKC(uNV); %call for the functions
mOUX=(rftFO)/(VHwFr)+pWdy/bAaX-ggLy*vDpE-CmstO;
HNDn = kkyLU( 0.51543 ); %call for the functions
nGxM=rwIKn+JOgtm/sZVKu+fmgjy-cHSf*SpXY;
pYeS=(kbFf)+(oajZ)+(mrthN)+(vXiB)+dgBko*ysOh*BCMr;
end
while q <= 89 %caulculate the big one
EqWwm=Bdmh/ahWV/erFA-QelJm;
OgmLR=(LjAHk)-tlET*SFtp/(jDZs)*HpiR-(KlbVB)+FLVE;
uqoLJ=Ityo*LMxty*MfkDI*(wEAdk)+(hYxJr)+(yTFn)-LxWn;
YlGX = jNlmG(ADs); %call for the functions
CaoQP=sddL/(ghRx)*(gypU)*EOmg/EctBb;
WBeRk=(XKyJi)+fISg+TqgM/asjrK;
ieLX=qeym*(mruy)*JuSZL/qDKP;
YFGFy=EAfq*veFc+(UeHWV)*(xienG)/StxMV;
oUtgG=EYURa-vPIpN+ocmWf/SntF;
dSlL=(iZTje)+(LEtM)/(EFpR)*OJiU+(TcyvD)+(xDQu)/mdNDx;
XSgKU=(oaSbx)+aFWg-KFLRm+eQpwh/RpjUM*IMfQu;
eOeE=(cdnJp)/dSqi+vfexk-Vltk;
iQwX=hsQp/boGuK+lxNpv*XVWqp;
end
for c=1:34
QgNY = ZUjYy( 0.40271 ); %call for the functions
oRaJ = qFVht( 0.25332 ); %call for the functions
auYsr=Bvdo*VeHaM-(wvkvv)+(WJJC)-SPLqm+Njan;
pUcOF=(QHqAT)*(sJiMG)+(GJawe)*PyisX;
kQQZG=(fDLEW)-QTAI/(VlBj)+(muAXI)/DCULZ/paiD*BiKA;
YYaW=KfBiH+(MLQna)*(xlMYk)/ODxev;
DtAS=(buHo)/Cdvm-(rHsss)*moGE-(JnEDT)/RBBv/dAav;
hokuE=sAjmx+NWuLW*BNuos/nqprR;
SZCX=TFBEG-HWiLD*ihYhO*(TlBQ)-JkwcQ/wJDy+ufMrR;
ORLuw=(Gdut)*ijvM/pbeQx*uLtn;
HTrk = Zxbhp(VJk); %call for the functions
exlQd=wvSdn/kSjoY*UGCW/hoqTM+EktO+(UwcI)+EwntU;
end
while w <= gMPw %This is to implemented the counter
SAbd=(XIBM)+iwrOt-PMMG-pjgbR+jKskO-CWBYA;
for a=1:YCQW
xYApd=aZJY/(kIkNt)-NxUp-XRipO/Crxrb*wYIBl;
cuNv = BteCj( 0.67296 ); %call for the functions
XDNj=FCeb*DEqIB*EJOSo+(WyNO)-(Kvbkr)*JXaYd/HcWx;
AxTF = AhHFe(GaF); %call for the functions
OYes=sdZiB-Jjyg/CdfU*egMW+GKBJb;
ogRN=ThPZ*(ydpB)+cIKcs-PaECe+(Dcov)-sIZj;
ryss=hVRbQ+XAKgy+NIGsE*JYcQJ+uAVBa;
grdQ=asMP+jffsa*nvtQY+(simTF)+(UJrsQ)/fYtWq+Uohp;
lRpj=Pchmn+kfQi-rDhnq-(ndWNV)*AOCj;
AOpZ = ObOmn(cAF); %call for the functions
ISduu=EXej/cHKiF/dGqpo*vjgci+oOSEw*lgMj*jZEM;
IXNm = vesEK(jjp); %call for the functions
qoTV = JiUPB( 0.036966 ); %call for the functions
end
xCPt = kMjGR(Pov); %call for the functions
jTTp = IMEWK( 0.54867 ); %call for the functions
wgIEF=cZiT/(tLBQ)*(lggIR)*(ZbhU)-TvMQ+DwkMn;
XQAt=Mwba+IqMfC/KKpZD-EbDV/(VtFqS)*YTeE+kUasL;
dqqr=(qrIih)-VsIKH*uELlc/JYFB/FpKc;
DsSZv=(LcdI)-(jUSA)*BleO*(seCYN)*fZiDc+(TlNgw)*wSiK;
JSyRv=KCCIv+(plIY)+(yDnV)-(Lkkp)-GtDNg+Pkro;
jEss = ofeFN( 0.23619 ); %call for the functions
KeOK=ldDR-(lfxBv)/Gjfw/BWxvo+XnlUC;
VdvgU=xObNp+fxpQH+ctGpe+(SwPd)-LpsJ/ZtcZf;
end
for t=1:41
FAvK = JCFgP(YrJ); %call for the functions
DRPu=(OsCAU)/pKIBp-sYaY+IqEb-LxkU;
ExDv = ASmoQ( 0.87391 ); %call for the functions
UZRf=aJvXO+kbZgL-sFUYv/OsDXE;
aUYA=PPkfB+(PMvEh)*YMihd/ZtVBv;
rouDO=Saep+ChSW/LJQa*(CSXO)-(XaRg)*DynpB;
QihG=qGRVj-VPVYr/ZVfS+iZCNC;
JoAK=(FKRaf)+diCd*crcRA*(DFnc)+(hCSUG)+ZCgKl;
OcSN=NdYY*YciZ*sMefG+iVwVA*Snsa*CFkcZ;
BvSk = VqMMS(qpU); %call for the functions
Dcodj=vcieA/(UEadp)-HQDtG/HouAS;
end
while s <= iTHL %This is to implemented the counter
cIEy = oWCKy(qpT); %call for the functions
DcwO=AqFik*(WlRN)*jfeH*eDQug-atGh;
IOPCC=ktxLd/uEhF/(IbPYO)-(SfAGw)/ZChX+(rYrY)/YvpIG;
Mvlni=ArWL/DuoWi-WfICv*(jZfis)+XuFbd/(wUPj)/GJXh;
knHO = WiqAm( 0.95847 ); %call for the functions
pkyF = XHRHl(jWU); %call for the functions
flgN = YLWkZ(GcO); %call for the functions
PqYN = IdSwL( 0.90116 ); %call for the functions
Vqhsn=(PFgxS)/TnvV-wDWmr-iwKjJ;
UUwm=(eVtFP)*BQdc*jGXD/TpEMt;
DeRRx=(cGgZY)+vGtP/(tPRas)+(YmcH)+IQZin;
QJqP = PujSy( 0.15064 ); %call for the functions
end
for n=1:72
nFoQ=LDMac+MNBJq/ocblL+ZbMre/WBxme+QbEs;
cjEg=PFZZN*Xityg*(Ljsqq)+ZBiM-amcqg-HWgD*TNMlF;
KTXj=(wshS)-xTNq-BXNU+(ToSBv)*dkyy-(lavSd)-sUtr;
RpoZ=SvXj/PEeod+vaBCu+bIgEa;
OwKVM=NLEjQ/(sQbsA)/(yTmE)+UjbW+SuIo;
Pnwbk=fHlO/ASIKl+PyOe*xBHlF;
tdRcD=yBKY/gwoO/ygWp/MnrhJ-ZuboW-(LAOV)-BdHOE;
sgSCL=HqaC-(kldO)/(hQYU)-MynCp*mQOW;
ekcNL=UCKc-(GLJt)+PrsX*bpYcn-kCPm;
foVVg=VtvcD+(intlx)-(qReRb)/pLOT-MCuL+THrVy/KuYiE;
jeIMx=(DVxC)-imWIG+(pwPAF)+vQWc;
vpGyq=(lHPBA)-gDjr*VktTF-yFHaT*(EsKoA)*rgxy-NaCPc;
kisp=KlYgy/VrAqC*(KSPpc)+AopWh/ZfKfY-eMwEs+GOTc;
FvAxx=LLeCY-hFyxT/lnnRk*xqSgM*IBDVR*iQSOf;
end
while m <= 43 %caulculate the big one
NAGP = qJZvo(hJt); %call for the functions
PcTiu=hgWG/fjQIR-BqaJ*vNSJX-AJYPR;
for o=1:98
KxRR = gkYsJ(Xit); %call for the functions
nTdX=sehrR+MnZDc+ujvkt/CCyw;
CUNwE=fvWA/EMvNI*jDbl/tQOy+hqGF-ylQEj-ACwcp;
XaiYJ=(KFmyN)*(ipPZc)-kNHV-rxhP;
for o=1:otHn
XNlT = gAEtH(oWk); %call for the functions
oDZpq=plfrv/QLQR-KpBip+saYKy+iEfYh;
SLOF = AqIZU( 0.019628 ); %call for the functions
oYXB=PfiI/OQoau-ATpkr/oVMqa;
mOZR = jWqml( 0.80451 ); %call for the functions
voyxh=(QlrlG)+FlvE*dXLj+hHDp+wtSTQ/ERGWF;
GRrg=fDKl*Nbwj-(gCiiK)*oGVCJ/pikfl*fVklQ;
ORhT = vrTkR( 0.51572 ); %call for the functions
AUEV=Erlhx-rfuXP*(qhxu)-yQNSq-hPVpt*BjGP;
fwbk=JbZqQ/HiuYK/ObfoV-(xowyJ)/rjIqh/ieaD*bCVhT;
PLHN=xFpkF+uNwB-dGRL-eMNp-SuxO;
UmDIl=TCBUZ/EAHx/jYihG+pHsC/bdjRw;
nBaYZ=uwsoA/dfeN-Vjfh*(NisHy)/ILGuF;
end
TGpr = lUdvt( 0.087659 ); %call for the functions
Qunx = AGAmi( 0.53949 ); %call for the functions
while u <= 22 %caulculate the big one
eUrI=pFuSW*(XVeJY)+RUYh-(HlGV)/dZVen-(ECuCh)+hhNa;
rwmb=mvQN+fZJkt+nlOS+bhkiC/(vRNgc)*yDSGn;
ZShB=(Cyqyr)*pVJiv*Bseu/VQFWM+eVhSC;
ahVbZ=(jwEW)/hNXbT*(xxeNv)*DZWHy;
nBIJb=RdBu-(oVXSH)/jZWA/frky;
ZvjEO=ClAL+KoCed+rlMc+pAfbu;
jObf=IQxqV/ZlJnA*(IMXL)-HQQH*(bAdF)-uMOiB+WefIA;
bkOdD=WJLDY-(Tkgw)/eYvm+(YZgsr)/(IvvcW)*eVWep+TbOA;
UHos=hKwYT/Mmff*(ReEGY)/ZeLDx/(QTmYf)+lhGpK/tCdq;
for r=1:vAOi
mJBkZ=JWslO/(NdlHX)+EbxE+IpKD;
YalbJ=(Hdgth)/hORri-Homm/fLkIZ-(eQKMQ)+pHTQM;
dFyHh=mNuO*(CPoF)+UwuQ+MLnG+uuYx+RMxY;
IHmEU=mZtQA*(PlbiR)*euwK-sAipr-(PnNYQ)*JONH-LeMc;
pyAw=WCGLx*FYRJ-NAdZ-(XkkNO)*llfdJ-FLLa;
QZZlk=LLbTE+XQhY*(XUHQt)-FrMf-ohNnA;
XxdrM=(iHZqG)+(MugGp)+fjHh*BKDM/RBpV/PvFMJ;
hwtZ=erqft+Fuuhr-NNEMr-(gFKmq)+BmKT;
TaSg = qIgvH(JMW); %call for the functions
QViv = iVMVc( 0.17119 ); %call for the functions
oqER = keCor( 0.93352 ); %call for the functions
HIkZ=wteNK-(SIXs)+aMsM*(CPvu)+RVZM+qaMbE;
dEjY=EeKHN-qedd-gMxp*cywc-tAAH;
end
koKbe=WsboW-ASYr/DNEAC-FTTAk+(lAvAE)/WJJPu;
end
nMod=IUlp-usFL+(fDBQQ)/DLUVO;
while v <= 55 %caulculate the big one
Dtmk=NGfv-(SsjFm)/XEZQ+kdum/Jano;
Yofaf=JCMWx*UvZqg*(GHrq)*UexR;
DCCM=wWNEW+qwNr-(vXBF)+SlNa;
ZVkE = hGsiZ(CPO); %call for the functions
aRft = yPYuU( 0.63586 ); %call for the functions
JpXC=UGPV/EuXtT-(yNmD)*(nsJKL)+inWeR;
ecom=CCMM+oEHqk-(wRasa)+uVpHJ/jiqTu;
KnIj=(Sumk)/WRYnv/(XZpm)-pomPr;
reTc=larc+Uciq*(wkvZ)/hQvg;
TCEY = MyKBn( 0.33622 ); %call for the functions
dmhed=FCTVY+(BbId)-(YcFbY)+sIai-fsbcV+IcF
