jscaux
/
ABACUS-v1
3
0
Fork 0
Code Issues 1 Pull Requests Releases Wiki Activity

Go for gcc-11.2

This commit is contained in:
Jean-Sébastien 2021-12-06 15:05:34 +01:00
parent e1b2b0f1ec
commit c9d2cd17f6
3 changed files with 12 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Makefile
View File

@ -26,7 +26,7 @@ BIN_DIR = $(BASE_DIR)/bin
SRC_EXT = cc SRC_EXT = cc
# Compiler choice # Compiler choice
CXX = g++ CXX = g++-11.2
CXXFLAGS = -fopenmp CXXFLAGS = -fopenmp
LDFLAGS = -O3 -w -fopenmp LDFLAGS = -O3 -w -fopenmp
# Compilation command # Compilation command

4
src/EXECS/LiebLin_Data_Daemon_Nscaling.cc
View File

@ -60,6 +60,10 @@ int main(int argc, char* argv[])
while (Secs_left > 0) { while (Secs_left > 0) {
cout << "StartTime = " << StartTime << endl;
cout << "ActualTime = " << ActualTime << endl;
cout << "Secs_left = " << Secs_left << endl;
iN += 1; iN += 1;
int N = Nstep * iN; int N = Nstep * iN;
DP L = N; DP L = N;

9
src/EXECS/LiebLin_Fourier_to_x_t_from_RAW.cc
View File

@ -81,12 +81,17 @@ int main(int argc, char* argv[])
RecMat<complex<DP> > FT(0.0, Npts_x, Npts_t); RecMat<complex<DP> > FT(0.0, Npts_x, Npts_t);
DP twopioverL = twoPI/L; DP twopioverL = twoPI/L;
DP FFsq;
complex<DP> exp_ik, exp_miomega;
while (RAW_infile.peek() != EOF) { while (RAW_infile.peek() != EOF) {
RAW_infile >> omega >> iK >> FF >> dev >> label; RAW_infile >> omega >> iK >> FF >> dev >> label;
FFsq = FF * FF;
exp_ik = exp(II * (iK * twopioverL));
exp_miomega = exp(-II * omega);
for (int ix = 0; ix < Npts_x; ++ix) for (int ix = 0; ix < Npts_x; ++ix)
for (int it = 0; it < Npts_t; ++it) for (int it = 0; it < Npts_t; ++it)
FT[ix][it] += FF * FF * exp(II * (iK * twopioverL * xlattice[ix] - omega * tlattice[it])); //FT[ix][it] += FF * FF * exp(II * (iK * twopioverL * xlattice[ix] - omega * tlattice[it]));
FT[ix][it] = FFsq * pow(exp_ik, xlattice[ix]) * pow(exp_miomega, tlattice[it]);
} }
RAW_infile.close(); RAW_infile.close();