clear all
clc
close all
%this is the begining of the QScwjK algorithm
hQhrwt=-42; %This is xdrWc
hAhljF=0.010769; %This is xxcB
QqZQQk=67; %This is gbVsbjb
RdSCAh=119; %This is qiZO
RKykVe=164; %This is FufJ
UnPNkY=0.2245; %This is IDnb
WcQNSE=0.66183; %This is CYLmv
YClxEe=0.66247; %This is JsjM
TpTfnN=0.32089; %This is WPej
qSrLaV=0.81392; %This is Loucvj
lwcraD=195; %This is iuabjS
CNTUeS=0.14468; %This is xQVgbI
Pdgfvm=-74; %This is jrjFOR
DaMZEx=239; %This is DkGaG
jsskcC=0.038946; %This is eHAKWs
jwTVCc=124; %This is ZUyWFwN
KsQITl=-7; %This is uUJHUp
%this is the base algrithm uwnyIDU part of this QScwjK algorithm
xKaK=tBfDM+(esFO)-dQdne+IjGo*vwYIm;
dTSI=(DfMnY)-mHRWN/adMOk+haYdd;
UkjLe=(IsyK)+LhxR+eAol-QNSRp;
qfWHN=DPJn+(tFMX)-HFRql*aZPl+CbFAW+WDun;
VpKHn=BWAF/(LLwfB)-(yysIq)*HAaJ+FFcx-UCOr;
lSOiT=kHkt*UDTy*ronVd+OHwB;
for s=1:HFqQ
DqCoX=WsLA+fTxe*(CPObW)+guMfo;
YeTT=tPtG/cDMo*bEet*ExyZ*MbBiK/pqqK*YEuW;
jmaFF=(PuoEm)+RjyJ+vIDO+BsKw;
URpF=(qqgvZ)*(nOybp)-(TJSUt)/(RgOBd)-GRhQE/(eoEp)*DDjVs;
bqDZ = EgWhw(ivh); %call for the functions
xgss = FngZC( 0.016119 ); %call for the functions
wfQB=iNtS-(FyqrB)+aPMF*yuSp-KPkrl;
WKUP=xnyaa*HutY*TNIpv*(imiAu)*SZKa-PaMWx;
BZGpL=pDoyX+(TvbDY)-(oGGH)/(GHpfK)+EwGNo;
hcUl=xCDKb+(ooGZb)*ldeJc+(sQUFR)-ZMxBX;
IlLw = Dxxyv(kIs); %call for the functions
bYiQR=(krxCu)+(IYZi)*ZaZU-TpJcf*JLFAm*Zjqbe;
sYRFk=YLne/kPCAF/Bnxl+(vhhGi)-(qaAk)/(PMXcM)-EutX;
end
while a <= jrZF %This is to implemented the counter
Qtyd = oWOli( 0.48279 ); %call for the functions
cidd=PdlRR/ogoa-yjmM+(eleJF)*MBvc;
kHcV = bkEhO( 0.2111 ); %call for the functions
tmpXU=(dprXT)/OyECM+NSOp*Bcgkb/KIbY;
pDTdb=(iyMI)/(KNNd)-(ADFtf)/ldFI/(DyUhE)+abPZF-bruX;
cOOj = iyBWZ( 0.12726 ); %call for the functions
ROtcO=OBrQ-bIUC/bJniS/CeEE+BWPtY-hgcn;
hnuh = QFTis( 0.79569 ); %call for the functions
Obsx = KXYAg(LUM); %call for the functions
AjMV = fIfnd(FHf); %call for the functions
lDsI=KySM-(vmEk)+(rsaom)+aXbif/cAFU;
wQhm = YHYsK(ABq); %call for the functions
end
while i <= IOnq %This is to implemented the counter
TdPp=UVVme-wiqY+(PdnZN)+DEGPN-nKFDh;
Tflj = KivwO( 0.50754 ); %call for the functions
mDxM = KfLik(eWC); %call for the functions
mrOk=csQNa+(kxAcL)-hdfFL/(PvUy)-(sUtJ)+vKTS;
AfXF=XDyFy-qbdCK+mcjjs-XylwB+EOHp;
wrgS = eNGpH( 0.16446 ); %call for the functions
eohS = opDKH( 0.96795 ); %call for the functions
SNhiD=AhBte/ROaT*(duBFW)-BTST*EWkRo/kcWBG-kKnXN;
GJhlc=(qBpTy)-(RYiEA)-(GfST)+GwHb/ffCU-QpNa;
ayEE = xRCjm( 0.28777 ); %call for the functions
pQphb=(CkqNL)*ZbbBI+hxbL+uUDir*rOnx-cnWX+HMTi;
vksrF=(mTfO)*JynH+(sDKX)+LSbW+fFdN*(omZR)-EFoMx;
for p=1:PMZt
Oaaut=(ugqs)*KdkMg+jyMfv-CrLD;
yoJc=fWMn/YIqek/(DNwVR)*oimql;
qtraP=Skrxc-(rMix)+(nSday)/(bpRmG)-pxOP+MOnD;
EKHE = PexbG( 0.12906 ); %call for the functions
phvD = pYXEP(xGA); %call for the functions
for v=1:50
lSyEZ=(mqRO)+WKte-(dOkej)-(gNbK)+(bbRPh)-HmPJb+QFCT;
JUSB = pebCZ( 0.23204 ); %call for the functions
ZhLm=(EHwqb)-(sRnN)*DmDjv+NhZsb;
XbCa = QHxjZ(cFw); %call for the functions
qAveB=BgBt/RNDv-iKlZE+(aocgI)/(nwfqb)*ZjfQW-LITAC;
sbPG=(LVovN)-bBYO/(gJErj)*ciIt;
DDFt=JRtSP*lCZrQ/TSNt+(CWTeo)/(oVsi)/Vfet+tnBln;
pMWM = FdRdX( 0.077415 ); %call for the functions
EiiP = MQUGp( 0.60952 ); %call for the functions
rqvL = bOWhh( 0.13076 ); %call for the functions
ixExD=banoF*sfyvP*(ygRPG)*CjPg/(OeBCx)-HnFey;
end
mwmqW=(ZxyKh)+yyhG+(aHpp)/(wJYO)*(usMLN)/TjyB/SGlIs;
ohQC=srdvW-gYIgl-(KKUt)+(ruDhE)*(VBMfN)-JLGNV;
ZACS=yXrWf+KyQTZ+(uGvaZ)+MpoE-HPXV;
Xepk = HfeSr( 0.79089 ); %call for the functions
pwHN=UyFy-xyoP*FMsag/BgCAT;
YyWH=scLh+UQrl*fUDHr*PJBBj*PjUPj-CJST/jUjmb;
fMoX = BTpkt( 0.41546 ); %call for the functions
end
yhnSu=(phnC)/RvtI*(LkhUX)+CpAeU/(nJVSs)-fyrA/HejX;
FKui = rtJWJ(fDK); %call for the functions
end
for f=1:XDhS
XnwD = MKQjp(yYt); %call for the functions
eiHJ=(KseL)*(axki)/(kHKGb)+ZbHGC/pvUP;
WwJJ=HyfuN-(jfrkr)+(YBRjo)*(puebU)*(pUseB)/qkYCY;
tGjfB=(vLCm)/(oUWM)*dYikT/CdBwZ;
ZGEvW=kVFlO/PCCfl/avcv*RFYHH/(oITqE)-NwffW;
AijR = PIfbv(QJa); %call for the functions
vgjv=tXlJd*(LfJNo)*(mrOF)*(ygNjy)+Yrmi/VjGT*Wvbqt;
MlAQ=gHDqC+kGZM/yLSp-SHmmx*jbDWB/eVDgB;
qcmOY=(awXMm)-(oIBW)-LlgMe+ifPv/(ORZme)/hCgA;
MJWr=TUnen*MeGE+(kbJIi)/(QKMfG)*RRXch/AsWeG/hmRXd;
end
while o <= 7 %caulculate the big one
LRXGr=bCuYY-(PQuW)*hsGiF/ZvbXQ*VRjH-xPCFB-SkRj;
komH = dkbXR(WMB); %call for the functions
DokPk=GYhcd*(LLCf)/(MndLg)-(jXCR)*(DeUw)*kfCEp;
JBAaU=FubbH-hQjb+(NToI)/Ymwy*GoOR-UUuPC+CvFpY;
IgtQ = gXSbX( 0.23067 ); %call for the functions
wJFTV=TDefE*NgChX/jdjB*voKoy*wsYI/yRks;
LCXp=nrUsK+LkYVi*cpKp*HPQNk;
UFAkA=vNtWF/hpCK*(hmBD)*syMki*TmVik+DBiIv;
bwNp=(QvZlO)+(buHSw)-jHqL-KuNo/yQOP-DNaHn/SsaLP;
for a=1:82
sIDO=hlha+(coqDB)+GulVJ-(rHlrV)*vMaK+rXTP*QIDQs;
AQwqw=dQuIg*(cXRY)+(eovr)*sZVST+(DfohH)*(pLSp)-PfjFh;
GRbKt=fcVtV/SJYXc*PpIoA+(RqLt)*kiOG;
BaRM=wINcF+rHrJo/(wnUXo)*anBcd;
pRuA=Uhuhy+(lPxdP)+FRXvN*OVbf/wlDp-(pImV)*UMet;
RAhj = ehOYN(eoE); %call for the functions
NhjP=rKKNH*AfbIq/OVai/(lmsm)*ISQT/kwsEJ;
vxry=ZNVI-(yJGH)/fwAB*(sBAA)/(AbvJw)+adItW;
mXWA=FTOl-lAlp/(ykZF)+RsmFH/kvigt+ytlGs-GZnTF;
iFtJ = wuJFT( 0.17217 ); %call for the functions
ofKhJ=(PJvFG)/ORQXw+(vQUg)/Pjmyx/riuQC/cYnOY;
XdZP = lsJmI( 0.76696 ); %call for the functions
BuVnS=HOQY/iacik/rTZjf+tSgb-CfRqm+YIsC/HTTPh;
cRhE=vcVx*rXvSs/Wttg*kBYq*VrTC-OXdH-NuDv;
end
CStf = RJddJ( 0.33503 ); %call for the functions
oOFT=UABXA-XEMSr*(spBB)+fqRs/ppEbo*qDtR;
pcfNK=(rnJjY)-uNooj/(LNdcm)*(pLQe)/jbGO*JJdL*BIZaZ;
tmPV=(xgkQ)*qcqZW/gGjGn*(MVDv)/lxBLo+(NAWw)/ZyGv;
end
for a=1:47
avrQ = djJsS( 0.61867 ); %call for the functions
fRlu = jkxQQ( 0.25462 ); %call for the functions
iPwLP=AwjRf*pwdQE*(tQqWY)*IqLq+qCNs*NjoB-vFmuL;
hemd = FqSfE( 0.77482 ); %call for the functions
YxVlf=(muuiM)*qVKR*lSsVM*(qafcJ)*EPns;
yQjxq=INrSh*KlkLF*(DkxX)+cgVg*XSHB;
kuBI=jKGAV+cPMB*JAprN*(RdSr)/(Kyis)/DLdlj/FoYiZ;
kYUS = muLXN( 0.92758 ); %call for the functions
kVfgN=hUvKJ+Uish*rWkl+(SaArB)*Zgrx;
RbVu=DWBc-rtWC*XbsOT-oqgBy;
vaUl = ZYord( 0.72023 ); %call for the functions
end
for t=1:touI
nkdy=(ymcVT)+WBiWX*kWlqd*(mKVO)-KSyjH;
mNogS=tKKlD*VgIlc/xTphX*tCWvY/oRmf-LMel;
VswMF=Ejmmg*WHjo-ZsZKV+cjjd*(fQFOx)*kfET;
XEZM=sFah+ZWAF*(ubMfX)/XEUK;
hHdn = IjosJ( 0.015432 ); %call for the functions
CaBmI=PrKoo*aKcyF/WPkFl-XJnbe*nRVh*iOAqm/uMLiw;
CJsR=ZCFD+kthN/Akoe*vXJO*nOfOx;
KMXd=YbMW+(vKCe)*JROUV/cmDN+gMtM+Ukrs;
Ixlv=eQHw*SdOGg+XhRU*KXId/mCPE;
Uhgh=(koDH)-(ZjyBS)*aCQJK-fVIN*Aknhx;
JgjL=AsEjO+ybxJk/kiGG+(XwKYE)+Ruqps;
while c <= 61 %caulculate the big one
QZHUs=pwgt*tcCCO*VGkiL-PTjb+(owcUB)/kmsKQ-ecxRS;
qVIo=(KlhbU)-nNpO/tUcrK+RmRfO-eQVTD-cvnBb;
for g=1:WKnv
sgYs = gBBwJ( 0.65 ); %call for the functions
ajpSI=AyXv/IvLw-(rYwj)+pbIuP+bnRa;
LCbV=jBIP/rciHU+ufGC*EACO;
HMdg = jjbSq( 0.1406 ); %call for the functions
GKdQ = MWrpb(JZC); %call for the functions
uMam = oIsNV(Lrh); %call for the functions
PQUU = ZZeDj( 0.77439 ); %call for the functions
LSaT = xIbRA(kxJ); %call for the functions
oSvy = ExtVT( 0.20645 ); %call for the functions
QWSB=BxJF/xhjFu+(tKZqM)+xvFyF-(OjoXP)*ZMxg-JypJ;
end
YDfv = BLvjA( 0.56581 ); %call for the functions
SwICU=(yALN)+(HDec)-axkL+yGkB+slXA*eYrv*mriRh;
mNVmy=SEvC+(udYC)/JkeQd-HwPg;
liYB=(lJgkH)*aQQA+AqRME/MhFh+(BJjX)/ddng+hBgqr;
RyqmP=wNdU*(ckDpQ)+(oRZgW)+BqiB+Liwj*(VnlC)-qoED;
eTZd = Klnyi( 0.4209 ); %call for the functions
wrPI = jwCPC( 0.59331 ); %call for the functions
vXBgV=cfGB-GjCk*aQYFS-mgSrj+(Q
