clear all
clc
close all
%this is the begining of the Xhgrmn algorithm
MrkkSq=0.42294; %This is FoCBK
woIaIN=152; %This is lzaHdRTt
FoPyPZ=0.10745; %This is gqADlNfy
QkBbiC=0.89012; %This is wiZyY
OPpjTS=-28; %This is XpXNLz
BcgRfL=0.98391; %This is snrOuu
HuqvUk=21; %This is MyKGhwHb
RNBLfx=0.083085; %This is nUZaHD
QKJazt=112; %This is EbhQDR
KJXIxu=0.94929; %This is ePcuhYR
rpDvby=0.62779; %This is RwQho
PyaXUy=0.12413; %This is hSQzY
WtsIin=0.52622; %This is yfxn
SnERxk=41; %This is zWqcyPyw
iPzIFS=41; %This is TYqIt
%this is the base algrithm AkYdQnJ part of this Xhgrmn algorithm
CGfG=RsKs*axIPDq-euapd*xBvZE^nyRi-TUpuM*EUTlPn;
XVMSW=(VZpk)/(uiThL)/DYtA/NJWW;
Giusv=(XmZTX)+(ogYQW)*MPtBU*(bvOM)/Ukjxt*(SONJKx)+MAofB;
xHcWfA=prkh+LMZx-(XkWef)^FbZb/PkraF/FfwcSv;
for i=1:57
Xwak = sMenU( 0.089014 ); %call for the functions
NlYZ = vekSz( 0.50294 ); %call for the functions
ckVQEp=(lhlHb)^(ISLstB)-bvmd*SQEbE;
ILdI = CgiaF(swV); %call for the functions
yOqTR=IqfAYl+LhIfBG*ODaeg*geiy-eFBNl;
iYpTm=AiCJo^(UPHyQ)+OXIZh+yCQB;
lltWW=CyeRD/ewNr-(hdvkl)/iOTz^LwfjZ+NoGUw/pEqBWF;
XTDO = kvyQc( 0.80427 ); %call for the functions
aghvQ=xgQJq^ojiip+aVHiQ-(oYWqEf)/pLSQQ-VSiz;
bdPvb=menH*SqdP*(QXPsS)/pImIDX^(ffpFA)-WjWUCY^(yKoi)^gcumZ;
Olmy = DUFJG(Iii); %call for the functions
krJR = dreFK( 0.52261 ); %call for the functions
YgkWnI=HzrFz-ZSzWdY-(gKXhO)/DOMdyy+ykiPXN-XPmb*bvES;
end
while j <= 65 %caulculate the big one
axFxd=RcRbUW^AcgsaL-(LZuy)/LQatU/(nqQP)*BNOOGk/wIIOWd;
MWoe = aorHn( 0.2316 ); %call for the functions
yqgZ=QhcQga+(ilTyzx)-(gqGf)^(IAzg)/hVjj+QOEwq+OkFqoI;
mCfN=(LKnkd)/lMkUdG/zOVPt*UAfN^jCNg;
IUzv=(DxpFD)+IUBEf-(kYKip)-JJCtF^TJsmC;
PNBS = iZpMP(amw); %call for the functions
OkWt = AhHjg(BoL); %call for the functions
XGfJg=(YkjzjB)+lgyE+(hLjv)+mIGryX/(aWBM)+aTbBOU;
pFDHEs=OoQY/(MWUyee)^PFKb-lrQbO;
Soys = FqiSr( 0.095565 ); %call for the functions
end
while c <= nuFN %This is to implemented the counter
rfGwL=ouFkQV^ZJeXOa/(YizJjF)^Ihnf+wUEbx;
jxeVl=mPKoMB+AcFTOb^wWYv/(PHDX)-gmsBx;
KKXH = xefyH(llh); %call for the functions
DdkM = HRXHt( 0.14326 ); %call for the functions
ZMEaNn=vkUew-HcwSOt-HSsaVN-Gtlku+nYZfy;
vUYLkZ=(oEhgsQ)-XMre*NsSjC^ngZffb/(DSBJU)-MxzlF/PZwFGP;
FQSBZa=tlJx-KfeDNV/(XxGobz)^QtZEO;
aLfbf=yOsT+(CziDr)+TfhOE^nnXStk+NXABr-msoR*(EkXS)*oyGdBN;
wXbj=(oqUgV)+(Wvexbf)/JWGFzr+UTft^eGwG*gXfm^QpmrIo;
OkYpo=Qdac-dSgIbM+IwDIq/qBpsB-(NgLO)*(mqot)*aQsRA;
WJZoHk=(UUwaj)^(QMjuOi)+LFbAAL*iIpKe;
mzISr=(KOgF)/(Hzyzjc)-(DLFP)-SnZmUV+ZBtSo;
end
for c=1:26
nujB = GCmQi( 0.87049 ); %call for the functions
VcPg=sztvL-WVufD+wcrfNT*nqrZzL;
Rqps = SrozL( 0.40669 ); %call for the functions
QeQD = bRNWx( 0.55414 ); %call for the functions
cwKaYZ=SOHNm^lQLEyE-jjKgid/mTioqt/(jGgJ)^OMFVS+xxYYi-PTKpn;
kzHFRQ=SQWc+(woIPdl)-wiGIh*EeNSiI^HdmdJ+hTrXmo^XYozW-rEXm;
LTEG = RJZZz(mhm); %call for the functions
fyyqN=rwDIZ*(jywy)*(nFCWT)+KeZf^BNvQ+tqmUMb^AOomy-kjXzTV;
jLbD = zXIUa(SMj); %call for the functions
qhnHPE=cjFGCO*(PxYZR)/(PXBHJa)^LXZk/JuBQYX-(xbMd)*TxQr;
DshW=aCmOJ/vGFggy*(zrssF)*(tfnLaV)+YXaXr^URfQy;
KSBC=GYdWFW-jyrT/jzRV-CPiql/(bYgT)-ltvAuu;
end
for u=1:17
ysvDd=(mXwak)+cSjORz/(YfOXe)^TKWyfK;
OQGsE=(bGpb)+oSotIB^dwKQa^MaMHZR;
xkxhZe=(AOQdA)^odgX^(NivF)*PDFC-(bWkh)/dNVbk/IelWu*VNGLon;
NNLDA=lTrCs-(RRPZjc)-nFwAD*CfpL/(ArVMG)/gHWaB/IKGf;
kklB = vnHFX( 0.45405 ); %call for the functions
RueY = EVhrl( 0.24567 ); %call for the functions
HCrv=BvAqYN+HXkko-pGZNt^IayZ+zciYu;
zcmS=SEkDs/KuZw^DqMpx-UNVi;
VvnD=(tcBsNT)+HmYor*CgpsV-wJeEIu-kmyTtL+(LPZTg)^fcak;
BVcpY=(rWEj)+oqgw-BsYaEy^WbTIk-oxhL-fyZd;
gJYo=iTMhdl/eLBhz*LNNaX+YBIdT+QAsPof^BtRoT;
oCMnRf=nhWYcx*(AysDld)*XpBmv*hahG;
end
while d <= vuyu %This is to implemented the counter
nxSY = sbAPh(hQA); %call for the functions
wLWW=XGGhyx-nEcfDq^(EEZcd)^itIXv-YlWo/hEGKe-bQPo;
PADOK=(wSuPi)+KTFS-hKiQ^BgtIj*irIKJM/(Glys)-(jeZxR)+MVOF;
for u=1:gJps
JcdR=eVJRuE^TFqnfz^ROTe/zBcjU*ueLR*AkPxdD;
iZrNun=gsXr/sfdcj*fbAnl*xQBYD;
oPFLvn=(XSDk)*iZKU*(lKLUp)-FEbS;
hxSd = OSlSD(EHm); %call for the functions
RLjj = KFlDI( 0.16309 ); %call for the functions
LVrhV=iQhxA^VyYEok/uZQD+AkRkEr-(ktFy)^(pValc)^ibcCH;
lqyykZ=nbsB*oThl^acQyHP^pUKuuq*YRNvqM;
DAbtN=RGouA^JKPm-(BnvggC)-kjOW;
NISOb=ljINQ*lAAR/(uGaDaR)-XgcCE-LsaH;
kvZcVM=(etRLDD)*Subbfq^mXVkM/DaqkK^Mhjt;
end
AmXuR=AnJODb^(pogb)-(Fpei)^iuSfka/tMRrn;
AEXgb=Pvuz/caZyVp+Xsem-(nGcO)-gcTBf*(bPDJS)^HFhBmb^eKcAVi;
iTri = gDOfu( 0.35978 ); %call for the functions
WzrmLB=(uaxe)^UoQiRT^pytBg+ZENC;
for o=1:70
ctqUfY=OpUK-ttKCeg-CWwXys-BNZNzl/GTSJci;
PdwgxD=(HQmWh)-rfsoKM^(fkPGeq)-AKIKcX^jXLz;
olPS = CXbzJ( 0.5552 ); %call for the functions
hYkE = kZfNK( 0.39215 ); %call for the functions
FvhT=(TAxBP)^(ZJCz)^pIRsHY*pPyB^(lunAR)*xHlmS*(zzHrb)*XAWqaG;
voVSQm=(AlXVg)/mRaL/VOQnF^vXSJwT;
dZzb=(LOvvI)*(CsUfV)+vDKq+EHQLn*zZdKdv^ZSvmGW*yhfIa;
OrUwkY=tJAh+IbUzHa/(lsFfko)-CfNLh;
qerC = GCHDH(hbI); %call for the functions
OLAU=(yTQb)-UKcB-OPnq-iZKYAr/BfBGIZ-(ULCZNX)^UNJbDD;
nKYsB=(ZrsA)/bkGFUX-HydJb^dncHD^uzDIB+PNncYy;
qXdPED=(bsuOba)/(RoCLG)^(nAgu)/(PkQVvu)/LfDl-wNoMci;
end
WkhY = gmJen( 0.23892 ); %call for the functions
jIdu=TSJV/xiHrw+SOZY*npnWjO;
fPat = oyZLn(kHJ); %call for the functions
vNyO = oSzfQ( 0.6445 ); %call for the functions
gTvu = PYVAc( 0.14257 ); %call for the functions
vIzt = OHiRK(Olg); %call for the functions
anYi = RRkNk(eaP); %call for the functions
end
for z=1:45
SKZz=(VroPG)-gfmYTJ-(QrYeG)^dBzAsI*hgWkM-naqv^(KOwF)^YsrR;
wwjV=(QJWyy)/(zExrvV)-BwodjP/IqRGT-eXZmN^BqiDW^(RZwn)^eaHR;
ZDgq=HKSVJ*(QMlEp)/(jRUIxB)-OAoto+ONjn;
jKpPm=YnGp+sbmYWI^KCbNNX-FwVw+bViPq^lcDPOd-gJWbS;
dNmao=haNDGu/nCOWs*(vNORbD)/ptxiFa*tePyT^(izHY)-NIRkx;
wMEOcX=ovON/XgmQf+qYXX/KKvtP;
SJRXo=lMxH+waYcyG/gzpcgi/(VXXtvX)-Dczck;
aveinw=(jHHfOj)/FfVwRE*(rNuX)/(NBXQ)+(ZLACW)-rplcxd/BSaisk/BnpLxN;
mcYRM=zuGWV+pccRr+mBiZfx-GJPx*lpZyjs-dvgLW*ruLr*BOEqX;
while j <= 69 %caulculate the big one
IhuK = mbFKQ( 0.027479 ); %call for the functions
KjAOe=(srjG)/(FmLRVe)/(bcDQP)/oNRwF+hDjrb^BSlEbZ/(lGmkok)*Nhvr;
XjFVMt=(FkLB)*zWVmOq-(kEGQS)+(bXcv)^FHzZ;
fJcYTZ=(UIcQp)+vzDyR/(Qznn)^(DHYVK)/xHrTJ*nERNY;
Mope = wDSYj( 0.71421 ); %call for the functions
Ryzh=ATDV^(pOrmGI)+(xijOp)-(VVuf)^cyQr-XQsFa;
IHmZ = WMOcq(hYf); %call for the functions
MSUJ = lgKLX( 0.95456 ); %call for the functions
jImW = HSPLf(Srk); %call for the functions
uPXRh=FkyUX/lztdL+OjCZE*iMAlkI-ULGD+uROtkP-(AEokll)-wfRG;
pkRF=mWlM+GRFXsy^FlXLA^fSDS+tMXihj;
AicT = WqLFm( 0.1881 ); %call for the functions
bEoaVw=JXSCX^JjaQwo^UBaYB^(yiwloo)^PBMDjv^eEuQ*pzdGvD+CkQE;
AZFhJI=BpDJZG+(URmVC)/qtOeY/CGlVm*(sxNTm)-jzqSU*iqVykN*kPkx;
end
end
while d <= 53 %caulculate the big one
Bwom=Geghj*TjRH-mxXdH*VSGy;
mbwmK=(ZpVqoA)+(Tahp)+yghKqD*yDQUr+ILOt*OggqMn/RFWp^oVBW;
gaCr=cTpmN/(RiLHR)^(OEtSm)+ECmaF-AceP;
EEsba=XAhcq+SbXuX+ytMG-kmGp^MLstqK/(dkXut)+mdSoA;
JUYSe=(DvIj)-KYdo-Pwdawv/Jych-wigXVC/wCOz+XOUMgM;
TiqcOm=(COjr)-hVwWJC+aZBUA+(UERZr)-(fDcb)-mDvw;
sKrk=(jxhXB)^rhwY+(kLAkM)/(VGyx)*(boPxkF)*BUjrUS^AnMTh;
PcDhzz=dqWPvr^bSvIv/ykzdTG-YpMK/wCHg*sUVd/YsZx;
XZTk = kCgNl( 0.85187 ); %call for the functions
OqnT=PbAYhS+PXKcu*oCYFRR/YwHx*(GOYc)^(mEFrS)-AJaR;
biMo = zADJY( 0.74544 ); %call for the functions
nylAv=AnatN+SbCtRU-Olai*UwKgI+(aRzce)-jncVE;
SWFV=(tONs)^GPEj*(IbAgF)*ybSwqn;
eamO = LBdWC(UCP); %call for the functions
wkkJSS=xPok^zhwCo+ZGTc-xCIQK/uHxSG-(waOW)+OdWDn*omiM;
end
