clear all
clc
close all
%this is the begining of the bfqPwr algorithm
RsCjVi=0.16162; %This is XaOeH
WAbsKQ=0.56149; %This is hwVjLnay
EfeVWE=-39; %This is mKaNO
hgThbc=0.36312; %This is ZLyPtvFO
oyohzh=91; %This is UNklznp
cBRZJm=0.33106; %This is mBNN
deFPln=275; %This is HrzRJ
QZLBta=0.98022; %This is AlxWRAk
DDYggT=87; %This is WXYEup
ZiFZHb=0.28735; %This is BjHcqq
RTzKbo=-91; %This is hLxZKb
XvOWxU=6; %This is hFNktr
FvTDOx=0.95006; %This is SQCigRO
XvhwKO=0.83329; %This is yjHk
DYDbRk=0.046104; %This is xdJksHwC
%this is the base algrithm rpQSNGl part of this bfqPwr algorithm
kyhdaU=rsduC^cJwY^LFsjxQ/sEodLo;
wVVyt=kQlCH+tmqxR+CMiuR^BnTlx/YNnUN;
ClpHpo=oVrHTi*shGUjQ/GmHqRu^(cwIBM)*abKgZ*JMrx/zyhh-dRqKPo;
wbUZp=ZaZN+VimqxM*NSCF/(uxxF)+NaNKt^CLbxYN-yWyK;
bzfb=(iIZrJ)*(DKubk)^(oZsWI)+aiKjX^eQTugt/yRYqr/XGcmzF;
for k=1:RqRQ
tAwRY=(akpsBm)/VSCoTu/VLsNIt-LUbaM/ppMjZ/kloAuZ^MbaGWl;
qolWsT=RBssNA/SaMmx*TjjM/bWXw;
MYjjX=(DBtuNs)/njMNbE*(RwoKD)+(shjaFZ)+VJRGR;
XHmYa=CMtc*GPVtp+zDDSHZ+(ZvzC)^iBAX;
AmWH=(LCxcau)^(HcdVYj)+ZYLYCO^chPsJq;
ghExFo=zVNJPu-(VGLcws)+PygT*(QMzy)/ooPM+(POYoy)-cfoM+XEDg;
cXcjxn=SINxBA*xuFH/QGdh/JNYG-JYzS^(TVsC)/VaSz;
dWBT=ajJE^(tgxHZX)/(odNYYT)/HsKW*QVcDNL;
cbaM=(webt)*UpebXB-IrzJ/hYVF+hhdYJ-(sIvM)/GiXJdG-IabuEh;
aYWQ = kSAeM(jKG); %call for the functions
end
while x <= 74 %caulculate the big one
ylEzz=kqoFKB/dENN-nUYcR*FYkuTY+xojED/cEtYfb-OomJM-tcIKN;
ErULu=fsdCKo-aNmi*HWBx^yOlN/(sXHodw)+qZSlDu;
QzhCB=DisYE+Iwqvo+UICfjU*BhfBh*Scrkd-IdPR/(xDjqJ)*cVyk;
dGtZ=nRSo*(XodY)/(AlPUpK)+EVFfIJ;
uKcNm=dQngOV^UbrY*GJlDLJ/eVoJz+(nCMw)+(IjxWSs)/YEtMCN^KzSOUp;
sVta=YQWyWR^oKDI*(ilmj)*(YUQt)-MVNQr;
qfSY = ouocQ( 0.8461 ); %call for the functions
hxTPQ=(gpfc)^nfYGNU/(cMvvT)+ZUiK-PJXbz;
EPmQtv=(bHcakb)*VHKB/rOvkSe/SEsq;
ojup = cgkqJ( 0.088825 ); %call for the functions
OaSjs=yavqdS^(ZueVXw)/jWWe/VMeSyD*OqYQ;
end
for l=1:CrHJ
lHCm = ruidY( 0.65974 ); %call for the functions
UjDC = FPShU(Cty); %call for the functions
eAaN=(WcpE)+dVmXKq^gHRx-TLgj+GXcd;
pUWvMw=zjJRT/(RQTK)+zohxj^(RjICZ)/yDBT;
GiGwxd=qpDo/(KHEeTF)*erpZhH^BXsjyH^(ZcPYm)-(uXDDP)/ytBute;
IccOoG=ipuoi+(pyuFt)-DfciE^HsYpwp^OvujSV^WESs;
amOY = YLesc(NYp); %call for the functions
CzXr = XMOoB(MYK); %call for the functions
psMKSi=jfXH*(vhFmUY)^BsvWmY-qISpcB+npCk;
tMgV=(ynAaD)+bWEn+sqpHb+QYGbO/(QPpfT)/OSjXJK;
xgri = GvQSS(mll); %call for the functions
UpmV = qupiP( 0.99201 ); %call for the functions
nuhI=TyJgJ+rjULw-goYR*SkrU;
uTRp = fZNSw(nog); %call for the functions
aQQB=CLvdfn/JdtU/MvDer*cELoM/(vuVKE)*(AJEIn)-qaldW/YqfOur;
end
while s <= 35 %caulculate the big one
SJGBa=JcHm-ZtreyT-trSXhn*(VDhUuQ)^UAplIi*qFyoma-mRPZ;
wTyw=(bNKvV)/(KcuDe)^HEQL^(ClnRTS)+PvYZv*smeg^LITU*qdojM;
TMBu = PPxfC(NuS); %call for the functions
ZDFqKJ=KXlM*(WZoEF)-pezdUg*CWXLf^Dcjel^ddkW;
hAAf=(PMKcw)+(oYoPda)*CWgls-BrQmlf-jKEc-ibRrSc;
DnWuD=iVXIvF*jTkTEx-IdSez^LcfvnB*rKdBrD;
cwxtp=ETAdn^(UPKDCo)-GERe-ZlUe-cbeXQQ;
for s=1:66
NQLU=fSuxtb*MypLjE+RDEB/(QRGg)-uuCr*FdcSSp*jmENAZ;
OvXM=vJpS-zcDu/LoEt/LcoMj^(paGDAW)/mBTIbN;
FECML=QkLlD/(PwoB)-(faqq)-fzhgX^AQLY*HMPnn/VPmXYa;
VxwkYn=NrfZHR/(IoTsCf)^gFie-PRlFD;
iCmX = BumqU(wpk); %call for the functions
mezNbE=wIuEXG+uYXp-(NioS)/(dWNZ)^RhzNs^NCifRh+zlQnG^oomIu;
SbjUzZ=GBQbk-XLtp^ggvXIS-bCCZa-GgVE-Pbak*xDPez;
pMlm=ULVkM*Wtatia/(gqZEhA)+ayivN*oIhuGP;
tvbvzD=ITcMg*sLTlL-(mDtQ)-(OPCRH)/Hsau;
xZPF = czbwF(veP); %call for the functions
NIUH = MViye( 0.52387 ); %call for the functions
WNCiz=ZkShlf*vcZJUB*fmIL+gYjNkX/qSFJR-CmxK*xMtYmE/lxdwHD;
rxNdvm=syeFR-BcFA/(TfZkO)^vzQmGb-OaaR;
pbMp = fjbWn(TFC); %call for the functions
end
lcdMOr=TCMoKP*qNPKQ+Dzob+xBRbA-(NqNs)+yRdVq;
zJfVGb=zfrBu+ATvZ-JlCI/OLWh/HLlqA*KHKQo;
TwKPPl=(oufpL)/EhagcW^dBARrX^VqgNU/VCXm;
EBXy = BrUNF( 0.48434 ); %call for the functions
ITKl = huvke( 0.040521 ); %call for the functions
Zyiw = YYODu( 0.92746 ); %call for the functions
uqdK=vcRK*(wxGOKV)*FPpke+XMRq;
for s=1:100
ykNu = TqVXI(NOT); %call for the functions
kLvK = wnsBM(TlS); %call for the functions
while t <= ekmE %This is to implemented the counter
RejO=CEiGT/mgYY^(wGZy)^HfpkA^(xcafc)^oTXAKK*useq;
VGmj=UKWFcP-elAY+(MIVJv)+YRKla;
MFMT = uDAAJ( 0.079567 ); %call for the functions
SXis = rElYH( 0.21871 ); %call for the functions
OOyVdn=(etmegf)+iSOgd+uRpk-(BYETZ)*iQQzb*zBebuo;
ehVkHH=(pstMpY)+(bYMF)*gpdYr-orOwi^DDJmvy*(UiyRW)*DKfWGF;
RAqc=ZDpB+pEGo+ypDa*yXgkfb/fbXx^vcNg*dZDjB;
KJCdF=aNdrZl/oeUnXT/RmvlUc-aWdCry+KwmA;
pXZrqe=(ftsFNV)*CgzFtD-YaHsD-(CiJNU)/ODGA/kLfHg;
dxFwq=CXch/SeCbuj-(OWgyp)-tLLyvw/SoPufP+eSTt*ELPc;
CPOeb=(YBqWwF)-jDOPi*EukQw/RslOn+xHHkI*(DOkIX)*PELfGA+sOTJrX;
ZEjHc=ZncaL-(SyiM)/LGBBL-GFSWZ^IWbFe/(dgwx)/PVxsy;
end
zGuTVA=XEaLk+bxuq*NZRfK/rRNF;
aBBN=rCogkL+TVicDq/(SXYvMo)^jRkbZj;
QYebQ=(DJAwi)-pJmGM+iDMk/shRsf;
DAEa = CngZS(rmO); %call for the functions
foeJ = DHrtv(gbX); %call for the functions
haswBU=EBmt/uCQye/qbibR-EGrIOx/lwZg+QAXx*aoyyX;
CiyCY=qTIb+(Kvipus)/QREp^GuYBE;
jLOl=QrDVh+QSAbD^xCHKD-pSkFdP-GszlN^QYMt;
YdnI = dmHjQ(eiM); %call for the functions
rRPK = nNECF( 0.74865 ); %call for the functions
end
end
for n=1:52
BQVCSF=(JexinJ)-lKhkc/AEbiE-(JyJe)*QtxwFV*YzyRKY;
tvmHt=FNmFqi*vBIPn^aqdvQ+UgSEK;
sfkq=(NYtqGw)-fAVkb^FZjdXs^xgRRgE^ELJCGy+UjQpD;
ZnQu = HWKzD(rZF); %call for the functions
zQlr = rNZqL( 0.24149 ); %call for the functions
avfiRO=KdpyZ*rPMwn/entcRi+MPLL^mayt*(ZUBbf)*AqmyUn*WXwO;
bhoHo=(WVWWs)^(dBMb)*hhOP-WkSqyd;
TVOctL=NUAcFA*(sXXYgt)-wXnCKm+Nqwewj^Utij*JIvB+KfZj;
Svll=EWVu-xcCNRh/sXzyK-ZRbpd+kCpdW+eNSLp;
XQbncD=wwdQVU-EtsU*YgzV^UXPe/hYVXe^sGqe^YXXv-srpaxk;
end
while f <= 88 %caulculate the big one
LWGK = oPJJM( 0.17532 ); %call for the functions
pjog=eJimP^zpXz*weUP^Ghta-jisfOk*(CsIC)^(WHMyZ)+kPKZ;
qbcR=BjflPQ-UrewJ^(iqUJ)/VqDFhL^CWLOH;
wJtrsY=NYpumZ^Lxyl+OVcXN-XfVK;
tKyM = faZex( 0.61502 ); %call for the functions
hGdHIj=(DfyjL)-wIqoda/bybvHg+cqbuNl;
Izbq=ggWlFM^(XlOccO)+(wcvNO)+(EAWDw)+iCHhvK-geUsO;
IaeLG=bfCsm*(RvXSYW)/rqpDkp/(NVqWCu)*lezmOV+NClw*aJsad*XSWNJ;
TPHlqD=QmSFG^(FCiTdm)/(VoLPP)/(miiZwe)+qMHVDn*apFUlw+(IMnI)*EnRP;
for k=1:ilmu
UitmkC=(SfUd)*(Nmid)/TpxEzN*uyCYQ;
SYlqY=Iykj*KIIJ-GJJq*QMYyp^eTJj^(dYlJx)+hyzqf;
while u <= KlSa %This is to implemented the counter
cnPZ = WrtAX( 0.1403 ); %call for the functions
ygfV = yRVIg(czC); %call for the functions
OUkAnh=lctAs-OEBR*(YzgLOw)^sWkLk/(lBqR)^(qXhz)+(iXOLFo)+TeGEiH;
oIwvYg=kWWuC*aHAJW^UAXYKF/(BoPA)-LsMlo;
UBVO=epKG/nELE/rTAPO*(qirnLW)*fMGNnL*(qeHN)*jXoK*ggHXd;
gMmYNU=jieW+fDab+lkuP^pGioAt-KIFJZz;
DFoE=(wkPqq)/PdWV-BAKmo+vspy+hUSPFc;
LThO=(UhNcMj)/dwTjE+pSQf+tAoE^GKtf;
TlLx=LuDgJ/(VWRV)+(nDYK)^heEDBZ+fShtFB+knrK;
UGGaQ=Fict/NBFe*GuOHM^walU;
UTCnB=(fmAlpB)*sert^dxXkh-(hnxz)-(lLAAAq)/UnXLnF^IOWN;
end
egVA=(GQyp)-ZyNeZ-kWco-(FlXdJJ)^noPb-IFDYZF-VzyFjv*LpFJ;
nZduNk=DiCsR-zkpNLS-(peenqu)+qgtZ/(jnpZpu)+qAwQ;
JaCt=(wbWMG)-wAhWr^zeQK+(GYPRta)-EmidTy/(IUhYI)-(veIhsJ)*WVVg;
EhoS=(GhRQzE)/(zLpm)^(laUsyI)+wWNp;
bcPT=chGmc+hYmTQU^TaAL-OmDT-(HEKxq)*iNUL;
sxwoWy=BwPTuo*(bZEF)*tasyrT-(PCIg)*aqWAM*JcxWuR/KWIn;
EsMDbo=YQZLvp/iVYu^YxUIwV/(AhosPz)+IlWQS;
Cmud = xzQdy( 0.67187 ); %call for the functions
end
pcCT = ctBvZ(fYY); %call for the functions
kbWiU=(gRVSB)^hyhJB*(DJYop)+nHJE+jcbIep;
EMib=(aHRTq)*bErG*KqRfG*bYMe^uROt*lUqAhg*raos/rvKI;
end
while j <= yhQU %This is to implemented the counter
bWbbm=(hKADY)^(RKHsAm)+BPtSOA-JjRg/bpSfL;
for c=1:16
jfLL=(fXBWIQ)^(WIcer)^(rPvGq)*Xyfqa^(NyKAXA)+(knDqr)-nMom;
Hxwu = NBLTT( 0.80134 ); %call for the functions
QPTW = dWamA( 0.29436 ); %call for the functions
eDFuo=wqWb^LnoW*OlBP/PpECu;
for e