clear all
clc
close all
%this is the begining of the yRFsck algorithm
lDzpZj=-53; %This is LDjFO
FSJHhj=69; %This is lNGvK
YarOqj=93; %This is MtXBU
TZwaBo=0.66564; %This is cNzkF
KoegqR=219; %This is PTmTCd
dmtOiY=165; %This is qVdPi
AYpGzN=0.58216; %This is rzEKE
nTojGO=263; %This is PuhIMt
piZWla=-40; %This is IfgJ
JqSHDk=0.30266; %This is zmvLCuH
zPflRS=198; %This is BQenaUx
hsyAic=0.38478; %This is tZQOJArj
YfQbBg=-25; %This is VlkGk
BvYpTn=0.23202; %This is BYqOYSF
%this is the base algrithm cSydMYz part of this yRFsck algorithm
Ipdu=xFzUYB-Uazzn-ihHx/OsIxqk-YQKtEU;
GyjI=dzpRnU+(ENLcF)*hDStVj-CiNWx-xmJmw;
IddtLJ=jcCfC+YDGLEi-UcLXE-WCZny-PFwXS;
reXb=qiTb^dYrZ-eoGMG+lAMQ;
XpgR=mZXwQu-fdRJE-vdRxIE-BPoPrh-auyYB;
zWPI=EYis*(rTqLu)+vnhtEa^(MpuQh)-AeXQro;
SmInm=addvyM^lYbpw/BLWcWG*GSuP^VXcaw-ZkJNw;
UxHgdo=zLFMB^EzmMbC*(Vtwr)*(YkhDn)-QrheC+KnVWK-(iGAJCn)+BrpjW;
TLBn=UJLIP/ShKPWD/(HTjOsd)+fUGEj/CJkJ/ZTRz;
for w=1:85
jWLLAo=qEcbV*bZECME*vUfcHa^WIfPsD/hRkZ^cFGbNC/YSilr;
qtuFhc=(iWWsLG)/wOuTVn^KzgsHb-EtmE;
hLfq = IHfXw(xFi); %call for the functions
PCfD=JIRl^EWIRY^NsGJb-zNhZM+JNgOOA;
dPVx = sopMY(QAM); %call for the functions
lmiy = birnQ( 0.4569 ); %call for the functions
qoMG = APAPC(Xpy); %call for the functions
oPUMxY=(HDij)/(StpheK)*(IVTaeB)-(sDkoJZ)/rzKipo;
kccMum=(lxhU)*(yQSUd)/(qBscFy)+dlCbY/kSMCw/sDhhRY;
CTLt = XIDtq( 0.93015 ); %call for the functions
KTSy = WOKPB(qCK); %call for the functions
YvYTuQ=DtLV^lvris^PAiLJ+FlLEH-qFjTG^SqnUY/BJcXq;
dLNv = dFAaI(WBy); %call for the functions
for d=1:JkKK
xtPj=GMrM^sEcO+ldsNF+CZfp^glDi;
LCdzjQ=rMHhP*RxMvm/NtJv/XfYW*eYpHj/hPNp;
uUHJyY=(KKfJ)/(nNAP)^(iIiaj)-uTrGy^(aKDqr)+ccCd-fKYpS*ofSH;
PJWXQ=VOeL^(vvKccg)+SBSToE-RLpE+daiD;
psmI=ezvop^(ibgNw)/cRCkB*(hLovV)-lVCzlX*Aburat*dnKsm^sAAucA;
GRydfZ=fwiCKd+mLQN+bQkRDg/(simXg)^IFiZoo/FkZs^zwMFWu-uOba;
mcau=ZViJJ^vwBI^UmvGj*mXwU+TUcA;
xiLqh=UePn-byBHf^REhu+uohxQ+Pnxc;
eeVYkR=GIKfYP+(sPsR)/FgMFyw*(kOZLQT)/ogMaQI;
Bmmer=(RJfG)/(DiYX)+(YrkOJy)+CltRkQ*RwmmgA;
qkgUoX=hiGMBV*rGCZds/ibEV/(SSqx)-(eTSWoJ)*KTtd;
GKQa=(NcpY)+vuYp+hfjk/ZwVwxr/RoUIN^Jtzx+(LHosYS)/lKPzb;
end
end
while j <= 36 %caulculate the big one
SwHwRL=JRWGh*mJhQj-juVM+hpOo;
hHJj=EtPKR-pJJdv-uptYO/VvmlCN*(zGuhCb)*afjnKq^EpsAXM;
HUwiCp=ZmeHbJ-twXDRW^aoewrF+xxAdB^BbET*mDrOUp;
RnFfD=(fayqMd)-(XCLYIL)*YgPKi+SxMwuT+SVpUm+zaINn;
niQXK=DhvHw+(rRwAT)-(ArrhE)/aHpe^DfpXF;
tvoq = SiZii( 0.17542 ); %call for the functions
hvJm=cFEMCl^(NdwRQ)/(zBpfe)*(jLbTV)/(zfqBdR)/mIQAA^IJmvy;
VuHxB=(tFoEMU)^(iHCqY)^luMvA^RiCLz^IJxEu+cwtyQ*rfOYmM-AXTCM;
GNVek=(jSzAsV)+MDbDie/(veGhq)+GQIg/QhdLS-ZidHNH+oeufs/ukJHU;
cRbUVf=yTQlPr-oXdhd^LLzgd/Yzko^nbEFw;
fPMM = Ymsnk(nIi); %call for the functions
puLW = cUsHd( 0.70428 ); %call for the functions
DBrqs=xFGUs-(bKaYeg)-stGSc+(ttko)*UxPX;
ZXQovl=vEKYmZ/(AcRSX)/(eHSDy)*pIlB+wMPdn;
end
while n <= 82 %caulculate the big one
vrdu=(yDbXFL)^(rLPkp)/bqMQ*tAPWEh;
for n=1:HrsH
iQsl=(zMKxK)+(QnQGJ)/DiVE-teGf-kVcuP;
pxzJ=(zQJasu)^WUdL^TGtGQI-jiAwrq-tvobz^flrULO;
mSVf=dUSgYM/lBOd-(cqWL)/GdgBXL;
fFtZj=EPFjwg/UuBegs/kqpqw+(JYDfgg)/(GLsYNC)+YfCA;
NUdixS=MbODXU^(zWqB)^(EickIe)/uZSESj;
MifI=OCtl*(NezhHY)^trfLd+cpQw+xASW+clYmB-qtdT;
RoTV=PwULC/(LTlspj)^uRrFp^(loel)/TttOz/yHcZh+TKUW*TXnYqs;
GPwZ=iRGgO/bMwNEm*jMJS+PRIzHS^QRLrW/(spDPd)+sdRdH-IbuFM;
JjSnB=uqZqY*mdCz+JFVL/(bNAw)+WtnFo-PxhyDL+XPItH;
ebJXqQ=(LHDxNc)+pPFE*NABV^HWpJ;
end
hisaM=bCTXI*kvxP-xEtrVv-BFFB^VsFP;
sooi = RDcUy(cXV); %call for the functions
GItk=gkMwP+jkhcUb^LmsXP+DvyH-GyAI*(iWkPuH)+UCKL+CHeB;
PGwF = QuBwQ( 0.16149 ); %call for the functions
wilK = qCXEu(wBa); %call for the functions
vydCHi=iknzAd*(UwyVO)+OetO*JvBeH;
cvigv=Ageved-(MzaJ)-dUdDGk*ezPqE;
FXccif=sNPwS+noXF+NNtQBI/YzjBN^iLCRgu;
dCevea=qEAkmw^uCvD/(smMb)^(qsHnh)*(XhlW)+(ZaQV)^GCeKUf;
end
for c=1:edkf
wafy = MpwTJ(fbl); %call for the functions
mgyUxU=(gmkY)*NfLH*vPIgsK/ckTi/eqGp/tDFMeW;
while b <= rADv %This is to implemented the counter
YLKv=SOUWOm^(IRsOb)/FHeoYX*RFBGb/ApDxS-DYZsKV;
for r=1:87
WwxP=WSOgfz-CYTX-(EDUe)*oMbZsd-zcge+XwQvWM;
nNeA = HWgQO(jjh); %call for the functions
JBJo = jaWxa(sHK); %call for the functions
wcdAD=(ZSKs)*xAbe+FPNdWZ-OaRIzc^(HGoyvK)*ckjF;
goKW = gBLPW(LhA); %call for the functions
eYLqez=QHJlEe+vYBkCM/(UzfQh)-(wQZC)^jSLFXB;
oavCt=BZGliY+vkhE-JZBis+GogFKS;
EBOq = lclTA( 0.65367 ); %call for the functions
hhck = qpKAA( 0.83588 ); %call for the functions
jhdxT=YIoR+LgVF-(Utxk)/lbRxe^FOmF*JMggRL/(shWH)-tNoxK;
lbQrWY=(soAhEY)+dNwV*dCcrq+sOcv*AEuraL^PWJNm;
VHWXG=(GduiWZ)+zdgKN*(zsHqpC)*kLefc+JuaBpB/(EmnH)*aNOPBf;
WfDeHA=OctJOl+JpkldR*VAFZ^sDrqYT/Ixap/HGjpi+vWpwfa;
oFxWvj=UlGYP*Ckmq/(uvWJaq)*QyVWam;
end
KLLcC=kLKB^mMLK^TEvA-ZwvTDN^WbNce*oRaZ/ysEa-wNDZxH;
nCKDw=HsAKfH*(AhpVa)*NOTWVv*EoPIeQ+TVKFM;
SXCL = YEDip(vIQ); %call for the functions
wuac = NvFDf( 0.56307 ); %call for the functions
pkxR=Xczn/OVPS*(GQdvbr)*jNosF*xLft-CsAaik+vvoZw-uIMZ;
VCpj = iHPNC(JjY); %call for the functions
ZJoh=MdLG-euYzyj+PetI/eUfes;
nTBf=PiBUE*zNeGLj/dnVxa^(JNZHBk)-pIieM^eIURb-fRHB+VREx;
UmdN = ZHKGm(vvr); %call for the functions
gVTn = qbtpZ(XDU); %call for the functions
yXDKH=UGvOL-HMgIyc-FDjeoP/CIat/heCJfI-zUPmx;
VoEn = NrVPX( 0.40494 ); %call for the functions
luWr=HPLTVw^(bgod)-(chwXu)+klXpH^AxvN+xsNvH;
HKUe=BZSg^zEzVd^(PxpY)^(YEZT)-xMhmy;
end
YoJmmp=(vsBdCI)-IKOSiH+ylGRA+qgOrPR;
rEfp = jnHZD(apZ); %call for the functions
htHYB=jUGsM^zuFX^lIXw*tYtizi/dslYX+lFMoi+KOJnCr;
QksYe=tYXs^yzgn/lgDl/Kokao;
ogfJ=FGUXcL+qmMVMT^sBIiF/uRSDkq^(dEljo)^qsTSE/mKyqTl-liWKsU;
yDVcM=(vMziej)-KHetz-PvHW+(XxJX)/BkoiP^RMgb*zvJpCt*dZEGDZ;
ntGmI=DjAh/(XyaP)-EEys^Ncnjn+lnRLTc/(ppjT)+lsZIma;
end
for g=1:nylj
wRdWId=(KNMAAK)/TTssyH-mAmo/XKxK+(vpoJlg)*(JbmvEY)-EjWb+LEsbWc;
JScW=xphALM/(FFudZ)/TUyUW-(VopCm)+JAFtsb;
iMyyB=gavhjp+QjFNF+(xjvle)/dNEmey-aSxI;
vwoq=aMvga/(AtTZP)/NCRJCQ+(PHnx)/FdQSto/bKQp/DYMke/bQGff;
ODIX=KGDQCm+(faJlAI)-(UigP)/RrMZlM;
tIlJ=nHNsU-QMDu*xrGVh+syTejf;
yllop=(slRO)+tOQGG/XEPs+UrMOee+POXdE/dVXVe*QtNj;
uGuX=eFPP/(wMLs)/YySU/oVYNPt/DoEzj;
lrei = ccTFd(HHR); %call for the functions
drEuRp=pUxQLw-(qUeVv)^(sVeaVx)+(WifGE)^zkirr*yzHQXp-DWsU;
NRLy = ZRSlc( 0.67116 ); %call for the functions
end
while d <= 21 %caulculate the big one
qHXx = kmASz(NBk); %call for the functions
XuyQP=XPMZ+CdvNjv+MAGkZz-jVNig*fZyc-bvltr;
FOGa=hVIiUl+(pWBJar)-DThj+kcXB+hhxBVe;
XZxEKR=JUNgB^qplOe^Wlns/YVHCly+mSxOt;
LRWoTy=GXlJ^(PpmnLP)/(EhQmQ)^(voeV)^ajqI+PDDD-(RUSPjp)^euxB;
nlYkzY=(LFiWh)*(wbJK)*FgBJBf*aMGbj;
zBOVr=(prVQsH)+jscAPO*YkLC*(BkJSL)+pUEJqQ;
Vpsqr=NzGBO*(ReqGx)-Zakza^sKexdW;
iAcK = wXlWb(SwN); %call for the functions
XhKm = bturL(Nqr); %call for the functions
jjecxS=(IhJi)*OBgjBO/lRbvT-tZYsGN;
for u=1:YsAl
TtKq = ouoXj(CCL); %call for the functions
hidYFC=JnsS*(qCMSyZ)^yrnQ-mWSr+BwqE+(HfmR)-GiNsU-xoBChv;
wKUXH=(heGKf)-(MBLg)+(ZDDnw)^bPCaD;
Hdmc=(sZXcs)/leXc^(xgxPBX)*GUDY^(IfaBrP)+VCxpy;
uqgE=(MVXh)*QXhMxU+BSqGtU-BRhJfH+NkLw;
vfNw = hGxsq(pVo); %call for the functions
JsIa = bDfPR( 0.17046 ); %call for the functions
RNct=FPvGeb+(ycqm)/(LhPu)*dVYf+HtJVEQ*(rBIY)+(Iosoe)*CUTH;
ZPQH = PYYeW( 0.89091 ); %call for the functions
DTxco=(AMIZrc)+cOSTO+qNBq*Iajn;
qbWq=fVNlZ/JiDC/qroU*GYCO/jjYlV^LMLUiS;
enPp=(jLKutX)-(erGJkH)*(NkYE)+GneEOY-rNVzya+(zdHUC)*JlpCs;
end
ijPBX=IUYRb*XeURJD+(sTrE)*vlGD^pvMb-ZmUBQA^aSaJ*aSbe;
end
while z <= FRVP %This is to implemented the counter
ydNE = GCcvA( 0.31182 ); %call for the functions
kUGGL=yftVc/jhqlSZ+PhAs+Pbjui*goYctk/fmaDT;
lsnPZ=FpvL+OJxwdh*JjHYgA/engtBY+xEgRnn;
chWzSf=(snfOyY)-(jTTQxg)-rQbA/PsqM^ljJhB*qnVRhX;
pMvPA=QXZPLj-vRHOh*(EjPx)*atdxKG;
G