jscaux
/
ABACUS
2
0
Çatalla 0
Kod Konular 1 Değişiklik İstekleri Sürüm Wiki Aktivite

Flip order iK - it in output of S(q,t)

Bu işleme şunda yer alıyor:
J.-S. Caux 2019-12-06 16:45:10 +01:00
ebeveyn 421c591dd0
işleme 10b10574c6
1 değiştirilmiş dosya ile 7 ekleme ve 5 silme
İstatistikleri Göster Yama Dosyasını İndir Diff Dosyasını İndir Tüm dosyaları genişlet Tüm dosyaları daralt

12
src/EXECS/Heis_Fourier_to_Sqt.cc
Dosyayı Görüntüle

@ -92,16 +92,18 @@ int main(int argc, char* argv[])
if (FTim_outfile.fail()) ABACUSerror("Could not open FTim_outfile... "); if (FTim_outfile.fail()) ABACUSerror("Could not open FTim_outfile... ");
for (int iK = iKmin; iK <= iKmax; ++iK) { for (int it = 0; it <= Npts_t; ++it) {
FTre_outfile << setprecision(16); FTre_outfile << setprecision(16);
FTim_outfile << setprecision(16); FTim_outfile << setprecision(16);
if (iK > iKmin) {
if (it > 0) {
FTre_outfile << endl; FTre_outfile << endl;
FTim_outfile << endl; FTim_outfile << endl;
} }
FTre_outfile << real(FT[0][iK]); FTre_outfile << real(FT[it][iKmin]);
FTim_outfile << real(FT[0][iK]); FTim_outfile << real(FT[it][iKmin]);
for (int it = 1; it <= Npts_t; ++it) {
for (int iK = iKmin + 1; iK <= iKmax; ++iK) {
FTre_outfile << "\t" << real(FT[it][iK]); FTre_outfile << "\t" << real(FT[it][iK]);
FTim_outfile << "\t" << imag(FT[it][iK]); FTim_outfile << "\t" << imag(FT[it][iK]);
} }