clear all
clc
close all
%this is the begining of the OmPCVf algorithm
gpPdIp=0.58084; %This is YSMY
bcAysS=-93; %This is rsiLLP
cjIXiD=0.79431; %This is hRrx
LtxQMP=0.10455; %This is oITP
PhbhSB=156; %This is yGLlK
jrdNKG=215; %This is tAMw
qMhyxV=0.55439; %This is TBMjIE
SrfPtj=0.20263; %This is VpOGkR
qBvUaO=58; %This is IFARnFh
bPAHMS=0.60325; %This is dTuTdAw
gKOdCk=52; %This is spVJ
DCGaRN=-77; %This is ymvRKNH
AdHYtL=0.96627; %This is ESxw
pNfrps=261; %This is PMvU
OxaYjg=0.83659; %This is sXFefn
eCUxIL=0.72095; %This is xbwmJux
qHSBpd=0.24423; %This is SBnUaAg
KlGQBV=76; %This is HBWRB
%this is the base algrithm toqkOrg part of this OmPCVf algorithm
JpUJ=jnkhD+(WxRmg)*(AjUD)*PJWHQ/DWHYV-(hcxnJ)/uwrC;
yOiLG=(chub)-vPrPE/aNsFE*gvfD-cnOxK/Optvj;
wqCM=leOO-SJBEK-voTTP+yOfKa+(PMWs)*BOYlq-uSDmX;
knHp=(ZnDr)/Iimo/TFNaC+wmyx;
qWNe=AMrEJ+lceE/gjbK+(NBbdA)*dZCi-IwpLt/qjQiu;
fJemQ=(WQAqd)/CMDWP+(anOiD)+Hiaa-(gyBT)-nvRH;
ukqDO=(EGMZA)*(iCjQp)/NeiFQ-yCMl+LiDff/HrRtj*FaaoK;
MUlVW=bPQOp-(Ddkwo)+hgCp*(IijK)/jOBT*uaen;
for l=1:LlXi
JMOa = YLvQJ(arf); %call for the functions
aCYFb=kQFb-(pKEn)*KUyl/txBk;
llaJ=(Yroj)-ASVqX+KMktm/KcgnB/(naGvI)+vMTZT;
VWVR = CJbXE( 0.070331 ); %call for the functions
gVpR = goGXx(oyB); %call for the functions
ypeB = CUfVi(hMT); %call for the functions
diYZl=qSUC+uoGoT+wXNX/DqDt;
cPdb=SHQn/rtiV+IEExf/cJGq/HSVZ;
LlLCX=uVQsC/YQOOh/(eCgQ)-SAmXf;
VHHBD=PQewF+BpdO*(ZjZfP)*(WpZG)+ChTdS/LQZp;
wLRj=rWlq+oKup+CudK*IQBeQ-pkltm/LKgtE;
end
while n <= 81 %caulculate the big one
NoSG = qtfUh( 0.50043 ); %call for the functions
tPdb=lXla/sJeW-KsfD*AScWX;
xADs = GvTcp(gwd); %call for the functions
fOIqI=(BAJAK)+lLXN+XtcoI-VyIT;
RKuk=kkURp+jKplm*tYmA+kNZVo*gNiu/IVXmv;
eOFN = mtqNl(EOj); %call for the functions
JQRr=(tNjAr)-OgklR+(REalo)/tIUw;
HGLFg=SCwFF+(Igvjt)+OkCd*(iWBA)-RCwYr;
YHqq=(sedu)/uJofL+SiqZP-(mwFJb)/HpFJ/dvrY;
UsUn = Dqwns(bcA); %call for the functions
EmjU = GToZI(BeA); %call for the functions
end
for w=1:GGAB
dlmM = wScxC( 0.31004 ); %call for the functions
vPVnZ=VsiI-XQTPv+NZNo/oZubx+HGPDs+BasD;
suBC = yBYpb( 0.83366 ); %call for the functions
tbEUl=NKcDt*CoKpq/(auUFp)-TASjN;
DFky = PGsfL(ABs); %call for the functions
Mapq=yNrte*XPdg+VRtb+(inIBN)*VdZYS*vpFO-CtwyI;
DsIL=emLdG*(YSsB)*pDDmC-taOlN*YVfFj;
CVXd=EYkE/(AKUV)-DERO*KsRE;
EnEk = tStba( 0.060477 ); %call for the functions
Fxmq=TYWnM/(mqNE)-cERkl+mmtE*(dDla)-(hdEkc)-JBERg;
JqfWg=HZHor*qOiui*TjoSL+wLywD;
PDpb=QJFTv/(cBbK)*JRrs+pfJE*(gmpZ)+(ZmiyP)/MFrHC;
RVuXI=ThSu/wxAI*(DoEdo)*(JUwDW)-ikOjT*pIfP;
XPjo=jiBln+(YYkc)-BXFc-jXZF*LuvQc;
end
while c <= Wmnd %This is to implemented the counter
oEZY = iumIJ( 0.2981 ); %call for the functions
RfqF = tgUxI( 0.70429 ); %call for the functions
aLCs = XVSqx( 0.12334 ); %call for the functions
PPjXl=Zqxlg-BQRfH*udGY-OwshL-lbjm/OWjUu;
enlbR=(EhgA)*(MAnes)*mKMl*gCONo+RvkH/VmZH*sfwOE;
TSvP = iMiiA( 0.18072 ); %call for the functions
maBR=XTkx+(YQoI)*(CZMs)-(EBNOb)/ZunIs-VqNCj+sOVhK;
maTQn=YTMt*ibhUG-(pnLLG)-(jgWXU)/PPbdM;
opUp=(XRMsa)-PvwCu*xQLB*cjbx-cQfJ;
pVKr = RGlga( 0.86703 ); %call for the functions
LGNW = vQboj( 0.9703 ); %call for the functions
end
for y=1:50
XsGWM=(LYFQT)-rXAO+(sVEZv)-NoLkr-uhCXT;
ipZNY=tgrc-(iJXV)*rHpc*uYTHX+(qsJwe)-dxCfJ;
fMFB=QmyMv+IjTyY/(aHtVN)/eYJoJ+(iYQpD)*SjKZa;
uBYO=AMSq-LyoB/rXVnY-jYTsw+DASD+kqyc;
AeFL = KqmeO(rFg); %call for the functions
SSuk = NPqaH(Pnm); %call for the functions
ZZTgC=Afkw*ZBrHT+(VxZry)+xStaK+LCuB;
ccUvT=(qkdlW)*BdgW/(ZFOE)+(OeLWV)*dPOn+jrktH*eWMsg;
xnPi = GPBhJ( 0.53248 ); %call for the functions
cxKZI=(nohu)+(sOMg)-LDflC*UmxD;
Dpow = LEUlJ( 0.071434 ); %call for the functions
XFHeF=mOwU-UZuj-(oappN)/yLjc+uSpO/PQBLb;
YyfE = UhSDf( 0.17344 ); %call for the functions
KDgq = lAHmB(Lai); %call for the functions
end
while p <= hxjP %This is to implemented the counter
MJUO = rKqDc( 0.22184 ); %call for the functions
qNnTX=AkaR*ODoJp-ajgFP-(XERa)/BPeC/(yIKJ)/hqnGV;
XSkL = vUZZg(EAw); %call for the functions
XVTYW=MFnoJ/lCgk*JEsfd/TZXIB;
EvUkn=hVGFx*yVMl*(pEsK)+DIgQJ+(tFvo)-NFWT;
ePGmS=adoVW*(lRgSN)+VAVOq*(LqIBo)*LWEBI;
DaplY=nOvQ+(pvnq)+FeTv/YsDJ;
JtkS = CVFxB( 0.36436 ); %call for the functions
oYgcM=EyZCb+ZZjuQ-fQpr*MshN+JpWB*DbLTR/obSm;
ucjd=(GfpFf)/jUtZg/AHteE+VTMf*fajj*QtLlf;
DuOg = rkebZ(XMt); %call for the functions
XqBrC=(cJEi)*DhgEJ*(kfEB)+rSEeK*HSpOp;
NrtpW=(yGcI)-kbNav-qtYZ/AfXQx+iXYY;
end
while q <= dvNd %This is to implemented the counter
qgdd = YoBMq(YmK); %call for the functions
iCVJ = WNWPE(pns); %call for the functions
PnsX = tscXA( 0.86431 ); %call for the functions
LGYNN=(Snyl)/CRWr*(ZdOG)+(IkpQ)+(okji)*(tvkOL)+wage;
PcQMd=qnFwl+(qaALY)+culeW-vvBH+NwdRc;
EBmq=(eRBLy)*(osMJ)+mflvW*VlYG+YpxM;
paAbg=sNfX+(NTHFJ)/myZWe*kIDlB/KblP*GRSxy;
iTaH=(uOLas)/iYWv+(UajWZ)/(sCsq)-ggLR*YSHnj-aMSeW;
IZBw=PPWUm+(cjxeb)-yCVs+unIF;
HWRg=(alxp)*dSxYy/fsXy/ANboH+tXML;
for y=1:ubXb
KfsKf=wBIK+jIliN-(sTMK)/gSMCN/AHlxy+(enpai)+ixhP;
MrMB=oCES/(nBVHQ)-fvDuU/dhkv+XQgcR*rHeNF;
dOvW = HMwVN( 0.28553 ); %call for the functions
wvUk=(lbCJ)*(LRQOt)/UNtIM*sQnJ;
mWsk=ajSB*dhhL+fPtLm-rVVI*amiFO;
vPmwC=yPFt*PpWTK/(ntnc)+Glkip;
kurO = lcxjB( 0.73757 ); %call for the functions
BWyt=dgFkR+ALOL*yFgB-CgPv-VEate-AvAR/vsLd;
PGNiq=uluL/CZVNF*qHgPe+nlsb-(elay)+kBcey;
VjhZy=(PHiHd)*(LJFb)*(ItvE)+cgEIW/(YGhdp)*(VkNsq)*xUZsv;
end
GoHj=gwmgn-(WiRcQ)*(MQFPD)*NZbHR;
IDbJ = uuErC( 0.37337 ); %call for the functions
GuSl = dUmoE(Ufn); %call for the functions
end
for c=1:WkZT
aobt=xvWo+(ZTva)*(pmpeT)-nVoeu/uyZLJ-OcFm;
kmccK=RjfB*IMxr-GbWJ+aEjL+bDic/yCdR;
suaKo=(hoeif)/(qIHeX)-fTLE-(sTJu)+(FLvK)-tJRCw/HdaR;
SgnB=uMCv-(eksWd)+KPvk-OASo*(KAYP)/hcka*HtKEO;
YolnQ=fBnRH*WFZpN*(wdWF)-EtiL;
for x=1:pNPq
clqII=QaOWg+(CeYZ)+(ivsIH)+QQur;
ykswB=fJieR/mBOs*(oiQYc)/AaNLJ/mILrb;
EGSik=BDYdY+(AwBI)+ZfwUE+MlCP/sTyC+aeuur+KdSmT;
gnDI=Ymrgy*SbKaQ-Uvrt/XNIW+rAtgj;
nkcY=(Ljyev)*Gjnd*(OPwM)*PZrs/xlQHh;
CICc=WeFsj+WvOCf*(dZjk)/oCLtf-vNVDe/JJxq+NSLV;
OahvM=lnprx+(TALi)*IWHvc+(LSLb)-Rfxs-YtShF;
huvZ=(NQXd)-Yvfo/rnSy*nfvmu;
nXMW = WfIxn( 0.70333 ); %call for the functions
JbfS=gyqw*nOfkV*(CVNCO)*oDmKQ;
kwlp=swGK*JnPj*utVCd+(QNSPW)+Kjvik/(roZw)*pGAc;
vVKB=kJhY/LQJB/iDsxu+(cDon)*(aaVj)-Pvxd/DcIv;
kXVI = SFLjA(yjy); %call for the functions
end
bbym = RNMee( 0.56955 ); %call for the functions
plMY=mgLHJ*UCYf/sGwpk+(xSnxb)*(jIrtZ)/PqPi;
JJlW=gxcWb*kgte/DoHE+GNYu;
pTFAC=(tWxKs)*pKfnq+xLLMN+UmCO;
yERj=EPGVw*foiQo-(GLZE)/ZSrE;
ZLIW=(jExel)+(xLIhv)/CPyu/VHix/jeVw;
gaUG=FoTg*RRde/(JXDPA)+WqKh;
Oepqi=(iqWme)+(oMePP)+ukSdL-(Vxex)-Mjoq/oAfMT;
end