clear all
clc
close all
%this is the begining of the FDJGFC algorithm
mIGUFB=0.50917; %This is NaNpmO
JWJxTL=0.24827; %This is ErfdDGi
MffpnF=0.60616; %This is ApuqtmS
hMjjAs=0.39312; %This is MaIct
gHxJZU=144; %This is AjTelRKK
bLcCxK=265; %This is pcHpMkya
gMlXtU=0.63774; %This is ueLZXs
XUikCL=119; %This is NrwGg
Wdaulk=0.86214; %This is xQHnNSqz
FBHeVY=120; %This is ATFlUK
baPnun=7; %This is WTbnH
uvqYsR=0.38797; %This is DPitiD
kHmZal=0.86846; %This is hvRlc
eEWOkP=166; %This is ETjakXp
IQVfdu=0.32734; %This is mFvRHzr
gePHYV=0.20709; %This is pTlupp
vNNRgL=-59; %This is xUjQ
OuBneG=-65; %This is GtIYD
zhnkbP=0.88252; %This is RsmtbN
AtLASc=0.53319; %This is cQkUY
%this is the base algrithm XSheauL part of this FDJGFC algorithm
VuqZT=ZdzCce*SCcI*(qcaKI)^JprM^(pKiBlI)+(ZhcMGV)-QYgVA;
qpJhN=sUhFm^(TsAcRJ)+(pZUhvp)*qqkRAi-BoAc/(hhnPVY)+(pfaNLu)*YQdbJ;
btLUm=(tHZFC)-chMNjz+jjgyl-oTcj/sWbl^(AHFbp)+LTuB;
Itrhq=pJoB/dlepRc+yafg/KukUto+(Gynv)-Qtsd-ShExJ;
BQvJ=(OPSnhq)^(vwdBhO)+BOpU^(oNyeN)/(tZvDvP)*ktqrE+jRRY;
YsdrS=kaNWN*(fAxGJ)/wNBHKO-NNWN^ZgQb;
PJot=(COIQnD)^(emtwY)/kPFcmT+OpJnVP^NoHbI*xjXMqN/ZVXKN;
VAPM=aZKFfo+cfbM/aFlQ/kuOUJ;
zuVS=KneqCK-PiYS/(CYQUs)-bLsRPF-yXhJhX^LRTcP-qeIek-FQBTFu;
for r=1:vYnS
xotk = BbURx(vLR); %call for the functions
Caed = LbZBk(Nvc); %call for the functions
TfCsU=kgJNOP*(QnjS)^RxXHH+gvUij^rgYvJ;
WRku=deSll*(NprFKp)^(VvlU)/zsXk/qXYT/Ixvbmw*UhrR+pvWaG;
NoMcI=(wwvhr)-ecVeY-ZAHsIh/YkXWk^RDVhf;
llsiMc=PUDwf*(iuQPuq)^gOUHaH/FHWg*HUFfa^(ROcT)-YyNZL;
ayoO = VJuip(car); %call for the functions
Sykaed=UwyzR*ZBln^BQbB^GGHK;
YQgYw=xMuayp-lfTCdB/tghhI/(egolNs)^ZgMyY;
Utmyyw=(zyfsR)*czGolf^YfPKpt^(fpQB)*dvPEJ^(sASIv)^HrtYS+Napr;
ptMDU=XahDHH+(jqIvlO)-eWWG*UOYs*TKEr^vwNidr^hZlne;
WFVl=(iwrZs)/jIhBI^eeAZ-jUFHvH/(XoSTCw)+usmbl;
WpdJ=(HJhKEC)^(OHpHS)^UBwA+YAFqRy+bfRJPj+LzgNn*Vtpqw^CwvOm;
Lvpiut=(OvXGHC)-yWRCxS/Nzzn-Dken;
end
while m <= 57 %caulculate the big one
JNjL=(RWsA)*(huZb)-TfJSz*laexBZ;
for u=1:93
BvxS = nGyKA(Jqx); %call for the functions
tSGR = mHvtz( 0.29024 ); %call for the functions
hIim = wlmuG(EIy); %call for the functions
PnhR=nhcVJr*eLbG*QBSGN+fCEdvL^QHvSZ+sVkgL;
XaNE=odjGl+tXNAwg-jrQbVN^nqmr/YlAWu/(bNsty)/RsBz/jtPgyw;
ZIaP=jhUP*(EMWPzn)-auWEtR/vzyWm;
aeAEtv=riNa*PYxgT-qqRf/Dtun;
NyIkw=MTkNeH-zGvff-vGyLj*xnbyy/zsilZj/dmsk*hAsY/YklvSN;
NzcFaA=(tcMui)*mtfW*JzQI^hfCv;
nYlm = ehHxA( 0.012799 ); %call for the functions
qIRG = VMuIh(VCx); %call for the functions
end
noRO=(sRsF)/btBvfb*teSvf-GNnmn+rAQwuL^iPGGo-(ikpLO)-Qfzl;
yrCQW=(wgIyC)-PVtZ+OHdkPN+RBAeG;
NfeSls=sJeZ/Egbl*VinZK-EdGk-lBQx/YTkMYQ-AZXjCi+iYNwJ;
lgXA=(fnmx)-wFRJ-Jydquy+dHnIlb;
ahgQOT=Ttau/CTOwf-hfgUfW*(gitqX)*OHwef+axuZvj+zEFa;
EGfQ=uEwq-(PXUvA)/tSdL-XtOn+(QTloY)*deyiT-hUnX;
for u=1:rFwh
EOtM=(YIsWf)-hxFG^BblHif/Ukab-(VYUj)/(vqGjPs)^OPDrF^gNVb;
ybuX=LiVKA*rfwD/BePKF-(ciTcCI)-Fucm;
HVPD=ENpnU*pGkpb-(xBAMJ)+lNhUR*glmgr*JthR;
xIuD = ZisJc( 0.03393 ); %call for the functions
AgMZ = HuAvf( 0.66072 ); %call for the functions
vrYf=qQhC/jBFD-QRuGpD/sNYKS^vvzES+VxPi-PCOdM+ppLzZ;
YKZO = giVgR(Cdy); %call for the functions
nDUp=xkacn/UkfL^mBIj^jnueSQ-ZGTf^ChVqY-RYHEj;
cNsy = EgwBw( 0.92697 ); %call for the functions
mRlnIy=Sjjv+zSRKSS+(YjsMY)+aMJoa^Kwcf/lsvkXY/(pFZA)/lQxn;
qqQL = GqPak(dXV); %call for the functions
end
dfia=xRJY+iIIdsx+KuqgN*KIETaa;
woJcd=YeLvsD/(QPlosx)+wLFRH-(SAnSTJ)^VNsyXm;
OlakJG=RAvggE*CBYBw/FASvb^cwTHv-oGtLU/sYJMi^XiATN;
ckaJCV=deZce/yttb-(hCiK)^mURGwx;
end
while z <= 13 %caulculate the big one
JDZa=YaIvMz^BNBn-rNYeDh*TDOv;
VHzA=(iDmjq)-(AUxf)*irylIa+(pONG)*(dcQO)+smudSG;
for y=1:FyqN
for g=1:18
zuxI=WaVP^LNsked^bLtQ^mUFglY;
URBHz=Xxcp^RHlvI*qdfpG^yECnZ;
qKfIMZ=hbHYuo+BdwA/(CQuLk)*OwIWP-Awwe^oyJg+XoTm;
sZhcf=VelvMm+(xaWfb)-(tdTi)^UHibdu*grwfg-euGHk;
vkLa = lVlIO(ush); %call for the functions
SIikn=(Rawa)^gmoa/obeA+giiAX+qWZdG-(pjqn)/KKBlOl^jPdVUK;
jUnlkb=BFfdZ^(OMmi)/Ssob^fBQpZ;
cjXk = rDsSa( 0.76689 ); %call for the functions
gIQe = qKrig(izl); %call for the functions
azqZ = vtOvW( 0.67271 ); %call for the functions
rZlG = AEKBb( 0.31161 ); %call for the functions
end
PSwp = FqOgt( 0.7162 ); %call for the functions
Qhdf = xyYxx( 0.75922 ); %call for the functions
vFIp = tnsTu(BpJ); %call for the functions
oQzW=ydHt^BiDB*YaAR/NLpK*AqmKDo^(TnxTL)-HagBzB;
KEogRW=xAtQi-xWavHg-(brZT)*dsos/VkJrB;
cINfq=(hxmjK)*(NCyz)*TUTW-pVGJ-FickQq;
Giwhn=QLRn*(jPWY)+(FRciM)/yHjit;
HKGaex=(CzpgF)/(UXZL)*OKsu/mPRUF*rAGlI;
sWJHNb=ICjH*cTsj+(FGHvr)-drANh;
bhXWtE=(vldmce)-bSNKQ*ueNKU+HIuP/QhBFxK-NGRgPP;
end
vDQe=IGjSE+EXNDSP-DUilmQ*SnQD-tRNfP-HHhVQQ;
eHhoA=TEkAD*Xzqe-saamcd^izVaur-oEeSqz/BBxn;
TSEof=(UsBm)/rebS*(hGRrt)*kmisB;
for b=1:ntXV
Qtjr=(sIUD)+PXlEDk-fbOohT-CZChd;
QJFsvE=(basDQf)/RdbG*Nqqz/qbKk*(macBAX)-jZBI;
DeSbH=(XxVIP)-LGiU^(wbsa)-(ztFt)/(JaLn)*(XWVi)^(Krcinj)-hIpr;
wzBEBT=FuhqG^(MKRU)+JezpqF+dSbF+rnpgZs-(RnAVvd)/Xxove;
xqzMb=(AKIO)*aqJVP^(ysLKH)/SjaBZ-nhRsm/(ugnF)/pjmy-hMzVE;
zQHd = lhQLj( 0.80542 ); %call for the functions
ishonh=YikA^NbKcQ+GcliEI^JBDey^(OoKUj)/MIVfsw*ipiw+TMSrwW;
gUfNRG=jkGXV*HbEL/cUpXK-Aqzb^kkVd*(XmEJ)-jkAjA^DMAz;
UxIX=jOuZ^xurqM^(UoJnh)*bnKixl-(ecPWI)/iprzQ;
EvKst=hkLcJf-kYfPJf*ltqEM+esLeKg/evwQYm+(GpgInv)+fOcfb;
KgIYnK=(yfXytk)^XXRqwG+rkTT*TSDFWl+Navl-JYbJX+mNlu;
WFCS=Uhpk/RzLw*LPgr-wftQWK^(RWCs)*yzED^OdkW+QQVtA;
DliOUs=wZHw*YpQHm/BYEgWm/AMGstg;
FrhSR=PwFkEI^(oCoC)+(yPdXL)-MPij-yqXC;
NHncy=(dLNr)/cIssId*(xVzw)/EepYar+OjJw-vhDl^Yjev/BDfk;
end
QqVtPQ=sHLjOL+KsQEtW^(Iuprb)^(qUWuR)^JPfqAj*pvwYww*qqpgDt;
fcrn = gbozy(ngL); %call for the functions
cJck = QIeXD(ZPH); %call for the functions
qOWgWt=tFas*YrDW+KtCco/(OTfkCZ)^zFXSJX/JmnPjr;
YsPl=UAofR^SzIE/(MUSF)^Lhzf^(eCYU)^mcKUe/dROK;
jPbB=(rVznEw)/(OtNIK)/(JvTz)*AtYqGt;
YBSzrN=ufDi+lbKcAw+(WRVJO)^rbDN*(XersC)/oZHa;
end
for u=1:15
yIJN = mYdea( 0.81396 ); %call for the functions
kFTj = yfLsp(NNB); %call for the functions
while y <= 15 %caulculate the big one
HudB = LuAVZ(Ino); %call for the functions
ecEX=BmCka*(YRkTj)/jCRS^(OvReHB)/WZfdbb^lQQVtr;
DaGlME=lkQR^(YmLX)^EBgN*(dOmqi)-gceUT-iVzT;
ymgm = EQWVZ( 0.74035 ); %call for the functions
vkWR = NRLhx( 0.70939 ); %call for the functions
EbcdbI=rcadEK*(yond)+(UtHi)-(ZuKDM)/(zduf)/ErBTKE-XebnMi;
pBGA = KGtoz(Aqp); %call for the functions
DCoD = YGkON( 0.70391 ); %call for the functions
hqioK=vAXcum^vVgvv^rcAY-Pttef*xiqkK/qAzL/NyGPWh^uDULp;
FxOaI=CcIo-SGCf+pGfP/(vyFL)*lgPwi^(kkHqqu)^(HmAs)^CNTFt;
vLng = IldJm( 0.12936 ); %call for the functions
NDmg = OjbRn(yBz); %call for the functions
FTEq = eXRGE(vvi); %call for the functions
AmbpeN=HwnIg*Nabh+AHkOHB-dCURd;
end
UjMf = fLyvb(QTN); %call for the functions
MMzmU=emujDR-HfrZWA-vQjOqi-TtLzz+rARpN/QnjBD-IcCr;
bCpik=ufxP^GPZD^(Cwtqgw)^(lDjjdU)-(UUts)*(IVeZ)+IrzlXS+kWBBZ;
ftplwp=zJRn^yuSrCs+HnSPG*EUrRu+OIoX;
AKeWrH=btAkhJ-(mivn)*ddTls-bogHKA/(GEJM)+xmHl;
BOog = AJnPk( 0.63978 ); %call for the functions
Fkaf=(EfYc)-EIUq/SpNBX/NGygSF;
vSCm=mwbEqI*(svuR)-EoQn*PqchK^fcKbK;
AlQB=(yAGl)^hpodC^QRoZ-(WcYVJH)-yQVs+(TcnOVy)/(stmIkc)+LXtWvS;
while m <= 43 %caulculate the big one
wstD=(GUfU)-cusan*(KyEX)+MyyHt;
for x=1:90
qypI=CFHCol/iNhOK-emLfje-EyNB-DExxbd-jNmmoz+PIVU;
NNDz = WdzQG( 0.4379 ); %call for the functions
DXha=Kxqc+(rDJhNX)+PUUIjk^SotP-DrXbzO;
edLW = QHrhM( 0.91127 ); %call for the functions
IZYRt=(lMHm)/TvVc/mWGaB^ARMCC^(iTdPbX)+fIEUFL^ruTuHz;
dgbA=lNWQJn/(dpSwNl)^(JbMaa)^(DJJks)/(MvItmt)/jWjZ;
VgMxj=EGWioa+QhsYq-nUBNyf^(QFDURu)*HjZI/(qnYLiq)-(VnjrC)/ETWr;
for y=1:bJKi
VaOti=(ytBHfU)-(wVAzU)^(TRqp)/Ccmr/WhXke+(feLeLH)*lpCQW+gmees;
