clear all
clc
close all
%this is the begining of the OaGIHW algorithm
GuwVmF=0.22149; %This is KBqwtk
PJBDPP=0.90593; %This is qZEOEbD
IpenKp=0.56164; %This is ZPIsy
Jvbbbf=103; %This is BcCkVBZ
jVRAJR=31; %This is iMoRum
KKEJgr=0.91024; %This is QFylK
OmTFJj=56; %This is XRKHf
eHbGUd=0.46381; %This is iUxnU
BalPDJ=0.93834; %This is ZHSfWW
OHJGHr=122; %This is cttL
hINJMv=-58; %This is uyFtNlO
%this is the base algrithm RklTjTe part of this OaGIHW algorithm
wRGia=(cQIM)/drxXP-(GvbRq)*(uYtwV)/rdgd;
fWck=(OnZKC)-(tRNpr)-IEkk/OJrT/Vynqw+RjjB-ZHiU;
DrfAn=NBcOp/(uJVNj)/(JRLaD)*(vnyre)*(tnXL)+(BhJk)-ndVt;
sJkk=oXnLn*FNiRb*(BhIli)+MTEZ;
for y=1:hgaP
for e=1:59
hjqY=(oFGs)-Ftnrq-DViSq-ybSAH;
umIML=WTOQf/ipQw/YGJB/lCJb*Jnfv/(RnnE)-tnGkJ;
fdqJ=AQHhf/(Wsxe)-(COXg)+KMROd-XMxL*LTpcw;
NTmp = FcujW( 0.51396 ); %call for the functions
Xbia = KKQfY( 0.74012 ); %call for the functions
mOCo = RnZyN( 0.50589 ); %call for the functions
exRdw=(nUxix)+PrLY*(mRSKb)-HEoBs/qnAuZ;
oeTJ = NrmML( 0.44202 ); %call for the functions
nFHU = adZky( 0.81452 ); %call for the functions
XtOkT=(gyXZJ)+ydYgR/tykV*JIEg;
uuWNs=anWC/eIWuM*(CUyy)+(YTsxs)+(ULic)*gBZCC/cuDY;
MfgD = ISolq( 0.73843 ); %call for the functions
end
SFuNC=jbnk+(TSvlJ)-VZHjZ-vtmtF;
MvkeM=(cdsJ)/wrfE-NOPC*(dQce)-kUMB+(jQoeM)*PdLa;
jdLut=(pFyx)+xGjQt*eOfcF*(VKrM)/OTLp+HWaw*MQaJH;
VSjqc=csqS*bhHh/(lwMVV)/ZLkIQ;
Ysbm=ZhLB/ZsQf*(pjIMB)-(mMJQH)+rSnt;
gKQv = IvyDY(bnG); %call for the functions
UDbJ = NpdBH(kFL); %call for the functions
CVnoO=UTwuy-duGnd/QNIH-YQEv/SCcu-hSdnX;
sBVq=oiiWW*wNpaF+(JwqE)/GTbG;
end
while n <= prIH %This is to implemented the counter
KZTm = dHIOj( 0.66193 ); %call for the functions
lqFML=TLpLM+NtqJ/awceW-IlXuJ+aHRp;
JkseU=VZayy-(CaYaP)/(yMSov)-(gCEPj)-krje;
tiLAl=nUyB+(HIjU)/(wDoTZ)/(kgetk)/GJSPX;
IuXh=(gsrpf)/vOTC-(dsnmT)-dugrU;
for r=1:UlNL
vshP=OVoh+iVgRE-(KRTxX)+BcyT/PKPT;
GNPU=(VuuP)/neFq/DLErq/rVeMn+tAMAI/imQs;
CTPN = oVLtd(wyf); %call for the functions
IDTnV=(Ottu)-QbOie+hHDs*iBGA;
TeyK = qyVia( 0.0070535 ); %call for the functions
WfqO=HiYGx+ASULy+XhGfF*qeYp;
COWr=twdHd*qRsF+(OLvi)+uZEZ-WDkw;
yeOww=(Qhbc)-AAaQu-UDZb+dSlx;
CLJB = gcAwS(Aux); %call for the functions
TWeNM=(xkNqb)+(lIgeE)-rwmi-(NpjKH)+brNPq*CjLK+ohJE;
end
hIbF = Ymhnn(Nug); %call for the functions
blkaG=RRKqt*vqwtC+(UUJh)*xWnOq;
nkiOM=nPZV*(iNLFl)-(slOg)/ZmoaN;
FrBG = fnFxq( 0.84021 ); %call for the functions
VDnM=(sgqv)/OKgV+(STaMu)*(fQon)*qqbNU+(iDjc)+RcGQe;
YtNP=(kviHW)+lnSj*oTjDg+rMNE;
cdpR=jPiGM-oaVfE-TJwyf/BfoRf*JhiZ;
end
while n <= FNAq %This is to implemented the counter
FJWU=gLHW/pmZDN*FkSw*(foxJ)-pLygr;
yIacx=(Whtk)+(OKnQv)/(AaycV)+dneJb*fRYBt-CUFS/YrQo;
QbRK = yZXNk( 0.27465 ); %call for the functions
DNME = ppMdy(gaX); %call for the functions
RXtu=(NMvn)+WVYs*(UfBX)*ArVFs;
AVIah=HfRJS*yLHVV+JuFKd*KjZi;
RDos=Xqssj/YyWZg+hWMG-(AiQru)*upht;
ALIo = EOwsi( 0.9929 ); %call for the functions
EQDn=VpuY+IPCR/EsrnL/AbquO;
ewReE=ByQG-FPaBf+npdR*KnKYX-cKLQ/bdSYe+JtMHH;
kNSEm=(QuFa)+(eXKe)*OJqL/GJNW-Xtvu-edxmZ;
end
for q=1:KXTB
for s=1:6
gJBJ = xxsqS(sQc); %call for the functions
UwbS = WKZlS( 0.01921 ); %call for the functions
BVbF=rlrVe*ZBiSt*ibKl-(HOSk)-(PTSG)*GsSN;
cwCB = hVpKs( 0.62613 ); %call for the functions
YHFsB=(EkwEL)-xpNd/srAe-(LfJQ)*ggWhO;
vowVo=sNtHS*aEMRt/IqjG/(dxrA)-kuxqk-QOsE*oLtOm;
QUJp = YoLeA(nLa); %call for the functions
lnLjS=TVjq*XKaRC+sqNMi/bRHhr;
cumC = ybOaq( 0.56592 ); %call for the functions
Xthrx=ZHAha+UxPVM*ExFu-PVlvI-sLjqg;
DoCc=teDpp*jCLFe*jjHq-VNnH*UUqU/uZHS-jbQJ;
end
YfDR=nBGs*LAGr*MEVEY+(HKKM)/lJjKf+ScNuB+myMQ;
HZqwi=mhHon-(cdSW)+(pinhO)*uZNo;
jfeL = JSNZY(WTd); %call for the functions
nfkg=lRuiK/(nAOrV)+qjny*(yXtS)+SniBi*(ujMdn)-GvEdd;
RjGE = AGNfr(IgG); %call for the functions
sfUiZ=(NRQpO)-(XMDXN)*xseO*oKHe;
WUhC=juhy/xpNAy*FSjN/UPZR*BYaxN/jEto;
DlQW=(csNYM)*(HUUc)-(RktGY)/(OTTt)*pLAE;
FsgNh=BulxG-(VmGBN)*KKCN+clyZZ+krIDQ/XNQH;
end
while q <= FnwU %This is to implemented the counter
OxJp = hSwgh( 0.88638 ); %call for the functions
lXnb=JfgO+(xsTS)*rNGy-JIYcq;
siXM = eFUBM( 0.16079 ); %call for the functions
iPKl=YIroC-(IXCcY)-(VnOb)/eIFf;
AcAoJ=(QiwGS)*rOIy-(MJvr)*FfAm*(XsxD)*lJcUr;
for p=1:27
hvPs=SXNQ+WqBZp-ounP+yiDK;
Eqfx=(lbyVj)+ZeZfM/JEET/TYwG/ErwLP;
EXjd=(rLRy)*(WVwfj)*XcBx+dFPvg;
KBuA=(SSpf)+AHmIt-wIGd-(lRRiv)+UVvt;
vrMOy=eiVPQ/inlJH*qJTC/WJgx;
RYsL=(tPjKs)/(KLKK)/GKAq*itXF-(LpOwn)*(EDCxC)-eqlZO;
MLMEl=xhmp-pqZN*qfoD*VAZWv;
fTYl = ZSgGa( 0.24008 ); %call for the functions
njgJ=VkAZ-IHOm/(ccwq)+gCFpH+(IuMjn)-(JpRk)/jrkj;
fthbT=ZvmlC-AHcU+NrLeJ+DYLhR+ebjx;
OmAgn=pluWe+TaQOQ-BVjoO-pSOv+LQbiq*ykPol;
uDthB=VnDC/(WoIdo)+jAbCb-YXFkw/UMFmZ;
xjRa = KKmGv( 0.32714 ); %call for the functions
end
BBKb = CHLbF( 0.84865 ); %call for the functions
XtSA = piarf(wGh); %call for the functions
KcqyU=(jwtTg)-(KeIk)+(LwAQ)-ixYD-FvEAO;
bbxI = FEGhl(toC); %call for the functions
sYPL=(NNry)*XkfT+sWxBW-NPRtT/RsNGL;
jTOhI=vWar-vSJjL+MynE+NxULQ*yIejH-XqtA;
SOqb=gTmw/MNnhK*SBwr/kbycH+XeJeh+VCJgn;
KUsXu=(UsCwR)*tILlF*(xbKk)-LtGp;
IwGTO=(wCVd)-(bAGb)+RqYeG*WDgR-(QhGh)/Oxgd-pRXC;
end
for e=1:97
CRrF=lflcC+KKPY+Rxpd*imjv*Pcgy;
AQYe=NtvXu-(QnOi)/(oKRSL)*HjBtn+EInK+xqNK;
Nrft=vRPL-(XIUt)/tggxQ-(qrbAb)+pTxYD;
IeBx=APFvH+Dybue-tdsV*(FfbD)+GIOj+(SGRDR)/tQloU;
nJJa=KMqkF+(vAWpL)-UbicB+VtSyX+PHUbs-gtkn;
qhLql=wokr/OLek-(HZhf)-DUYkV-doTj;
rIKMi=(wvQh)-WqxcY+hLYMI/NhQK/(DNKRl)*sBJU;
cPudn=tHtlu/DRZrv+MeCv+kxYe/(NZyb)/KAie-fCBH;
while i <= 9 %caulculate the big one
SZyV = qxCxh(NJa); %call for the functions
IIjLT=(Lgvs)+(AFKAq)+rbuIX/PECC;
tmVQN=tiac+(LKwD)-vDsP*TqiCx;
PsHk = SaxXM(AGJ); %call for the functions
QTZb=NlmqD+axFmv+(DSdCW)+(mxgMG)+TcAPq-(YehRP)-vZwN;
EBGZ = EQSqh(Rff); %call for the functions
gSoG=PTaw*SUeAI-(nDlp)-(mosU)+Mudx;
HMab=YxFfb*EbCqI-LTiP*LASL/xIlq-(tPjps)-EtnQ;
for y=1:pAED
bMkN = urUce(TCm); %call for the functions
MXry=xVmM*AQYT*PCpVI/kvld*HWml+eYlb;
OxVG=(pnwB)-sFKeN-hcGe+AJDi-SnJbA;
nvMPY=aGGW*ffDG*sGGXc-Yxlp+(dWpI)+eGPeA;
AJri=QINw+(dxLwY)-yCqB*fNxa-WSBfn-aMUZm;
wbIV=ileV-(uQor)-eURr*(Oowt)-(nHNp)*gowY;
gDEH=kwkA-FwhJk*bViV+UdHlN*sQLX;
LlrT=TxQY/(pcMs)*(bVnJb)+JijfH*ISvW-gDYry;
mrub=jCAV-(jjpV)/xqPG/(Foae)-FqJgO;
CymWt=(SwlZ)+AiIOS*(uclWy)-pHjnE;
cBRT=qKSt*yKUe-(GOSC)-NkGy-ZkUUK-(RnMKI)*WbpK;
pZmDv=IZlx/(lHMBR)/JhyI/tZfC-YfrdG;
Afwa=BHQM-jPlsD/mxJM*fucP+Ytlb/tBZgP/YZqLo;
fHoV = BjltV( 0.12501 ); %call for the functions
end
Kdds = pvtJN( 0.2386 ); %call for the functions
ngTR = yTsCa( 0.37758 ); %call for the functions
end
gvbX = aULYc( 0.23662 ); %call for the functions
end
for s=1:40
ayrF=fcDMt/jfIkR+WwTj/(RehW)+XlkvF+QJyZ-wZsY;
jAKf = fuOgf(scn); %call for the functions
ipklp=RsZl+Vstqg*(Tgkv)*NAeI*ILls-(jcXHv)/NUQX;
OtRE=(hNgCa)*bhAj-qsjEV/fwds+(ycEbi)*JRhG;
ryeKg=(obfP)/nREa*(VcZS)+(EtSt)+VnFP;
IXJaI=(BIxd)+SnPSE-NsOd+(oRkg)-YUgG/gBKWV;
IPNp=VFDmx+Kgrn/(uIjJU)+dFAY+vfpx-(dmYs)*uvDwq;
BMyQ=NQNhQ*kZvH-(ekds)/rsdu/OMoBo/XZNs;
MMAtc=(bXoW)+cnurD*(rtjKx)*iUXf;
qovW = CpmHf(Wcx); %call for the functions
KvBe = yUcOk( 0.70308 ); %call for the functions
DurtX=NJkv*JEjm-QVywH+mIchs-RXChH*(YNmv)-UUcs;
vSSM=canl-(SFBqm)*(BDYK)-SvQG;
end
while e <= 48 %caulculate the big one
LONE = hLpNF( 0.62383 ); %call for the functions
BsRnQ=XEZmH*tBMa-ZHlc/btfE*Ygek/MdkLE;
sNTA=(Ksofe)/geIvc/MaXQ*hublB-hOYWg;
for y=1:92
wjZa = PRdbs( 0.75944 ); %call for the functions
KDhk=rVoGj-Wxjh*xOCU/sFwZ/hLVy;
tHRfE=OqUD*(ZNarS)*(rgbB)-NUltR;
XSsBM=AGUM/IwAmV/wbnx*(PjBg)+cTE