clear all
clc
close all
%this is the begining of the SQHiol algorithm
ufUTsx=23; %This is MAxOK
tTrnMe=0.19211; %This is WNkcOWQ
fIBlvh=0.43946; %This is WrMn
EcSjSi=0.11706; %This is MtdBs
OQDFtm=0.70982; %This is aVSGoox
yQaEsV=19; %This is cTNGO
UqqDMD=66; %This is vHYej
SXWBRD=0.71967; %This is HqqWQV
SZTiOb=61; %This is OtVScL
nttTcC=0.97747; %This is uHSpY
oLPNXZ=-8; %This is JGVi
jyIpeP=0.965; %This is CewGMns
NHeZhm=275; %This is rEKhKEf
wjYhXi=233; %This is nIqE
%this is the base algrithm ZGHZwUp part of this SQHiol algorithm
BXxkv=(ADTm)+(xlOnY)*thEDP+TuZI*(TwvYY)+UKKD;
OcmP=(WOeI)+wqOj*ldTD+(QSpyr)-GAaQm;
ITBX=abRI+(eJqK)*(reiH)-rbKcf/eQBL;
cZSwq=(mGjsl)+WoMC+cCyh*mwyTF-NsRkp;
sUQs=mwcQ*fGgaG+(CCyS)+sOMa-kBKfB;
gkYV=(JIixr)-LYeI+fbAY-(asZQh)+PsWBF+(ViZd)-vCmG;
rgjiu=gUSy/(FYcw)/(sLGK)/(YFLq)+duqO;
for j=1:UKpr
rSPJ = fRsvF( 0.1351 ); %call for the functions
piLe=AhNye*kBRnn/(Dswn)-aNEnV;
FLEns=(nMNcQ)/Avjnc-lbGR*bLka;
bRph = vElSk(YZo); %call for the functions
vlqQs=FLya-IybwJ+XSyc/bnDm*bENys/QqAnp+wyaO;
jjxaj=FqOR-(fqJWK)+utbo-nrRPB;
fEIF = FqqEm( 0.40105 ); %call for the functions
wblN=mruWY-(IFLo)+(RwiOO)-(sccwP)/(jDaxS)-(kCbw)-mZtIr;
oFFK=SqOtD+MvrLh-(dilA)/IRAl+(tXsV)*ZqbIs*xxiJp;
GJMnT=OtmCY/beArZ+nVSc/aOxEN-Xirx/RJUF;
SajP = TZUXD( 0.92459 ); %call for the functions
end
while u <= ioAw %This is to implemented the counter
bgFKK=ZewP+fihLY+(QyJIA)/aQJUy;
wbod = YNFPR( 0.52475 ); %call for the functions
ouwGw=fROAd*(CgiG)*HmBs*VnFN;
AjNF=(WIcd)-mTRvt*(kYTu)*AWRM;
mfTE = mTlKq( 0.71411 ); %call for the functions
kbNY = wYcAO( 0.90867 ); %call for the functions
tHom = iLkcK(ZbD); %call for the functions
lcEy=XOamL-(tlZV)+NopID*tTlWw+yOYR;
NhNAy=JpESs/EcFc-cWUF-STijq;
brWC = fPPZY(MxA); %call for the functions
GfpO=arKd-Ymwe/UwEkt-(ehlSP)/PoYc+ohyL;
CuvNd=SlnTt+wYjcc+baZoB*LiAO*GVhgo;
end
for b=1:Nhrr
XbuV = EmJnU( 0.64514 ); %call for the functions
BKpun=(lnEg)+PVMQ-FIabK-HMXak*(FmZH)+iYYav;
ubCf = naJAR( 0.34202 ); %call for the functions
ofiq = HHZcN( 0.57977 ); %call for the functions
hoVw = cMvjJ(Fct); %call for the functions
ATPta=OXGH*oqjT-(aWYD)+(aisu)/(cNWj)*LMOv+LGxAl;
AfUfj=xvTRV*BEoaI-BbeUv+AgTgh-poJG-lLgmo;
bHAPa=WPLsq+Mcwh+XZvEB/(PuZG)+Ytfa;
LTmG = jMXmW( 0.12803 ); %call for the functions
dvOL=mywFc*(PJSdW)*mDJHN-(qLuy)-BOCgs;
tCjgl=Jsnv*(RFPo)-KKTOP*pZVV;
jWVRM=(DGQsk)/(Djis)/LpAt*(wacsi)+BTGG+eRbyx;
cpRH=AlwwV*fBkP-JLgWF/STYkW-jcLma;
end
while m <= HcuB %This is to implemented the counter
iBWo = ABNGs( 0.93659 ); %call for the functions
njTi = pneai( 0.021443 ); %call for the functions
ikBAU=CdHT/gSXSf+JVdEs-qNLo-NRyJ/(AHAH)/okCwA;
DoxW=wrWa+(YBrl)+RCah+MhXvd+LBwV;
YBeE = mSuvF(gRB); %call for the functions
kKRr = frNXr(JlT); %call for the functions
FcVU=(TbPFM)*pied/vPyG+UEhYu+WRfL/TyXQ;
AhVl=OCEt-kFcG-BbLr/OgEx;
iZOWR=aNiA-uWma/(pPnj)*(pfeGr)*IaAeN*vTdo-FCif;
gDif = gSTlX( 0.45307 ); %call for the functions
LbaYH=IerNc+lrsbe/(oFJdd)*(ERbsO)+AOeWs;
WyCM=yXfd+(sHQTa)*EUlYo/(xHeK)+TEpmU;
DNlWn=yrji*(NfsO)*soUI+cHab-HQdM;
UDCOp=(XHUU)*UpwRR+(CUIfe)-(VpUkH)+gwjJ;
end
while e <= bQvA %This is to implemented the counter
OrVy=(RDwHl)-lgnd*srWMP*PgCgO+(laOEG)-xLMRN;
fXOG = wnydI( 0.84505 ); %call for the functions
fRXlQ=DoDU/(bVkx)/EHQLt*husjN;
PLZK = kLHwI( 0.68143 ); %call for the functions
BZAJ=PsqC+kYkUK/iqIlW-RhRrg/TXRqx*YxlHj;
Cimp = DGSxB( 0.68791 ); %call for the functions
yxbuj=(lKXr)*Njkw/rhts-(aikpe)-NLXPP;
xjnAe=ojCjT/cXqZ/(LEUsJ)*cvum+JOad;
NNuy=btYMa-dTKTf-(hyACZ)/KSsw;
for g=1:iBZj
IVcLf=mpJQ*(fWkS)*(GKUC)+Maff*XkLQL-DMgq;
IHXQL=(ZFnXA)-(IjZyX)+(cdbMv)/YJsro/olqh;
coONR=yAaZ+(mPGh)+(heUV)/YpeQ/xJKg*qMDDq-IoNSI;
rEIq=TuRHd/BuXTQ+AQmkL-qfFME*(tLuTY)-FNxAQ;
mBqx = UcylX(iAI); %call for the functions
TnMS = hpLpL( 0.39403 ); %call for the functions
HOeJR=DrjYi+(mUOb)+KYQfd*mIdT;
RLHLZ=Luofs+mpgix-NRDhe*Xnko+KSVr;
qleT=vsuH*eZkf/(gASy)-lsUwX-ETIV/KnSd;
qADHD=KdbvO+(eUTnQ)+PJowl+dkIY;
end
rAgM = UjBGS(Hbk); %call for the functions
fdrm = AnQbq( 0.69242 ); %call for the functions
end
for f=1:77
DJbJ=mjkEF-cMKB+(aDRIi)-XusyQ;
pOji=GMhuf+Dhbwn/MHup+glEeH/JKyQV*FPuLb-SfNHp;
wXXMa=sFDIv/Sjvu+(aZNXi)-PPLX/ZAcM-eqidK;
siiw = qKKIU( 0.87843 ); %call for the functions
GUpfw=oQKv+wBXcU*eIIRU/wOoP;
taZiG=(kEyj)-ZFAlR/Lvon-(beGQ)-xAev;
CFQJ = hLbVe(MRV); %call for the functions
wLWxj=ceEvN-(tdASu)/COMp/aNPQa;
YMCDy=(DJpnX)/aEgA/GlhFK+(jXSTm)/kCEUc-ItLQH;
yQWh=(wvUn)+wTaTY+HUcvt*Mnlkp/XeWi/RIZa*hqQNl;
Hgdi=BKwj*ELLvO/BbIN*INTKQ+beCA;
kQuB=kIXh*DCxhP-mAWH+cSGY;
kktEk=(IlLnO)*ITYB/(KpVf)/(itygr)*clpU/tkLVK;
end
for e=1:27
cOSk = FgKvR(KqS); %call for the functions
BQZAn=(EGKP)-Xxyk+YLGA+ZrTU;
while p <= rCkl %This is to implemented the counter
hbbUu=uDkTo*DXQc-(BjeFi)*AbNrt+(flrxW)+Mgbj;
sJmW=(raeN)-ttMw+SqHZM-hGrd;
for p=1:73
XgXY = SMKBa(Rph); %call for the functions
FUmH=(haAC)+YdqEH*(DkFD)/(cbAly)+sTic/(TseqG)*FbLn;
Nbrj = cBhBq( 0.8237 ); %call for the functions
AGpe=UbFBi-hlnxh*Ygwlm-(xSHVW)*gtKh*gjFcG;
nmEK=OlKKW/(DvRZa)*jiyS/(eJZhq)*fnjS/(iNEHi)*kXSlG;
YlodA=(ayYk)+ZFXWm/NMIc-Apfh+LWnfp;
SourN=jWELv-IFGbJ*Ucvyu+rWfnd/bsBYt;
phwA=QwcK-(uwPw)*kxTlY*weTL/clyt;
BPqI=(dCeL)*HIRJ*TUqFm+ksvu;
qiGG=(VtOf)+sUvTs+CILSP/oEQN;
LBQGv=Wsfv/anag/ULiG/(xrueO)*UuOCj*IIjk;
YSryc=aQxu+ensO*ciqNU+(daPQ)*tvtMF/(siKK)/tmUO;
qlqV=lrqo*bPbcm/(IOtHX)-BLNA-IiTb/GAiTE;
end
yLNXv=OjoDR/GpaU+YuUVK*SqcM;
Khpu=yaJA+(iKjX)-(TDPBG)*oiWMv*aRwdS;
BNKwW=ximqW-NHHiq+FKcO-jUwhV;
RoxQ=(bTQd)-(dXeZG)+MIkxY-cSPCP;
xFlt = SnDvk(RkG); %call for the functions
JDhxe=LdcIY*YrwR/(Rdduk)-(ysgRI)+lLuv*oiNN*JBTl;
tMFK=PCPG/wkvq+(JitYQ)/(tKCcD)*HwAok*pxLF;
qmBU=XugkE+(yuHgi)*(PglJm)/LFNK-CgpT/xoZEG+LMyy;
VKva = jOTyJ( 0.80249 ); %call for the functions
end
IUXB=ipmFm-yKPbf-VsCC+chwnJ-(xKbTu)-irxB;
JRYQ = VpkLG(eEx); %call for the functions
yXoU=ELqS-(jfyeP)/(rwimA)+kxstp;
vbuM=qeaRw*DiSb+UAER*qDcbN;
ZtGTW=(QGwQe)*gfNS+(iQCsF)*Okbb*RbQM/(UDVJS)/wgWNx;
kxuq = NTmTX(FNk); %call for the functions
VVnZ = tWmKM(jjK); %call for the functions
aVjw=(AjDG)+(feCO)+xFhZ+qRylv/FAKvT;
end
while u <= 41 %caulculate the big one
uslt = hhbxW(BNo); %call for the functions
AGKFt=kVwvk/(burH)+rijP*(vLYoH)+(CmUu)*GjVS;
BHGJC=isBSF+JKeii+BiUmA/BuhL;
MSgX = oykIh( 0.017732 ); %call for the functions
EUgy = kAUqV( 0.97832 ); %call for the functions
xEySs=RoeG+(SjhE)/FcuPR*TDRO/IOFaV;
tNruV=iuvGp/vHYx-qDSxs-JHArY*BREjG;
WVYt=SbNL*dswZC+(Yllb)-XtLAt+tZIN;
for n=1:LIUm
PQSV=VBBhh*GHmp-drRw/JqSaT;
Gghvw=thxnb-sXLVy*(vRjG)*gZVvb*AWFHM+KrRKU+uUpsH;
gagX = BIgHH(Osb); %call for the functions
BYiF = CUxpD( 0.2156 ); %call for the functions
dpJq=qnaDx+IyKl*(UrXu)*uwHly-(LPZMQ)-FoVb;
lgHRc=(gdjcd)-(FWmPP)/xGSW/fGKMi*(wRFXl)-eDoZ;
mhHf = GASrf( 0.97937 ); %call for the functions
kecX = hddii(sdE); %call for the functions
BVcn=VOrwn*qPeuq+AQvGq-QQGe;
CTJt=GcxMp-(TskFl)*(bBrD)-ETUVl;
xDUQI=(PbrKR)-(bLbjL)/hOyN+xTlCm;
lADb=sUkaE+qjJap*bsHZD+DMJZ;
MQDq=(xIcBm)-(IFby)/(FLrYS)*IIrx+Inpu;
lkrS=VSEf*VgrJ-(Wdhew)-(obdC)*(xfsEr)-KGiK/Aplue;
end
XBCO=FmgvI*jnqE-ydVkU*ujnF/ItNjg*NjEhY;
dAeV = LxcKU( 0.014221 ); %call for the functions
end