Skip to content

Commit

Permalink
Fix compiler warnings in MagfieldCoils.cxx
Browse files Browse the repository at this point in the history
When building the class, several compiler warnings were triggered:

[build] [566/1263  43% :: 34.774] Building CXX object KEMField/Source/ExternalFields/MagfieldCoils/CMakeFiles/KEMMagfieldCoils.dir/src/MagfieldCoils.cxx.o
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::CoilRead()’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:170:58: warning: unused variable ‘v’ [-Wunused-variable]
[build]   170 |    double cu, Cx, Cy, Cz, alpha, beta, tu, L, Rmin,Rmax, v[3];
[build]       |                                                          ^
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::Magfield2EllipticCoil(int, double, double, double&, double&)’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:661:16: warning: unused variable ‘st’ [-Wunused-variable]
[build]   661 |   double sign, st, delRr, Rlow[2], Rhigh[2];
[build]       |                ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::Magsource2RemoteCoil(int, double, double)’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:873:44: warning: unused variable ‘st’ [-Wunused-variable]
[build]   873 |   double L, sigma, Zmin, Zmax, Rmin, Rmax, st;
[build]       |                                            ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::RemoteSourcepointGroup(int)’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1046:2: warning: this ‘if’ clause does not guard... [-Wmisleading-indentation]
[build]  1046 |  if(zA<zmin)  zmin=zA;  if(zB>zmax)  zmax=zB;
[build]       |  ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1046:25: note: ...this statement, but the latter is misleadingly indented as if it were guarded by the ‘if’
[build]  1046 |  if(zA<zmin)  zmin=zA;  if(zB>zmax)  zmax=zB;
[build]       |                         ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::MagsourceMagchargeCoils()’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1079:22: warning: variable ‘L’ set but not used [-Wunused-but-set-variable]
[build]  1079 |   double Rmin, Rmax, L, rorem, sigma;
[build]       |                      ^
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1079:25: warning: unused variable ‘rorem’ [-Wunused-variable]
[build]  1079 |   double Rmin, Rmax, L, rorem, sigma;
[build]       |                         ^~~~~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::Magsource2CentralCoil(int, double, double)’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1190:44: warning: unused variable ‘st’ [-Wunused-variable]
[build]  1190 |   double L, sigma, Zmin, Zmax, Rmin, Rmax, st;
[build]       |                                            ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::MagsourceCentralCoils()’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1262:10: warning: unused variable ‘z0’ [-Wunused-variable]
[build]  1262 |   double z0, Rmin, Rmax, L, rorem, cu, tu;
[build]       |          ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1262:14: warning: unused variable ‘Rmin’ [-Wunused-variable]
[build]  1262 |   double z0, Rmin, Rmax, L, rorem, cu, tu;
[build]       |              ^~~~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1262:20: warning: unused variable ‘Rmax’ [-Wunused-variable]
[build]  1262 |   double z0, Rmin, Rmax, L, rorem, cu, tu;
[build]       |                    ^~~~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1262:26: warning: unused variable ‘L’ [-Wunused-variable]
[build]  1262 |   double z0, Rmin, Rmax, L, rorem, cu, tu;
[build]       |                          ^
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1262:29: warning: unused variable ‘rorem’ [-Wunused-variable]
[build]  1262 |   double z0, Rmin, Rmax, L, rorem, cu, tu;
[build]       |                             ^~~~~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1262:36: warning: unused variable ‘cu’ [-Wunused-variable]
[build]  1262 |   double z0, Rmin, Rmax, L, rorem, cu, tu;
[build]       |                                    ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1262:40: warning: unused variable ‘tu’ [-Wunused-variable]
[build]  1262 |   double z0, Rmin, Rmax, L, rorem, cu, tu;
[build]       |                                        ^~
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx: In member function ‘void MagfieldCoils::CentralSourcepointsGroup(int)’:
[build] ../KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx:1431:16: warning: unused variable ‘rocen’ [-Wunused-variable]
[build]  1431 |     double z0, rocen;
[build]       |                ^~~~~
  • Loading branch information
richeldichel committed Nov 21, 2023
1 parent 6d70355 commit 4cca8e7
Showing 1 changed file with 16 additions and 14 deletions.
30 changes: 16 additions & 14 deletions KEMField/Source/ExternalFields/MagfieldCoils/src/MagfieldCoils.cxx
Original file line number Diff line number Diff line change
Expand Up @@ -167,7 +167,7 @@ void MagfieldCoils::CoilRead()
coil[i]= new double[14];
}
// Reading the coil parameters:
double cu, Cx, Cy, Cz, alpha, beta, tu, L, Rmin,Rmax, v[3];
double cu, Cx, Cy, Cz, alpha, beta, tu, L, Rmin, Rmax;
for(int i=0; i<Ncoil; i++)
{
input >> cu >> Cx >> Cy >> Cz >> alpha >> beta >> tu >> L >> Rmin >> Rmax ;
Expand Down Expand Up @@ -658,7 +658,7 @@ void MagfieldCoils::Magfield2EllipticCoil(int i, double z, double r, double& Bz,
// the first, second and third complete elliptic integrals.
double L, Zmin, Zmax, Rmin, Rmax, sigma;
double R, Z, delr2, sumr2, delz2, eta, d, K, EK, PIK, S;
double sign, st, delRr, Rlow[2], Rhigh[2];
double sign, delRr, Rlow[2], Rhigh[2];
const double mu0=4.*M_PI*1.e-7;
double x[2][1001], w[2][1001]; // nodes and weights
// Coil parameters:
Expand Down Expand Up @@ -870,7 +870,7 @@ void MagfieldCoils::Magsource2RemoteCoil(int i, double z0, double rorem)
{
const double mu0=4.*M_PI*1.e-7;
double x[1001], w[1001]; // nodes and weights
double L, sigma, Zmin, Zmax, Rmin, Rmax, st;
double L, sigma, Zmin, Zmax, Rmin, Rmax;
// Coil parameters:
L=coil[i][7]; // coil length
Zmin=-L/2.; Zmax=L/2.; // coil endpoints relative to coil center
Expand Down Expand Up @@ -1043,7 +1043,10 @@ void MagfieldCoils::RemoteSourcepointGroup(int g)
{
int i=Cin[g][c]; double L=coil[i][7];
double zA=Z[g][c]-L/2.; double zB=Z[g][c]+L/2.; // coil edges
if(zA<zmin) zmin=zA; if(zB>zmax) zmax=zB;
if (zA < zmin)
zmin = zA;
if (zB > zmax)
zmax = zB;
}
z0rem=z0remG[g]=(zmin+zmax)/2.; // group center in group Z-coordinate system
// Remote convergence radius of group --> roremG[g] :
Expand Down Expand Up @@ -1076,7 +1079,7 @@ void MagfieldCoils::MagsourceMagchargeCoils()
// i: coil index, n source constant index.
{
// Output to file dirname+objectname+magsource_remote.txt :
double Rmin, Rmax, L, rorem, sigma;
double Rmin, Rmax, sigma;
string filename=dirname+objectname+"magsource_remote.txt";
ofstream output;
output.precision(16);
Expand All @@ -1089,7 +1092,6 @@ void MagfieldCoils::MagsourceMagchargeCoils()
for(int i=0; i<Ncoil; i++)
{
// Coil i parameters:
L=coil[i][7]; // current, turns, length
Rmin=coil[i][8]; Rmax=coil[i][9]; // inner and outer radius
sigma=coil[i][10]; // current density
output << scientific << setw(7) << i <<endl; // coil index
Expand Down Expand Up @@ -1187,7 +1189,7 @@ void MagfieldCoils::Magsource2CentralCoil(int i, double z0, double Rocen)
{
const double mu0=4.*M_PI*1.e-7;
double x[1001], w[1001]; // nodes and weights
double L, sigma, Zmin, Zmax, Rmin, Rmax, st;
double L, sigma, Zmin, Zmax, Rmin, Rmax;
// Coil parameters:
L=coil[i][7];
Zmin=-L/2.; Zmax=L/2.; // coil endpoints relative to coil center
Expand Down Expand Up @@ -1259,7 +1261,6 @@ void MagfieldCoils::MagsourceCentralCoils()
// (defined relative to the coil center; positive z0 in coil direction u),
// rocen: central convergence radius for a fixed source point and coil.
{
double z0, Rmin, Rmax, L, rorem, cu, tu;
// Output to file dirname+objectname+magsource_central.txt :
string filename=dirname+objectname+"magsource_central.txt";
ofstream output;
Expand Down Expand Up @@ -1428,7 +1429,7 @@ void MagfieldCoils::CentralSourcepointsGroup(int g)
// Central source points:
{
vector<double> Z0cen;
double z0, rocen;
double z0;
double roremC=roremG[g];
double z0min=z0remG[g]-2.*roremC;
double z0max=z0remG[g]+2.*roremC;
Expand Down Expand Up @@ -1524,7 +1525,7 @@ bool MagfieldCoils::Magfield2Remote(bool bcoil, int ig, double z, double r, doub
}
// We start here the series expansion:
Bz=Br=0.;
int nlast;
int nlast = 0;
double brem;
if(bcoil==true || even==true) // even calculation
{
Expand Down Expand Up @@ -1699,7 +1700,7 @@ bool MagfieldCoils::Hfield(int i, double z, double r, double& Hz, double& Hr, do
// We start here the series expansion.
// Only the odd-n terms are needed in the series.
double Hzplus,Hrplus,Hzplusold,Hrplusold,Heps,Hdelta;
int nlast;
int nlast=0;
for(int n=1; n<=nmax-1; n+=2)
{
nlast=n;
Expand Down Expand Up @@ -1805,10 +1806,10 @@ bool MagfieldCoils::Magfield2Central(bool bcoil, int ig, int j, double z, double
Bz=BcenG[ig][j][0]+BcenG[ig][j][1]*rc*u;
Br=-sr*BcenG[ig][j][1]/2.*rc;
}
int nlast=0;
if(rc<1.e-10) goto label;
//
// We start here the central series expansion:
int nlast;
double bcen;
for(int n=2; n<=nmax-1; n++)
{
Expand Down Expand Up @@ -2339,8 +2340,9 @@ double MagfieldCoils::RJ_Carlson(double x,double y,double z,double p)
// (see: Press et al., Numerical Recipes, Sec. 6.11).
const double ERRTOL=0.0015,TINY=1.e-20,BIG=1.e12,C1=3./14.,C2=1./3.,
C3=3./22.,C4=3./26.,C5=0.75*C3,C6=1.5*C4,C7=0.5*C2,C8=2.*C3;
double a,alamb,alpha,ans,ave,b,beta,delp,delx,dely,delz,ea,eb,ec,ed,ee,
fac,pt,rcx,rho,sum,sqrtx,sqrty,sqrtz,tau,xt,yt,zt;
double alamb,alpha,ans,ave,beta,delp,delx,dely,delz,ea,eb,ec,ed,ee,
fac,pt,rho,sum,sqrtx,sqrty,sqrtz,tau,xt,yt,zt;
double rcx = 0.; double b = 0.; double a = 0.;
if(FMIN3(x,y,z)<0. || FMIN(FMIN(x+y,x+z),FMIN(y+z,fabs(p)))<TINY ||
FMAX(FMAX(x,y),FMAX(z,fabs(p)))>BIG)
{
Expand Down

0 comments on commit 4cca8e7

Please sign in to comment.