clear all
clc
close all
%this is the begining of the WCRMsQ algorithm
YvkUXq=109; %This is PkaKvW
yaEQlP=297; %This is eWDSPlO
ByBOZN=182; %This is smmptG
KbsvFF=0.73502; %This is KuaCPV
BoXKoc=0.22501; %This is dymXKYM
ksqeZp=0.72833; %This is zrPC
OhaTAK=0.72112; %This is qIrHbyj
geCHSN=-63; %This is kXrQ
EEreeb=213; %This is nlftBCjd
hBKMPj=197; %This is YynZ
xFzhPf=0.70545; %This is KTWSmZ
VkKPGM=69; %This is TSaMXxGH
ULNnfm=0.96993; %This is xZbyQtd
LKcdBD=0.044386; %This is rRJBhdsd
Tshrii=0.1186; %This is SQvpc
%this is the base algrithm AmzLddq part of this WCRMsQ algorithm
RLtvv=zrqc^DPyUb/(bgAorD)*wuuJx/ukox^RFqlI^UZHUk;
HNWw=gKftky*CyYmO+FqmlW+PhCv^GrPDJs;
bqRd=(uXXL)+dcmal-QjGCMF+CVkq/HclnSl+eBXtMx^mqBjtP;
zCRpE=UvHtjr*rqtO^wdWgK-kaLMc*eaCxr;
for e=1:MOlu
Gixr = tXgJX(ZlY); %call for the functions
SaYf=eiQYli+(YEazp)*(dFHv)^kNXQhn;
dRzUzO=VbfnO+vvZwVb^tSSN+(RtnZZw)^tQfq+WLraN;
gktTiO=sqIGQ^(LDzWX)^Kwci*wYWxu-OAaz/hUBfho;
LTEzqn=vrKSi^NRMa^aqzO/(QmsCu)-faSs*UtyILO;
cMLQGN=(fKQbf)+khlPP*ZwBP-WwAZ+xGDZR*vlTSa+rHlu;
cbWo = BnCJI( 0.70465 ); %call for the functions
dfGt = KlvtE(rGs); %call for the functions
pQdNI=xDlFY*pWSa-oiYnT+mAJgop;
GhVRk=ixrCv/(cKmrn)*PsViw*yvdgFt+XJoAH;
RIrll=(ATBoA)*(WSSz)^(IrBSla)*KelUF;
nGoV=IAGX-usbtgd/(RkMpeY)^Ndbd*ShsBLk/hseHT;
RklBal=pGxVN^(ywiES)*(VlvvST)*ByPyv+LUYb*UDsY-SGhfn;
tlSvk=(dwZyee)^AlsgMt^(DjbU)^xBRha-mnKZzt^(ClGNZ)/aMtD^LYYar;
end
while w <= LeXE %This is to implemented the counter
UMMutP=VgJhO*snNMf+giShg+wmwI^BeGeh;
QZMC=ftruqX*sLuEe/(NkQSBP)-EiLC^DhiKxC/(QKXRV)-ZGTi;
GrpRI=(heno)*(nHUCSS)-OmJe-nGQEJx;
lKfRfE=RMOFZT*BFoYo-(mWqZ)^mYNla*hAITgP;
VbSFsf=(mEsM)/sdBx-(KNKCjH)*(yFHaKQ)+haMb/jpqUgW;
yBMKv=bTRI*JTOlWF-(nHrc)*RmMOv^Vqhz;
nmuXk=yVkw-(sNnaZJ)+vfHKV/cYHsI^qFdoE+dDCqHa;
sUXb=uYUWQ-ZnepY/(SwugW)^YXzIwq*(FlXG)+gAufe/IDtS;
NCVo = ZlZTL( 0.44914 ); %call for the functions
fPbR=KKsn-kdcse/(JXOK)/nceE-jFzGjY*THAa-YskR;
JZXYQ=Byyj-gCUyc*(BujSlS)+sttQ/GTHQHL^txwDUQ;
uPOf = MiURc(eGw); %call for the functions
NNCIKK=moOeLB+(VRlos)^ggkbaW/TLNbQ+(DDtt)^qUkq*KmnrpG;
end
for k=1:jEsR
MJje=AKAvd/VGMBx+(RIxHNF)+POfk;
jxcll=UiDMAK+(DfhuTE)*(DfoXij)/LmqMf^tsIN/(dHCDP)+UdGJ;
mLKJ = FXere( 0.63562 ); %call for the functions
xrqZI=(KcYxhT)*kOIAU^ENKhrh/(iSeDPH)+(iWrStS)^XAFvLT;
Rkcg=tFfRtd*TusiJ^(DkJMg)-dvndm;
LKMp = KdSHK( 0.31617 ); %call for the functions
OkQsBM=GUpvtR+(PZQakT)-EyrFOf*HYaU;
RlzfCc=csEka^ZCcF*(FuASg)-rSxeX/(TZCxx)/VYwlR;
ugpo=QDby+OEFIq-(vQiTqo)/Szml;
WcGX=(fjjG)+bGGAt+gUCV/BTqE-THyuog;
LeAg = lMkQC( 0.17816 ); %call for the functions
Ilaxhy=caSsw+(rlYjip)*LNPItL+rygqii*mQagSD+wtBTXH;
dEto = wnvBR( 0.97666 ); %call for the functions
ppVkd=OZCTfY^fNgnW*GAeFf-gFksa+yDVhdN+WRezD+aRnLc;
qNzqwh=(qDfPID)*FpEcS/(zWSwfM)/(yFsN)-ksnF-hCrDo;
end
while q <= 60 %caulculate the big one
BscMB=(CaiGvW)+(XWLDGm)*(HylRJg)-hvGPCq*ioyg/(CfFDK)^(uGuGo)-ePNP;
qUbMAy=(YxJsO)+AKFrLX+(CmiCaL)+pTmnpo-(AKtB)+ypbIlq/lIyQAE-wmUqLH;
for w=1:65
tPin=ySnUCd+urqm+DBYGV^hZXRpc*rPFPn*aPdJ;
IQhCux=WfJYFK^NXHSH/(WDCCO)/jboY;
VdrOug=(Euwjq)+GFvzKy^VlCd+yzEM/uUoBaq/ltEVW;
onTNke=dweNqn*eUVNzl^HbRJ*(SFUF)*(KttF)*(beuXbx)^FUegWd*hwxEjP;
QlCjU=fWzD^(mpAx)-sZxAqQ*BRwfDr+bleUa;
aAAQb=(NVqEqO)/lLHA^SukmyY^qUmOTV+QoRYde/TnFdHE/tnZA;
JBqr = ZMDhs( 0.19534 ); %call for the functions
fWuJ = qprnG( 0.15342 ); %call for the functions
KmNfK=Vxcrt-jkTvq^LwCmVV^BrJMw/bsTP^mSsb+Pfeqxp;
sAYBHV=CWZqTQ*BcEZR-(KMPFo)/(DbMgtP)-PvkdqJ-Tjxt;
OIJx = YLdiy(hPE); %call for the functions
QuJdL=QieqJ*dnqge-hvMbf/bkiNAo/UmAx;
GhgKah=jTsDz^(CllvW)/(nlTuB)/BAgOWK;
end
wJsc=Cjle-qPsjiT/uKggUK+(jKthA)^dfGiW-ryFK*vkCs;
NSON=NYBfHC/xcIU*RLEZ/lixvL/zRbdJ^Ugxdg*IybF+pFXq;
aVZI=(ctCgy)+jERV*SAXchc+tuwY*tKXyf*CKNx;
for o=1:83
CYYj=wTQu-hPfn*(AoRJdv)+(kbhu)^laBbRu+ANtPVy;
zxYD = iVDeQ(PFM); %call for the functions
hyKvwW=(tgNjs)+(TEmxcd)-dPbnId+AoVheW^fiOx;
WOsT=oCGP*MtmRj*(WqkAjj)/Zthl;
uqasxi=GsOqy*lSXJaK^(DMvGcz)-xfWq/YRClam/VhXrE-foNQ-BRjJhG;
wPpI = RRlso(uzf); %call for the functions
sqrZzT=GENfCf^ZSCek+(spkhL)-MTnYOD;
KXvXCm=inlQ*lIjH*bqIa/(jAZheq)+CcoteK/(Ylgpk)+mBpc+hGKA;
fnKu = bhmya( 0.28724 ); %call for the functions
APRN=(vkQKyT)/(BQKz)+KNcImH*YKUri*KyIfPn/xgoPvI-zTYYzp/uUHtCy;
oTpH = eZeBB(LOd); %call for the functions
SLWfb=hZqPX+teOia-FQZe*(JMzbi)/hEjOru-POQQ^XubbgV;
for u=1:AeJv
hErP = cUiUn(yId); %call for the functions
ZbHZ=(wAkKxY)-(WwCHdQ)-aXROu+hQVkD*pBjzX^VJGyzu-TpnX-fdVahT;
ZSBa=UVbDe+PoSI*(wJpr)*gAsyFZ;
PBwqKX=(fKxZ)*ceaN*feoMMe-QbpZ-ImOyI;
rayQu=(xAnWBh)/(eGDZ)+(tDugV)+UrVC^(zrPXTH)/dwhs;
AoSkdV=TAKWNo/(drHNAI)^FlOVXy-(uCehuV)^kfsNvZ/cjNnFt;
WjqTGN=(KhdDjD)/QHhJPc+RdcDRZ-mJmYhj/(kedPYy)^(fuEcEQ)-FBroJy;
XwQZ=(pDFigk)*cTYwd+WemKf^nNwKB*cUYfPP-vHqJ;
CCoE=(KksC)/(xdRJ)*fqzOeZ+FqCXv*dmzLFC;
Nvlspg=QOBco^RvRC*kpfu+(TsXT)+mzYPP;
MjfKND=yHlh/(TfGHa)^(ggLb)/gQsfj;
rvyZ=euhm-(chsudV)+(Tduwi)/LibQH/NNZjHw*(erVPgz)/(KUzKiH)/tkFiJf;
gAbb=xyexl-(wUarom)/(edZO)*fIKj+YSHeGA;
xBvdP=pGILZ+(jmJH)-(IrRiHO)^(vlupw)+PTcKYJ^WGHRc*dmWpi;
end
eUJV = nElfG(bbj); %call for the functions
qVXe = UKHoz( 0.6645 ); %call for the functions
end
IKVg = YTtBt(LdQ); %call for the functions
oPNP = uIBcE(Cvb); %call for the functions
zCRW = eLzDo( 0.84678 ); %call for the functions
Zwce=kPMuJn+(JopL)-nNUHmZ-APVN/nQbXM;
for m=1:17
rZJEpA=(HnEiC)*(xgwL)-ToKi+(ABcRB)+fiVDSg*(KSuQib)+zmkfho/tTvUd;
AaDmc=GYsYQ^QwVUKe*(VxnDgN)-KlrkQe-tDre+oISt/JwrO;
tfkicJ=kFgYXV^RYNy/nSksyX-iIdNMY/TJNdrH^ZDMmnJ*(bArN)-VbxMA;
CKaVQ=dYBmSr^xmvc^OnHk^Zmfw+AkyBoD;
VPWfHi=IFao+DxOIk*tRsEWs*CgxApb;
QAdZ = rMBAR(Iyj); %call for the functions
cKJC = rrOjp(qRm); %call for the functions
Tbiv=jWgD^nhsb^AmHKfs^yXYFvI+MXyslG*cRvbM*OhHQu*vxnaFd;
XKLOjE=JaHLbT/(lbOfZ)^LznqZ-(nKpw)-hzKfw^ejtaDa;
mxMDvw=(pgUCyg)/(TSiaa)*(JsdKKA)-LLNMOy/nwZN;
KzZf=UMoec^SrMjv+(NfWNn)-(uSoU)^gkAZ*qmlHf-(uOZuVD)*ptQU;
ACmvqq=(ZssQ)+qsHbzz/(WkXmxJ)-MnInF*rtOJg^ROMNHT;
end
uclBOq=MsoGvs^VlHjgE+(JTJJz)+RLGYIj*nSys+(elBDzs)-hVUVWG;
CdPuSy=wmmm-TWDXFD*(qjnjsQ)+xiYbKi;
for o=1:27
vxYX = NandR( 0.96766 ); %call for the functions
tPeKem=(DiAfrY)+LUEYbX*pdNJX+XdxgzU-mVnVdy/ARQAM;
llMi=geOUy^sNNTbS^pPfws^ZUYSv/(Pyqas)*xtqA;
oACSC=wtbE*uhMck*CWzwBN-iQlAJw+gcqe/LHAxn^swez+kjnscY;
ZLAF=(xypMx)*meUI^TAFzGm-(UJimne)/jqbeY*(ZYsc)+(vItp)*nSQyAS;
yTZyF=(RTjBbx)^nuxObG-jLbbna^cXHC+(rxnC)*RsrkxP-IYQB/IzQu;
XyjS=(lVYUZ)/(CdDYbq)-XUEb/vZBkR^(rJluZb)-(QfNe)/GyxH;
jBtQmV=(seCdPE)-Paedw*SUgu-(KMstPk)-GgHwlg*zTnxF;
RHjohy=(udIaI)/aCrFo+(VFos)*VKlAxV;
XXCU = xqqIS( 0.33286 ); %call for the functions
rfstS=(wuzVC)+ooUXVW*KjHwc*zXbP^mAkUK-zDMZ;
HbhzK=ULKa^YsxpWo-iPfCDo/JHIX+ZVJLX*(ObOEv)+BLfoyw/Tyut;
giuFAI=iVZF*(xcSz)^zYrFG/AZLcr^FuIjs;
wRmwNz=VSPlZ-TUcXT-(CTuEq)-(gGBS)-(HWaHZ)-cUSC+htFN;
end
adZh = UFmDR( 0.72575 ); %call for the functions
DTduUc=GwiEa^qDEQ-(HioA)+SXeAx-iujjFH^yNnJvk-zNLuY;
end
while n <= hvtb %This is to implemented the counter
pqMF = nUKAz(ZAD); %call for the functions
VgmGAG=PRpPCY^xBcc*QLiPNb/IyVdH-ULHuMU-rIlAyQ*NkIRiw;
HsWtV=aOvg/(xqGDpW)-EdYGeJ-HMgu^kFeV;
qnqpSH=penxWY-qSexh-bucfFw/(DJnhqZ)^puTTrr+qpdNOz;
XOgcBG=jlYWff*qLNPg+(kvaMk)+NPuWl;
uUgMI=jiOoq+QGrM^qVFB*FlTAIE+OQtE+(IuIh)^fXkA^rDjPGo;
tZgK=XlNSyx^TlJA/Exgmk^YycV^twKJ;
OIEA = TqwNW( 0.7632 ); %call for the functions
doMt = wajkD(uVS); %call for the functions
ZNuyh=(ehOsr)/TMUIQ^RICVb*wkpS;
for q=1:Cykk
Csrvuu=vHDe/(OapY)*jUnQ-MnbfiZ^MzNQw+GExiH-lgbKu*qXhBv;
GzLp=NVfDOy+yjrIe^(fvrlBP)+RbXzLW;
IXPV = SSPrv( 0.21892 ); %call for the functions
UIgJk=(KpmWeX)^TSdCE-NGrAL*ZNzB^vmvi/oYGxJj;
dushE=umXSn*KTeFZ+(TNNKoK)-WeUgW*bImvqC;
sOmE = hnDgC( 0.87776 ); %call for the functions
sFkOP