rpg/fts/compressor/LrCompressor.h

#ifndef RPG_LR_COMPRESSOR_H
#define RPG_LR_COMPRESSOR_H
 
/*
* PSCF - Polymer Self-Consistent Field
*
* Copyright 2015 - 2025, The Regents of the University of Minnesota
* Distributed under the terms of the GNU General Public License.
*/
 
#include "Compressor.h"                           // base class
#include <prdc/cuda/RField.h>                     // member
#include <prdc/cuda/RFieldDft.h>                  // member
#include <util/containers/DArray.h>               // member
#include <util/misc/Timer.h>                      // member
#include <rpg/fts/compressor/IntraCorrelation.h>  // member
#include <iostream>
 
namespace Pscf {
namespace Rpg {
 
   template <int D> class System;
 
   using namespace Util;
   using namespace Pscf::Prdc;
   using namespace Pscf::Prdc::Cuda;

   template <int D>
   class LrCompressor : public Compressor<D>
   {
 
   public:

      LrCompressor(System<D>& system);

      ~LrCompressor();

      void readParameters(std::istream& in);

      void setup();

      int compress();
 
      double subspacePercent(){return 0;};
 
      double correctionPercent(){return 0;};

      void outputTimers(std::ostream& out) const;
 
      void clearTimers();
 
   protected:
 
      // Inherited protected members
      using Compressor<D>::mdeCounter_;
      using ParamComposite::read;
      using ParamComposite::readOptional;
      using ParamComposite::setClassName;
 
   private:
 
      // Error tolerance.
      double epsilon_;
 
      // Current iteration counter.
      int itr_;
 
      // Maximum number of iterations.
      int maxItr_;
 
      // Total iteration counter.
      int totalItr_;
 
      // Verbosity level.
      int verbose_;
 
      // Type of error criterion used to test convergence
      std::string errorType_;
 
      // Timers for analyzing performance.
      Timer timerTotal_;
      Timer timerMDE_;

      int kSize_;

      IntraCorrelation<D> intra_;
      
      IntVec<D> kMeshDimensions_;
      
      RField<D> intraCorrelationK_;

      RField<D> resid_;

      RFieldDft<D> residK_;
      
      DArray< RField<D> > wFieldTmp_;

      bool isIntraCalculated_;
      
      bool isAllocated_;
 
      // Private functions
      
      void getResidual();

      void updateWFields();

      double computeError(int verbose);

      double maxAbs(RField<D> const & a);

      double dotProduct(RField<D> const & a, RField<D> const & b);

      double norm(RField<D> const & a);

      void outputToLog();
      
      // Private inherited members
      using Compressor<D>::system;
 
   };
   
   // Explicit instantiation declarations
   extern template class LrCompressor<1>;
   extern template class LrCompressor<2>;
   extern template class LrCompressor<3>;
 
} // namespace Rpg
} // namespace Pscf
#endif