change reduce

Author: A-006

source/source_esolver/esolver_of.cpp

@@ -539,7 +539,7 @@ double ESolver_OF::cal_energy()
                                                 this->pw_rho->nrxx,
                                                 this->dV_);
     }
-    Parallel_Reduce::reduce_all(pseudopot_energy);
+    Parallel_Reduce::reduce_pool(pseudopot_energy);
     this->pelec->f_en.ekinetic = kinetic_energy;
     this->pelec->f_en.e_local_pp = pseudopot_energy;
     this->pelec->f_en.etot += kinetic_energy + pseudopot_energy;

source/source_estate/elecstate_energy_terms.cpp

@@ -45,10 +45,13 @@ double ElecState::get_local_pp_energy()
     for (int is = 0; is < PARAM.inp.nspin; ++is)
     {
         local_pseudopot_energy
-            += BlasConnector::dot(this->charge->rhopw->nrxx, this->pot->get_fixed_v(), 1, this->charge->rho[is], 1)
-               * this->charge->rhopw->omega / this->charge->rhopw->nxyz;
+            += BlasConnector::dot(this->charge->rhopw->nrxx, 
+                                  this->pot->get_fixed_v(), 
+                                  1, 
+                                  this->charge->rho[is], 1)
+                                  * this->charge->rhopw->omega / this->charge->rhopw->nxyz;
     }
-    Parallel_Reduce::reduce_all(local_pseudopot_energy);
+    Parallel_Reduce::reduce_pool(local_pseudopot_energy);
     return local_pseudopot_energy;
 }