change function name to involve omp info

Author: QuantumMisaka

source/main.cpp

@@ -28,13 +28,13 @@ int main(int argc, char** argv)
     int nproc = 1;
     int my_rank = 0;
     int nthread_per_proc = 1;
-    Parallel_Global::read_mpi_parameters(argc, argv, nproc, nthread_per_proc, my_rank);
+    Parallel_Global::read_pal_param(argc, argv, nproc, nthread_per_proc, my_rank);
 #ifdef _OPENMP
     // ref: https://www.fftw.org/fftw3_doc/Usage-of-Multi_002dthreaded-FFTW.html
     fftw_init_threads();
     fftw_plan_with_nthreads(omp_get_max_threads());
 #endif
-    PARAM.set_rank_nproc(my_rank, nproc, nthread_per_proc);
+    PARAM.set_pal_param(my_rank, nproc, nthread_per_proc);
 
     /*
     main program for doing electronic structure calculations.

source/module_base/parallel_global.cpp

@@ -87,7 +87,8 @@ void Parallel_Global::split_grid_world(const int diag_np, const int& nproc, cons
     return;
 }
 
-void Parallel_Global::read_mpi_parameters(int argc, 
+// changed from read_mpi_parameters in 2024-1018
+void Parallel_Global::read_pal_param(int argc, 
                                           char** argv, 
                                           int& NPROC, 
                                           int& NTHREAD_PER_PROC, 
@@ -158,7 +159,7 @@ void Parallel_Global::read_mpi_parameters(int argc,
         {
             // usage of WARNING_QUIT need module_base/tool_quit.cpp
             // lead to undefined error in unit_test building
-            // ModuleBase::WARNING_QUIT( "Parallel_Global::read_mpi_parameters","OMP_NUM_THREADS setting is invalid. Please set it to a proper value.");
+            // ModuleBase::WARNING_QUIT( "Parallel_Global::read_pal_param","OMP_NUM_THREADS setting is invalid. Please set it to a proper value.");
             std::cerr << "ERROR: OMP_NUM_THREADS setting is invalid. Please set it to a proper value." << std::endl;
             exit(1);
         }

source/module_base/parallel_global.h

@@ -18,7 +18,9 @@ extern int omp_number;
 //---------------------------
 // call at the very first.
 //---------------------------
-void read_mpi_parameters(int argc, char** argv, int& NPROC, int& NTHREAD_PER_PROC, int& MY_RANK);
+
+// changed from read_mpi_parameters in 2024-1018
+void read_pal_param(int argc, char** argv, int& NPROC, int& NTHREAD_PER_PROC, int& MY_RANK);
 #ifdef __MPI
 void myProd(std::complex<double>* in, std::complex<double>* inout, int* len, MPI_Datatype* dptr);
 #endif

source/module_cell/module_symmetry/run_symmetry.cpp

@@ -14,7 +14,7 @@ int main(int argc, char **argv)
 	std::cout << "Hello, this is the 'symmetry' module of ABACUS." << std::endl;
 
 	std::cout << "The module does symmetry analysis for an input geometry." << std::endl;
-	Parallel_Global::read_mpi_parameters(argc,argv);
+	Parallel_Global::read_pal_param(argc,argv);
 	//std::cout << "Right now, the module is still empty, soon we will have more tests." << std::endl;
 
     calculate();

source/module_parameter/parameter.cpp

@@ -2,7 +2,8 @@
 
 Parameter PARAM;
 
-void Parameter::set_rank_nproc(const int& myrank, const int& nproc, const int& nthread_per_proc)
+// changed from set_rank_nproc in 2024-1018
+void Parameter::set_pal_param(const int& myrank, const int& nproc, const int& nthread_per_proc)
 {
     sys.myrank = myrank;
     sys.nproc = nproc;

source/module_parameter/parameter.h

@@ -27,8 +27,9 @@ class Parameter
     // We can only read the value of globalv parameters, but cannot modify it.
     const System_para& globalv = sys;
 
-    // Set the rank & nproc
-    void set_rank_nproc(const int& myrank, const int& nproc, const int& nthread_per_proc);
+    // Set the rank & nproc & nthreads_per_proc
+    // changed from set_rank_nproc in 2024-1018
+    void set_pal_param(const int& myrank, const int& nproc, const int& nthread_per_proc);
     // Set the start time
     void set_start_time(const std::time_t& start_time);
 

tools/SIAB/SimulatedAnnealing/backup_old_version/1_Source/src_parallel/parallel_global.cpp

@@ -27,7 +27,7 @@ void Parallel_Global::myProd(complex<double> *in,complex<double> *inout,int *len
 }
 #endif
 
-void Parallel_Global::read_mpi_parameters(int argc,char **argv)
+void Parallel_Global::read_pal_param(int argc,char **argv)
 {
 #if defined __MPI
 //for test

tools/SIAB/SimulatedAnnealing/backup_old_version/1_Source/src_parallel/parallel_global.h

@@ -18,7 +18,7 @@ extern MPI_Comm POOL_WORLD;
 
 namespace Parallel_Global
 {
-	void read_mpi_parameters(int argc, char **argv);
+	void read_pal_param(int argc, char **argv);
 
 #ifdef __MPI
 	void myProd(complex<double> *in,complex<double> *inout,int *len,MPI_Datatype *dptr);

tools/SIAB/SimulatedAnnealing/backup_old_version/1_Source/src_spillage/main.cpp

@@ -19,7 +19,7 @@ int main(int argc, char **argv)
 
 	// (2) if parallel, prepare.
 	cout << " First read in the parameters from INPUT." << endl;
-	Parallel_Global::read_mpi_parameters(argc,argv);
+	Parallel_Global::read_pal_param(argc,argv);
 
 	// (2) init class input.
 	input.init();

tools/SIAB/SimulatedAnnealing/source/src_parallel/parallel_global.cpp

@@ -25,7 +25,7 @@ void Parallel_Global::myProd(complex<double> *in,complex<double> *inout,int *len
 }
 #endif
 
-void Parallel_Global::read_mpi_parameters(int argc,char **argv)
+void Parallel_Global::read_pal_param(int argc,char **argv)
 {
 #if defined __MPI
 //for test