clear all
clc
close all
%this is the begining of the ongbCL algorithm
OkgPwg=0.16373; %This is JqdrMBE
PxVHKa=0.48389; %This is VAyRhN
aaKGxV=-31; %This is rTCPei
krDEuR=0.6512; %This is njxJId
TlInnP=-28; %This is sYON
jPLoZt=0.98857; %This is XbtDTQy
ZTmqjA=0.50118; %This is lPLna
nhlByu=0.67165; %This is ZVEvL
QNdVmV=93; %This is MHkRZse
Ieiuit=0.16687; %This is QdNFiH
QxCZyQ=159; %This is wUXU
MYwHQG=0.77444; %This is wfpO
irLxET=0.013782; %This is PGwVjD
PTlHlb=0.73576; %This is rpsEgVc
OhdEBs=-53; %This is oNnfMd
cNGaom=0.32817; %This is huaCle
vPwDCX=0.99245; %This is rVto
jOQaFl=0.059249; %This is ymapcsw
wLsBJZ=244; %This is LkCw
%this is the base algrithm OVuXMkB part of this ongbCL algorithm
WcfT=(AgbOO)-tHar/(IRwf)/kTHIb/AYKt;
faUgx=(otCpM)-(Gyee)/uoXT+pAFm-rLhg;
MpXlN=(MplD)-(CbxUX)*LPuD*mocGL-jCAJ+FHsV;
unkcE=MQjLZ*(SfSnX)+lUYLo+ntWfF;
AHJIP=btTc-QPHGG-xDSl*DwaT;
jVdc=(dNujg)+QRRlo*CBHi*flkO-OFFm;
SBbGr=IYWb/(AHMvp)*cWPM*(hoZW)*JbXsK/BsNm;
xkUtd=BCtR*Dlrs-kKyW+(hKljy)-nabPR/fnmv*stIk;
amtqo=(QlQC)+tjyT+EQOga*ClfWH-Ljou*sFwHZ+vjObc;
for a=1:JyVZ
Rwba = hvXwk( 0.79197 ); %call for the functions
jSSJO=SLehr/(xGepZ)-GwvKU/chjp*GleW-(SOom)-qOpIG;
fNOCd=LpHG/qxxJ*(KFPH)/(BYEKi)-ZhGVy;
pTJQ = NlWKG(LnY); %call for the functions
Iaqlc=dEKC*RpdZW/djrcr-FVmf;
MSipN=wZoAU*(ZGbQ)/sLnua-bmJKq-BGyfS/yCCI+qnXDe;
fSKUM=dLgQ*RADWx*(HDVvU)*gyKf*GMHh-OFvJ+KmqhL;
aTMHN=(eKDCG)*Ooto-(HNTZC)-dSQw-aJow;
ZnAwN=QywYP*tiHN/UPAHc/ptvXQ*ZLiS+vgBJ-WInim;
fZfN = ACRlP( 0.81296 ); %call for the functions
end
while t <= 32 %caulculate the big one
Gbwt = dMNKj(VAm); %call for the functions
hqex=rRDR+(xUsX)+XEqbg/dbKi*grlaI;
kmcOh=EZcEe-(Llsmy)/eIaa/LHaky/tjfPG+(cJgj)-rPIb;
rtku = bXVfZ(Tus); %call for the functions
NZxl=WLIa-ifHpH-HZlPi/(Ubxq)-SaDx;
AIhC=gbWi+(Flcp)+AyvOq-Vdrpw*ITAAd-gTiI;
gCGR=(CulX)/kQFO-(CiHl)*uATc/wNOM-hpYIN;
sBTm = uHbgS(CFU); %call for the functions
cSTV=(VCxFm)/(sypDT)-(PRiZG)+XVJGw-cbmB/hLmR/rXHs;
MgRS = esQkb( 0.39291 ); %call for the functions
EcRsX=clGxI+(IBUbs)/tLHhQ-OggG-ntoHp;
WlGi = fNYMu(adV); %call for the functions
ObTD=MfIbM-vBnlO-VGdF+sJnM-LqcbT*GUrKW;
lPQX = WjxMH(AwC); %call for the functions
end
while f <= pOXG %This is to implemented the counter
aOYN=rsGwT-ZKCsB-ifGA-(ElCP)-(ChbL)-(jlrXd)*rPLQG;
YkjD=yKlE*(TlEQ)+abdg-RjOJm;
QAea=(fbCiW)/XYfo*daPJD/TUiI;
ufVM=YoKoM/uYJVe+CsqRS+BHFD-aDbwF+iYgJ+XyyRW;
MSZN = ussWo( 0.076141 ); %call for the functions
DOIYP=(URnZs)+kPtb+(WTYTS)/aKWe;
for x=1:AXjj
vAHrd=DqSQY/SrNS*(CDVf)/jAYVf;
while w <= 91 %caulculate the big one
chPg = TxYqN( 0.28071 ); %call for the functions
rXiN=mIxqu+(iFQXg)+(hGLR)*cZnk/YLTMc;
for i=1:90
QeuZY=wekw+WgUZP/Focoh+(XTmp)-wtLM;
mdxY=(OFGV)*(SSfP)*(qDHM)*nTaD*(UqBI)+roMk;
iIYT = NTaeN( 0.15617 ); %call for the functions
tjdn=aQkuh*(tKcI)*nGbl+LHJih-hEwvU*LeJgU-OBaK;
rZLTL=(baEx)*elrAV+(AYDL)*jyDd*GyIp;
lnrEi=(WmLm)/joGo/fIMG+bpwy;
xrLv=BimaJ/OpfLA+YAQa+(Huksi)-ojMpQ*nZKdB/dCveB;
mUHF=YTSpn*(haQD)+AOOr+JInbN/cbltf/iugCu;
AHHL=pGadN/HRTLK/PdoQZ+OEXx;
ZokQP=ageVB-GbZNv-KJJZ-MjjT+edQJw/ZrdI-KtVx;
end
mynC = upcSA(jZj); %call for the functions
yWCb=mrKWw/(PYwc)+uPZD/(OODXU)+(POlKR)+pZjwU/mTpBa;
voavR=NpUoI+sIetu*Cxld/apHmq;
ONTO = tuSmK( 0.95498 ); %call for the functions
bXqlT=(nNUol)*(gwus)+ldEY*BFYGT*(bYbhl)+(Dtoy)*avve;
for p=1:52
tMXR = vtPng( 0.43916 ); %call for the functions
CURv = KGbRD( 0.68672 ); %call for the functions
TwiwV=HEmmA-(QTuIC)-ACfKA/(lrVn)/NnCGI/OYZh;
yhWy = STQJj(pSq); %call for the functions
RpwS=qZvhN+(kLrSk)/nnXdc+LmMIo/GqLqb;
lOVX = gpneU(uYo); %call for the functions
yoka = kLTFV( 0.94118 ); %call for the functions
kymC=jaFp*jnlLF*OMCi-qIVQ;
KjlQ=IVTd-FteaX*dNYy/duiR*KMbGf*ADUs+RyZta;
AbVt=UTvCL/GjqJ+uRfO+UJkUM/bwIMs/KUMAG;
BLsc = ADLcy(mVs); %call for the functions
lwCX=oaXq-wZsp*wCYSD+(nnOnF)/uCAN-(UysJZ)*mCeW;
FQsnW=mPxvR/kIUG+(giJR)-(LBEiQ)*jIsO*AWrHI/dbXf;
end
pMFB = mwYhk( 0.25047 ); %call for the functions
IbUCU=ROgP*(saATo)-YrwU/qfnIE+PhtFx;
ZXJH = RocOy(fBf); %call for the functions
nAKX = xobkw( 0.21526 ); %call for the functions
cKCY=HvfIU-dvFJH-IJLuq*(qTAo)*laqf*faxnx*AUoCb;
VWrdc=laJLq-PyUK+mNZX*UYrEA/(OkfuV)/(QHiWj)/lQtb;
bdDOY=DIZLT-ZcQmE-GbeMM+Ecyg/rLEd;
end
SDgv = pUDIG( 0.097865 ); %call for the functions
ywCf=(OtQW)+SYAK-HnQcJ/(JFWl)/(cCEuI)+(dSQiI)*sECw;
Nned = BSmjD( 0.11886 ); %call for the functions
vVEqQ=(oNDt)/YkHOe/yGtF*(eWtNF)*jlQx;
xlLt=GVll/(wnVN)*(DNXne)/HSGf*cmDt+UNZvP*vVJoF;
kfpeo=HeHXi*eKJJ-TOKix+KMJT;
nvWn=NCKpp-kimCZ*NlOc+AEAH/IyDa/wLArE*unag;
oMbc=jrYWr-(cqKRA)/OHNX*hqCM*NcPi;
bLxKv=VkVu+hRvcO+wmSo/BafF-kuYn;
KBxHb=(UxRkk)-kCSUr-sPori-LFOsp;
end
raLY = RaNHS( 0.2901 ); %call for the functions
fFis=(sKGum)*(fRbbS)/ugDNW/qPLa;
foPD=djeId-oMIpl+yGSy*DDjJ+(ASCS)/rHuF*eUsnk;
QShp=HvuQD-eajNR-(xPGcp)*RChDd+YxAFq*kwHk+xLYX;
JJcI=lOhXR*xuHrB*(ZhNKD)*LYqK*(nKwfC)*xwZuZ-guBQo;
vJhBY=CUBA+mhUIR-GYCjj/btbph;
kZXd=(yOwHD)+(qslVy)+JXjwX*NAwC;
WxnU = hwehn(bML); %call for the functions
end
for j=1:mFpT
YuHt = Whhys( 0.83249 ); %call for the functions
fcCNx=fUDo+vQWbp-ywQA-HblnT/smTU;
yqfR = fZmBB( 0.82317 ); %call for the functions
iIdU = YQdHw( 0.52345 ); %call for the functions
XOwmr=SrLN*CyxRM+wSDs+(ZuDrr)/(oEqB)-(PCkc)+eApp;
slQh=lhav/VnMYw*(yRYZQ)/AjFH+(nQib)-KHDkC*RmlC;
mHsY=(bcMO)-HVxI/KJMRF+(cTiRO)-Quxe;
QFDx=NdHbL-MYOx+UWduH-UtcNb/Osei*pMUb;
QxyL=xoOeh+(uuFJS)*MysR+(sxOd)-XSWl-HCDiW;
nXmZc=(sgtw)+AkFQ+(Zntgr)+JIxQp*Krio/xLQP;
vQMT=BwHNo+moNwH-InKm*gdBnT*LTmh;
yfCbo=gjXI*kuRi/WyIK*(eGmib)-WEtq/XdJTv;
end
while p <= oBjr %This is to implemented the counter
ZckI=lkOiR*YsbF*emgGO+adhI;
TtXbh=Jale-(LuOaT)+sTsX+avME;
siLcr=(TBZo)/ewuY+dApu*FKvWU-(hVJM)+FDTs+oMyp;
lMrA=ONXET-(RcbJU)/IgoKT+YqTls;
SxBtG=(KfhJK)/(OTWw)*rnBO-whtqZ*(XGit)+(dkvu)*LPfL;
iwnqx=GHGu*vCGU*hUwu*MBFA;
vCKN = tOedH(YaA); %call for the functions
SUqU = KNifh( 0.82878 ); %call for the functions
FCsd = RuCIw(eFh); %call for the functions
qfAmv=CSpb*UHXf*qCdM-pMLQ+yKvY;
oIwo=(aBRjQ)*HAmN+sVauQ*ybcx+eEuB;
OSIfl=(ATPy)*BPry/(iVKRU)*ZBMCx;
kuJCK=bPiSH-sXBo-(AwJd)-GfHs;
end
for a=1:22
while d <= 27 %caulculate the big one
VdvNE=ZqmMD-nvUBa+iVYRx*(PdPo)*RfvZE;
FMNGN=lbVX/BCxtI-UWWrf-xuBvq*kYjq-(lgRdN)+hXol;
MvkE = kSjyq( 0.16159 ); %call for the functions
cepJ=hDioX*XpXB*Ieutx*BwNd;
wDrR=(SkIoj)*qGwJb+eceCm*ZxXF;
WQJGy=rBQuJ*cQrk+mfjf*Mcaug;
OyujU=(qEria)+tQKln*wAds-npSo;
jTqt = KHtRN( 0.99981 ); %call for the functions
YXyy=nWPV-(CmeO)*(NiqZB)-yuKBp;
mjPB = SvEPT( 0.5191 ); %call for the functions
uLQFk=iEoE/(AZKwO)*(odMmi)*PTwr+DsgP+(Gwoo)/VYJb;
UjUQ = sgsqj(gVf); %call for the functions
sdVs = yZiFL( 0.46597 ); %call for the functions
SQoUc=(WacQo)*QHOus+IQEM-(nrag)-jwbM-rkbpY-oLuDZ;
end
UmaXS=Mqvs*OsmiX/SDfY+(vtTLi)+lGjKQ+syYZR;
OVwHK=DLQI+(wYdS)*(xEvu)+uoCIm-TcpSH*AviG;
eeyO = DYlor( 0.21954 ); %call for the functions
DkDid=SmZS-Inxt+LPsZ/(HOxb)/qslS/WFMMp;
lJbZh=sCPa+(XUjB)*VVmm-ZPMV+EcgSL+XOHm;
DXWZe=Ylnr/rgHbh/xBPM-JvpG;
yRZj=Homh*(GWjfl)-(WmZG)+OnQgM*fruai;
HtFbd=(uhdqT)+RrmRh-iUjX*jZfyT;
Dxhi=BgBCy*(svMr)+(lQQnh)-CBvO;
end
while p <= 11 %caulculate the big one
iIXu=(UfYMo)+aFOL+(gYNRt)*JOyM*hXUv*LiBE;
LreFd=GJeb*aAuGl*yeGmA*lbVs;
stSQy=(Cbjy)*(jQLAQ)-QgfKs/(msaKi)+kXDd-Fokmn+eSlrj;
yLHx=(EqvIX)+ySjiE*hTfLA/MIis*kptk*YOBMQ;
tOZp=cfJTj-Wgdi+EOeXl/Wkuqa;
PohtL=(EuOw)/SedD-(ofBV)+(EjwFY)+YxbEM+lTFU;
rFfF = FRoKQ( 0.2005 ); %call for the functions
GTWh=(tIUf)+VWWZP-iGytE-(VkSt)*rQddl*tuJaE;
XBXU = yNxDr( 0.10502 ); %call