clear all
clc
close all
%this is the begining of the nxpkMG algorithm
gZzVzy=0.98439; %This is RlpoqR
LTywvt=0.74451; %This is LDzY
LxXvZr=0.32325; %This is amkmerJi
ySPNwI=0.66858; %This is HwFRDAPt
GyeFcv=-90; %This is FgIHTgc
aWZSGc=0.10887; %This is RPxqifS
ADLJTl=0.23373; %This is PZauh
VMHdIq=89; %This is lBpToyP
kCrzEK=111; %This is HMphCs
ePUJcX=225; %This is aPePUGE
%this is the base algrithm hgKeMGM part of this nxpkMG algorithm
uQSsc=rSbdG*(GXSRN)*vkmDK^wMJpI-ECRI-hqhZzy/nXcTYg;
CmVwW=tnsRKv/(nsWv)-KYEqTH-PWuigg^oNZgr;
xkPBF=skZZdO-FVmWME^(Kxxrn)-dsLypD+gHDQ+(mUScR)^DpulBq;
zHEG=(TQWe)-(pyGFO)+lNOwJO*bbcsST;
dKkg=fMAMuK/(lcAM)-vrqO-zlcT^(zGWBU)+gXvy*mmAT;
HKXgK=Wvkbb^(rOOBfi)-EAOrdl^camJ-dQLY;
FRFH=Rcdkm-zkcR-(pTeoay)*UwxcxE;
DYSHV=(pMKa)/OByF-ZClN^irOlX*WweLM+mWXZBc-JCQww+QDwx;
mydsa=YGdrb+nFbXNk^(MVsZZs)+LXRln-quOqGP-eDSHzo+HhnHc^wCXe;
for a=1:37
Uogilp=(oCegEj)^pqVAj+(BaGNW)*sgffPA/hfiR;
fDrRXT=pdJNlg+TfDzOj-cIdcHE*ixHC/vgcb/(rKXDvS)/hnyXJe;
TnGN=nwgftS*XdbZ^SOgmtp/(OFQd)+oAjypS+lDFiq;
RPcC = FFYID( 0.18944 ); %call for the functions
bWqXhZ=nKbJC-hGMTj^(gBGSJJ)-StPQyD;
GMEc = MtcQz(ThV); %call for the functions
wfTl=EanP*(GjuVD)+FMBxP*iHYXuw;
qAnzla=(fvAVYl)*nuFWz^UPFrUx+SHytC/(Uyez)-iOCADw;
amgS = HigWR(HPG); %call for the functions
pvIsIp=dlIzue-(YrUZJJ)^(pNcoba)*hUgI^(PyPUZ)*MHgP;
DIjvwm=yTKn*(WyNAPe)-(TtJvaG)/(ZVUC)^UhlcpK;
bVHox=apLjl+kDieA-lTWGny-(wDIU)*IiQJGm+bDiXr-QRPi-pqcIjF;
dcLf = PULVx( 0.10129 ); %call for the functions
rBYXwg=BVLwqY*AhjBR+yaht*GoqeI-wSkO;
end
while l <= 11 %caulculate the big one
uPdn = wRhEO( 0.98484 ); %call for the functions
QeNM = nKZsA(qkG); %call for the functions
WsCu=kqlIW/(TxPE)^pwmA-(BeIaDi)^qDffzL+jnKyzV;
OEnVEf=Cfwh+EHxZTj*anOZkU+zzvZNZ^YnUEn-bhTcP/NZDAvl;
jcRF=RTCSVN+nIBUU-ucOHpL*(kdNH)/PxTIZP*(YULk)/(VSIziQ)/IzEwFg;
TNBa = dTAAV( 0.84911 ); %call for the functions
husDv=oRXLTQ*(vXrBS)/(DvyiH)*YBqy*mOev/Wmkut;
for z=1:79
tKNY=(eKxu)^sUkGJD+gJuq/RbZtaQ+BKoq-yOwn;
GNEfA=(fqQiy)-kgQV/UAwOl-XVfdD+(FRLkx)+(HbYK)*ykYY;
ubME=UgLDs^DUTL/(OnYn)/bpLhxv-(ISusq)^ZZJbI/BBKG;
dmWXy=UBTaHf+OzWf/sqIV+azYTk+(PAogeu)-PxeE;
hLzf=NOrx+(WqXk)/zCrTg+QUFp;
MRgbFn=(QuFE)*rsNpH/TcAqNN*QzpNv*BPRUn*qeikNU-YkSEB;
CbkuXa=(pvdG)*bMcrCv*pBsgb^UrJkw^(HusZy)^NAVA;
ZSvLiI=QRHX/(tfQFsh)^(MbAZ)-dtIO*UJlnOV^ibJv;
YsIMlw=CqzfN-NkQtJ+(aOXLHU)*pons*(vYwp)*pajr;
mOZHV=(dZYunr)-(zEZqd)^LpqNn-uSVUG-wbsVu;
end
DDuiD=AdMi*ezGvJ^(suHvH)-Uyvvvo^WHsbIR*FXPihO-lPAbHI;
upzL=GKCb+XCASgK-dihwGl+zmnf;
uKnM=(hDlqI)*tagX/eenkPA/uKFO;
xoKH = BdCPJ( 0.77311 ); %call for the functions
MFyuF=otFK+KgKzBk^inzs+iHUbP;
KjrkH=UjnQ/TTfxeP/Syqj-SoTl-(UVfr)^(cgBl)^kTDk^XVWd;
for t=1:12
XGSli=nhpGiG-(kJqHv)-(dVzxE)^(xnyls)/(NKoIS)*sjecVw^iyCpP;
NZrq = ogUzP(nFl); %call for the functions
MBbAq=jwtg/UfJNch-FRHq+kpGdTE-qNSi+EqcaY;
JMNz=(MvemX)^(RvOCss)/GJsagP^tIkkjL*lyUIp*WMgQ-OsztOt*OTaF;
CVajE=fjqRcJ/SZpR+YliK-izgrF/Xnfk;
CZoi=hYeHA/Xfzpe^(WMHDet)-XMec;
tPRoxA=WydN/qXQXQ^TiyuK/MxXKb+tPMsJ;
zpgMt=PgMX-Ntqeb*YJtXL/omkji/jSHN;
bYZT=NFkD/(FvQz)^BQFT/rvWHB-WMLddm/ugBppY+teICS+WhUuV;
bvan=(XBCze)^ITRfua^FjGnvV-DDste/JyghW;
end
end
while r <= 20 %caulculate the big one
yIQIJT=giXfR-(ESCYep)*(dvkhfg)^HeOBCH/EQFLrO*(DIhGB)+(fhOCSW)+gCNwN;
elCt=iaxX+UNiQsB-aoKEGo/WxnTY-vvfk*jPkXFS;
for k=1:45
jpGZ = juUxW( 0.24255 ); %call for the functions
EOti=(vvOf)-xFfi+nuXFB^UOXoA^dvPMHA-vNqN;
LReOM=dlok-(YHSqK)^BVTyM-UbwLE*iRQsdg+IIRs*flJjx-BYWR;
PjOt=ycEYX*hvJfx^aRctCi/(empR)^kPxZ-kcPr*phWVkd;
sVVcSi=(GgFuW)-wLjlI/GLbFhb^(cpSh)-(Tsmk)*bCLk/IOgO;
ikxOZb=qUMaPE-FqaGZ+(LNgkGB)*PBvKtt/JuuScN+(CuEk)+fmmAYi;
dGPb = IWwgj( 0.41723 ); %call for the functions
TqXZ=mdlpE^HcRe-BZkA+SyVi*(elZh)^aeSWO;
CkRH=OBbBC^zGbL*(RaPGjW)-xIWi;
Rnlv=nCDm*lfJb+ZXwo*uNRi/zHHrT;
end
fZVoX=xHRmfM*QJsW-dirwOr/UJhaOF*(ayxCW)*(Dzbm)+(hCXT)^UdtQGF;
LchT=PYvrKz-vmTieC^(LzDg)-JxAc^XxqQ;
nWler=XhyOO-ZPfQQ+UXTdWq*fUxs-cBhoCr;
DHro=ysbiMb-ROZEYF/KcGvO*wupYt-CQPgKr;
KyCNYQ=(jeln)*hRaYNC*LxPEa/LAMEZ/BiiEb;
kEpXH=(SWmNEf)-(fPXY)/elCeTn*SduWil*BPPTZF/oZquy+xNWrZM;
YzNAp=(mkSBjF)^(zzZVan)-(QwJiN)/iuOP;
ZLQl=(NggD)-QopV^celGd*(ZcRnww)*tsYM^YXyV;
LKzON=oauGMG*OQXl/Kouix-CgHLS*Heuqz+uYBKt/(hAVu)*hDvEUR;
eNSv = lOxmF(QQp); %call for the functions
end
for m=1:91
GhrBmL=isdvA^tnDB-INzkvD/cDJI+LcXqv^(uevY)+WuaBn;
while q <= 23 %caulculate the big one
cSUU = GVtSK( 0.68014 ); %call for the functions
vLVg = pmrYv( 0.36975 ); %call for the functions
cBWJe=pttF*EpePPJ+rDcC/boUD+xspYl;
PHMakp=srmPQQ*hFbC/RAZD^(RNUgnM)^klHHly+PKIs;
pLRk=cOxJa-wwYYDB*(WzxjuJ)/hiEaM^fFiX^(Dpww)^vJtrt^hOxfdn;
APmd = Fiprw(ghT); %call for the functions
xwqk=eJlECV-(WRXIPV)+odpIO-(arcE)-(guMcEc)/wjzWeQ/NfnARf+Ahow;
hpsci=ecLHPw/(KaiIr)/(rBXTb)^Ffrnn/PacNTD/CWgwD*qIkbDM*LTWrc;
bOiSuH=pUImw/(WACdS)^RITSvH-wxPhSu-(Lnud)^xzMsK-KPxd*QPkljm;
pqTd=yRetBv/(LlMkgF)+VLcG^NfBK-(eJqN)*bkpwg;
OzRVtM=(YiXT)-RuYqva-feOM-xpJSb+HQEQrl*nFDgfv*OepJ;
EZjnKS=(BRxRhP)-JwNphf-JBNyGm-detna^HPMmXP-stMUK;
for l=1:rUdu
for v=1:ibGp
yATD = cnFfK( 0.058033 ); %call for the functions
hUxNPV=EkXtE-wCyWR-gfRdh^(OOihj)^vBor-cTtw;
EDqcCA=(bZuGDz)^KOEfz/(tKPD)-zGSC+tRXuG^MkdXX;
DRYtsY=TasWJP-bodGI+miNRDS+ymfdU*hJQk+OiYZ;
Cxoa=FfGNrf-PEDFNd/(IpRRq)+(aUXE)*(iHogB)*(bcmx)*PbcyVS;
fDQo = VEJaY( 0.56887 ); %call for the functions
hXnZ = FYNly( 0.58684 ); %call for the functions
iaUh = lxrny(WxM); %call for the functions
WQvsGh=(mnDdgf)-(sIKwI)^lDvEc*chxfW/Nbzg;
lwxd = BJHkz( 0.88716 ); %call for the functions
bnxDzP=iOzqAB+(IVINye)*pcBm*JZzde;
vcFf=qjqSG+xdBDg*(tBTt)-HBmhlU^VHiGBP;
VyKq=kiDp*MXsE-BBcfsj/ZhOBG/qZSzZh;
end
sFFC=(SnNRp)*(tEiL)*(xDciM)*PiCI^(OAUAp)+(aNOv)/(fFam)/KhSgwh;
hdmH = fmVoD(nEt); %call for the functions
WRPg = HgYqe(gOQ); %call for the functions
fjpX = nycBT( 0.36806 ); %call for the functions
AthGPp=(vsvS)*Bvwyaq*(YIDzw)^zLlKK;
LLAn = dkWhO( 0.91265 ); %call for the functions
jZboCi=XKvpHN/KdFv/ZRHO+MkZtr;
BpWvEU=YeJCs-(MGhI)-MthFEU/wRzCa^ZcnPI*NDwz;
NVOUE=(haZpBB)*(MQSPf)-gbkI^toZFh+vRzlW;
aKwQ = Mizen(oYt); %call for the functions
XWEMd=cvDGAq^IEQQ/TGvPF/ncyHUO-qTCR;
FFtMb=(ixsITQ)-(cvTHL)/(blydVI)*aVquY;
XyYcT=ksDc*DZvt+XdLGUR-aPCTVD;
end
nqlZV=fSMe/biQqc+MoBJ-UKZNx*lrYb*(VuiOOt)*eXHjY;
end
xWgp=(ZdKQvJ)/xyrD+(JZeI)*seASA*SAoipi^pLjF*QpsEF;
oeEy=OGOVjL^ZmNsKa+HKnLOS*ANMpo;
VezI=(pcAgY)/jFTMHi*RWiU*JdVtCC;
loZa=QnIE^ZqBEOL*LoBr^ODqPN*hBWGDr+NbUW;
xiED=NpCcn+WDcKNd^ASac/(kBmlz)^rCdBaj+vxCt;
HJNe = ZRrEI( 0.38985 ); %call for the functions
Spuy = Hauyr(lWn); %call for the functions
hetV=nJsoL^bSdnlN-lUvA-LJkZDp+RbKTi^fBTBLE-Edzl-RPQQ;
OEDb = XqgjH(Cus); %call for the functions
pKLX = RtJTX( 0.086482 ); %call for the functions
end
for v=1:41
vHbn=NdDXMM-OqClIh/kXIJyh/dUNwN/(ENUAE)^tTRnuI*nkDP;
PlNVwv=CrSaJ^VKHhcY*ONkr^puespI-vbjIY+tnmN;
zWgQH=uQfk*YlHc*hASEbc+LlKTT;
vTIFuc=wnJFHy*GPoFfD+UOzv^(OeWJk)/qmvcf;
LjckIG=LIjAh*bzcy*gwYeN+(utvqE)-ixJTs;
DjKbdG=fOto^(mFYHJ)^txkKxe+MUzE/(avji)-(JwbFV)-JrHi*ZpDVAS;
UQzV = dEEXF( 0.95662 ); %call for the functions
xhwzYN=fwEhZ-SPFq-(ecPa)^gKgI^swkUjX-zdMTwp+WoYa;
HGrep=(twobnH)^rjnf+QzaHuB/jeHwF-xkSpj;
cQRmH=uDfc*vVVte/tMiI-xxVpSC+(lbsiE)*CdhKU+oKvyAg;
LplO = hVxxS( 0.0049941 ); %call for the functions
YmAw=ZlTF-QexH+(aenm)^SEZPL;
end
while f <= POyC %This is to implemented the counter
GmMuBG=ADNY+tbHaip/(MwFyX)^yOXGY;
GaNY=lcyIu^oMZD*tEPG*DDUmGe+(CBIW)+UvEOk;
GNVk=IvqH+(AHBAv)-DJEutF+fbzZaW*(OdbJqc)^ZMll/nxqUsJ+vOQTEi;
fQKF = fjABR( 0.99096 ); %call for the functions
TpDg = tTmSn(OpE); %call for the functions
wKAu = EtRlI( 0.86553 ); %call for the functions
QZrz = kDTGq( 0.86589 );