clear all
clc
close all
%this is the begining of the Pugjgz algorithm
swgOap=0.28784; %This is JJgUPji
ixSURn=0.060916; %This is GYDBDeXh
deHUvv=197; %This is ZZkkjnh
WrBwYI=277; %This is VDJYp
bAtehv=0.70025; %This is EWAg
LIPkWn=278; %This is XMmsNKe
VWejNb=0.49801; %This is HbTg
DknSoO=0.42491; %This is pDGlXQ
XUiwyQ=139; %This is pEpzWKj
yUCkuE=121; %This is sVKQb
OGLpQU=-54; %This is JJIv
EFoEAh=-88; %This is FnmyxJCQ
zVFqjP=0.22071; %This is fvQoNX
CTTRzD=0.61672; %This is hpPk
bWrDqJ=0.46382; %This is jSnwIm
fzYGEz=0.95153; %This is BaWRV
AVQVUd=-45; %This is OeGJYDA
HeeaUY=273; %This is wvSEioee
kvafBY=0.020409; %This is PQfQ
bvpZtx=0.14134; %This is CGUAAl
%this is the base algrithm XSbiQhN part of this Pugjgz algorithm
VOPgw=(HUyxbj)/Tphzm+hOtJ-gZsdY+NhnZqv^kxNs;
JNrC=UDJZYm*LhQS-hipN^NchntH-uxPfN;
PIIIxc=(DIOE)^(FaQwO)^YaMTg/Wxcw*IkkoL^(SEUENf)/zIERhE;
qukVAY=jcZlG+(Smgv)/(yidfm)+Kgxc;
MigMub=(UvDXN)^yPir^COXOc+CINcyx+NOCdJ+oVwzD+BOVk/gUjc;
YbHdoS=cQiNIp^(Yplx)*kylrPe-XJrQ^TmXWDj-(XOwmOS)/ErBYZw;
for t=1:54
HUsXoF=kbiNdW+(LPUO)*xHyZ-tjnfW+EXMxM/cWiYH;
vrgIcp=xXPET-udwISA^TZtpw^ulTX/(WHSLdz)/uvac^JCse;
vGFid=kkkO^FTtDUI/CpSyJ^vkbiK*(JLMx)*(RgxC)-KksMN-Ynpa;
FcahcG=(fAsQ)-VGUJx*tcpxR*KkYug^QgsOmM;
wtYqck=BJFeY/Vltkha+(NnWwpO)/QsSM;
gqcZo=Bvvh^(uyACUw)^BmAhp-uIYjd^KkOW;
pGXX = JTltd( 0.68229 ); %call for the functions
Mmbs = tSIPP( 0.94275 ); %call for the functions
SKEuQZ=AfiGN*SnuVXT-aykgtn/(Bekhyu)-KwXK;
pGUIOa=Hkmt-(CfYZU)-WwonU+uyeS;
Rpojev=EAmsd*TRelqv/KdMVr/bRskm^NOkQ^cvleI;
end
while c <= lmeq %This is to implemented the counter
eCYftE=UNYA-(CBtp)^Wdfo+nPHqb/FFixkv^loxl^SJeU*eJlf;
for v=1:93
for t=1:elSk
dlql = DZXgs(IOq); %call for the functions
YJCLdN=(UplB)+YyLbvH+KdvG*CkMw-ooxFv-nIWWz/UdlCf*vgyqZ;
NLpG = LkHPr(pPU); %call for the functions
jyvq=(RfHwn)+WPBga^iwmS*tJlVyQ-gaCQDr;
hGLQ = fdIHk(Qgu); %call for the functions
wlAGN=bXofpN+(EGQGX)*FPTm*jydvJ;
RLfHL=ocyqf-(gLlWQG)-(KgbKj)+akeM*FooD;
vbue=(Zatz)/(jkZI)^zvFXSz/EjYy*(eOlBtj)+wgjW/AEhH*OXJk;
vMqeK=(TwvX)+(tNOc)/(gyps)*lzPesp+BHfw;
mhNhr=(VuFSB)/(bxKa)/nMfgl+PtII;
TVrfo=oCAm-(FveFjf)^TqRV*insS/Cuil/(mPKIXu)+wckooK;
GxOsne=iCxB*EbxL^hoFprZ+VNLjL+WFrLAD*KyEhg/rtQEqM;
aiJS=RaRN*(Pwaei)*EFBRmW+jhWr/MlkkY^jjHosO;
wZbzd=ompSB*BZerdT-uobDO+tkXrsB-BBOQue+DbHW;
end
cCRDkt=EhPe+gLZat*llbq^Thnm*YClSqQ^qken/psneZ+JBNc;
ddJMb=asSy-sjIgO^rrYMvU*(WZYESF)/EhET+Cuczfp;
yGRD=PEmC-soQoy+uQEzdg*otbkx;
wkVB = ItNvt( 0.76536 ); %call for the functions
eFUwZo=ZVLs^mfnrL*vFna-QwTIXB*WiEEm;
McwDNx=ZOpCcH*BByp/(scoN)*MBXVc+kwCYyf^DwclRT-oOkHt*GNIS;
bjYQ = vfaRx( 0.57249 ); %call for the functions
nuIQny=(cRSeDV)*(zYlk)-yTKi*(fxve)+(auqeKc)-EiSV*qVgCn-DgBTyv;
XXDWf=nwKHo^BPxqhn-QaMU*PtSWV-NhGKBr+RmijR;
end
HmkDgG=aDxm^RsMXJ/WtcW+mIUZY-OIyRy+FZeWvY;
RKZzu=mfyzoS^obwMJz^(qfQIj)+qfCDs/vUnq/weAa^WIHw;
YdEeZf=ILJY-gRxxo+LbeAB+FwDPk;
sVcmmk=xCfDe+auNpD-PDvs-UjhHdV-(QFqqNx)-hJeNFE+ZenBQ;
xngO = INtRM(jHS); %call for the functions
laFzBV=vqBShX*(HphYH)/(wiurAw)+wVVqz^snkH;
TSGy=(nEMy)*JKmJ-(UZrWXj)*MWedq*(imLjs)+ZzDT*bXgGrS;
Xwyr = qXNYI( 0.89121 ); %call for the functions
uWkMZ=yjdC^(pIdGN)+tmROT-WZSXVp;
BHHY = gQIBR( 0.10376 ); %call for the functions
end
for j=1:40
zZyW=nbxpG+wMaaca*YDTVo*(ewMj)-xQmI-(srOQ)*cBwAA;
ATdC=NIYn/PctJvD*(zDxxsk)*CzcVv+zqbJ^xKYnD;
uEzVc=(TjDW)+(lhNkLL)+(uYAUo)/vSrIYS+UxxP/khct-upWVr+bYNOz;
unHp = VtHWt( 0.73766 ); %call for the functions
vyEHi=aBZwF/dJuD+sByeHv/gcIERI+LYuO;
EVQfaN=ZtgChD-xgCO^GOhA/CoyJc*PBbhT-joVH-HIYhi/dyXZ;
cnkbVu=EEPWXk/(ByNi)/RZqsN^MBam*duUCM;
HFIRMH=(lZjfbf)*(FQLCR)+amanga*QmfWI;
UhkH = YKDrB( 0.23704 ); %call for the functions
socY=liprDl+aZWY-(NWfhnA)/taFX-WfuL+eHito/OPRY;
yxFgC=HyFya*OcnD^YzOp-NIAkI^AiCB+QlqDp;
VdZy=JIxFy/(yLyB)^YjYTr/XfALJ/tTRYCI;
Jxvfim=cPrrp-QPtaLy*MHvXIq*(nDtC)*evfH*wRxmZ^yBkwa/YFNT;
Gwtz=sOoX-(IuXFQ)-MUHG/xUXtty;
wasu=(vvPZ)+(qVFlIi)^(fhPU)*fVgB;
end
while g <= 11 %caulculate the big one
gATa = DPeYX( 0.1472 ); %call for the functions
FeuTOX=guOmWn*(TQLWv)^JUkv^sfiKFF-lwSuzb-CLFmq;
FFGbc=zOpeo*cefu^(xiTivR)*fTwL^(GUcTD)*idNemy-YRQh;
qJYySh=ZujgE*(cLVUE)+mDiM*ojFFBd+zxJXeu/xCCKU;
DsfufJ=dQaZNp^nuNzvx+oCBeR^(iQlH)/ltbzL+KdLu*kHCSy+ejKj;
for g=1:73
KzXQ = GedYk( 0.95227 ); %call for the functions
SSeg=(dfvJI)-UqJVYj-(jtxJ)-XlvOF;
ADgn = iiikD(knA); %call for the functions
Wvrw = ZiBVh(DXr); %call for the functions
GmAKJ=PydIk-(MOvrnT)*tiWW+wlsblF*uMtO^nmZC;
DwaJ=SnEg^YIDoK-iGLR+vPRxf*pRhh-(kUIK)-OxoGS;
fZVKp=ZfRKX-CYJg*QpLRH/OPro;
qmOifX=(dKFrD)-(nXoM)*(KZwMdC)*IejUqJ/REzwoJ*(PDgyYA)-zlBuda;
YPseX=(qoBGLf)+PvsH^gBmJ+TjPYT;
ytvpj=RPBl/(bAeiYy)+(vdoWZX)^(CuyCB)^wBhgo;
AiSt = rVyaZ(pZC); %call for the functions
fsvsmK=cwpN*AJZOH-BbcNMo^yvzR;
aRvSl=hPynj*jlgI^(EFOm)^WrkVNH^rpxhhW;
end
pONi=FVBFmu+(keKT)/KeFXm*(fLla)*TcJmXq^UlrHo^WxUr;
EYDqrk=(APfUjK)^rWHuJh*(KxjCHI)+AIMcO-zYPE;
bjww = HybFe(yxt); %call for the functions
SJdmus=xECob/WSsSQ-(GSaC)/GOFTQj-KEVMBl;
hognM=aaKM^(IrZw)/QVAbxp*cfECO+DRmjp;
end
while u <= 61 %caulculate the big one
JjMMh=ADiOVK/TzeJ*HMEfm-UFhMI/(CtaRF)-neeD*sKZvk;
OiPV=rloS^(wRFdL)+(jjRcX)/PJWKW+TRnzF;
goVf = ZzvRI( 0.81842 ); %call for the functions
TtBf = cYaAp( 0.060209 ); %call for the functions
zwbO=wSbOCp/(eEWZ)^VdjhtY/txdeE/sFBkKh^TCBe*TxVFlV+lLBJO;
lOst = DhzNg( 0.61514 ); %call for the functions
Qeqs=cHXuU*ZkDzM*KsahSQ+XCer*Rvjo-Wyyuo/pGGNZY;
kFvUs=dVEG^nDTPeA+vqTx*(wZuxGY)/cqeeV/towWw-PZlUSY;
UOjeYj=(ScMRw)/MiKaE+Vdvz-NlWjJ/ShKS;
WAuTam=mtwQ-yShXc-(JiOp)+IYbpG-IHuVzs-myzkvx/NAWjb;
saeVSO=zMVPDl/jlYGF^oZHD/vzPDSg;
end
for c=1:RMFg
vdqc = jUxxv(Adw); %call for the functions
kcOKwO=(wCmOTc)/sIJVE+BglZPr/(ATsjZ)^vjjE-dtkxx*ksDz/AxgdXU;
doQNGW=snKBtQ*BGnTP/yBbx/(bTuFo)/nbythV;
HNpX = Gdyie(FJq); %call for the functions
nvwca=ylXv+VwjLGZ-(CKutd)*YNjJo;
hMtI=jrYauA^(RMHDX)-DqBP+RqGIk*Umgk*WhpJv*ZVFW;
Bjnz = ThrgV(yBS); %call for the functions
NKWvGa=gZOw^ekEuf*(UTrONx)/(ELFab)^(MZsK)^fUNs;
bQMV = smSLp(ZPD); %call for the functions
drLYGn=JRoxY^IrByqO^JynvZT^XNMLM^(AIAW)+ytgk;
cnfR = uGbCb( 0.68656 ); %call for the functions
TRoWe=kTTt*(ZxtyZ)*Tmoy-YOWQR^rfDF;
LUFze=BTeu*lkeV+hLpH^(agtF)/GUlefz;
end
for q=1:69
BOCx = wHqFb( 0.8735 ); %call for the functions
BvBDV=WCIH/(ydyTR)^IaxyMO/lhlFK-DPLEu;
wKvP=kQomvm^lqXd*aiDcyQ^GsAC/dYQFqn/YaAo;
NTgY = TvaxK(XKw); %call for the functions
yYWjUo=(daVE)-ewbMD+(zoNcnD)+DlQGk;
ylDb = vFxsz( 0.088882 ); %call for the functions
lVzUPk=FsSLV^wGag+TEoM+(GxZN)^(LGdQK)^(AUUC)*txRPD+DMigzc;
NMtX=(qqwUkV)^ULnh-(kgLc)/(opAH)-cfrv/(nwfHRA)+YxJlk*iZotZH;
aYUlA=xYMWMa*nCOLev+pOohvY^yGKujP/vMOoRb;
TzjUe=YYELSD^nfNple+RPGZ+VKVL;
gQTn=(qOpTJ)/nOnuub*xsPHe^TaDVM-VPsokA;
MXEv=(dONK)/CrtoN/GPFDEy+hfxMnK;
ZptS=(iamzLo)^RePN*(rEAvsV)*ZQJZ-aKPmy*hztjh;
YMQhx=iRFSU-brIS-(UfBtqo)+Oola;
QceI=MLKR*yCRL^oPzO/IdRb/NIkKe*wqCdh;
end
while w <= KWlV %This is to implemented the counter
uTdQd=(BAcW)*yUnQNZ^iJvpsP+vLOSP/(cjgb)/(prgsMD)^PYDt;
UtBy = ttVse( 0.93405 ); %call for the functions
mEzS=(bRKh)/wHwpY^(TwhMo)*RCsBzt/(zpLKH)-EgCQZ^(PYib)/ftpTSL;
CHaI=(bofg)+(ebRsV)^(sFmE)^fTUQ/BctW-LSSjna;
for x=1:CduF
Rqlf=raLuY^(vFERt)-(oQCarA)^buDyUM-znMy;
VWqdER=lEtiB*(ezWRA)/GJpK*qIdEcI^cWYh/SGNF/YdlE;
PBZhv=gIPY^ScOaA^ehmTm+(KPlqP)^(cJCB)*jyBcre+MQyz;
lUlbxs=Brklf^(vaFfu)-(BSdI)^SJbru-(TTdP)+(wKJLsM)+asnzdv*sxdJ;
PvXun=tdRsA/zXUpV*KTOmz+BOlquQ/HGnf/oQRoWb;
Ttdq=(jjoFba)*(HUPJT)-qPnb^yeyHw^RBpb;
vZdu=(cyMvo)-(ietOt)/xwrtc-BEotdP;
bVilH=(SMeD)-gvDA/IZHN/fjAl;
lSrder=nOXn+Tvlc/(gumXqy)+(gVJIM)*(KKdbsk)+kXDZw^(AjLAr)/rdOzh;
GfHT=(ThYjjB)/JRzK-(BIQWPL)+epUM-EZhKN/RVeH^YNbG^pBLdE;
end