rpc/fts/compressor/LrAmCompressor.h

#ifndef RPC_LR_POST_AM_COMPRESSOR_H
#define RPC_LR_POST_AM_COMPRESSOR_H
 
/*
* PSCF - Polymer Self-Consistent Field Theory
*
* Copyright 2016 - 2022, The Regents of the University of Minnesota
* Distributed under the terms of the GNU General Public License.
*/
 
#include "Compressor.h"
#include <prdc/cpu/RField.h>
#include <prdc/cpu/RFieldDft.h>
#include <pscf/iterator/AmIteratorTmpl.h>                 
#include <rpc/fts/compressor/intra/IntraCorrelation.h> 
 
namespace Pscf {
namespace Rpc
{
 
   template <int D> class System;
   template <int D> class IntraCorrelation;
 
   using namespace Util;
   using namespace Pscf::Prdc::Cpu;
 
   template <int D>
   class LrAmCompressor 
         : public AmIteratorTmpl<Compressor<D>, DArray<double> >
   {
 
   public:
 
      LrAmCompressor(System<D>& system);
 
      ~LrAmCompressor();
 
      void readParameters(std::istream& in);
 
      void setup(bool isContinuation);      
      
      
      int compress();    
      
      void outputTimers(std::ostream& out);
 
      void clearTimers();
      
      // Inherited public member functions
      using AmIteratorTmpl<Compressor<D>, DArray<double> >::setClassName;
      
   protected:
  
      // Inherited protected members 
      using ParamComposite::readOptional;
      using Compressor<D>::mdeCounter_;
 
   private:
   
      int itr_;
      
      DArray< RField<D> > w0_;  
 
      bool isAllocated_;
      
      DArray< RField<D> > wFieldTmp_;
      
      DArray<double> newBasis_;
      
      RField<D> resid_;
      
      RFieldDft<D> residK_;
     
      RField<D> intraCorrelationK_;
      
      IntVec<D> kMeshDimensions_;
 
      void setEqual(DArray<double>& a, DArray<double> const & b);
 
      double dotProduct(DArray<double> const & a, DArray<double> const & b);
 
      double maxAbs(DArray<double> const & hist);
 
      void updateBasis(RingBuffer<DArray<double> > & basis, 
                       RingBuffer<DArray<double> > const & hists);
 
      void addHistories(DArray<double>& trial, 
                        RingBuffer<DArray<double> > const & basis, 
                        DArray<double> coeffs, 
                        int nHist);
 
      void addPredictedError(DArray<double>& fieldTrial, 
                             DArray<double> const & resTrial, 
                             double lambda);
 
      bool hasInitialGuess();
     
      int nElements();
 
      void getCurrent(DArray<double>& curr);
 
      void evaluate();
 
      void getResidual(DArray<double>& resid);
 
      void update(DArray<double>& newGuess);
 
      void outputToLog();
      
      double computeLambda(double r);;
      
      IntraCorrelation<D> intraCorrelation_;
    
      // Inherited private members 
      using Compressor<D>::system;
 
   };
   
   #ifndef RPC_LR_POST_AM_COMPRESSOR_TPP
   // Suppress implicit instantiation
   extern template class LrAmCompressor<1>;
   extern template class LrAmCompressor<2>;
   extern template class LrAmCompressor<3>;
   #endif
 
} // namespace Rpc
} // namespace Pscf
#endif