rpg/fts/compressor/AmCompressor.h

#ifndef RPG_AM_COMPRESSOR_H
#define RPG_AM_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 argument
#include <prdc/cuda/types.h>               // base class argument
#include <pscf/cuda/DeviceArray.h>         // base class argument
#include <pscf/iterator/AmIteratorTmpl.h>  // base class template
 
#include <prdc/cuda/RField.h>              // member
#include <util/containers/DArray.h>        // member
 
#include <iostream>
 
namespace Pscf {
namespace Rpg {
 
   // Forward declaration
   template <int D> class System;
 
   using namespace Util;
   using namespace Pscf::Prdc;
   using namespace Pscf::Prdc::Cuda;

   template <int D>
   class AmCompressor 
     : public AmIteratorTmpl< Compressor<D>, DeviceArray<cudaReal> >
   {
 
   public:

      using VectorT = DeviceArray<cudaReal>;

      AmCompressor(System<D>& system);

      ~AmCompressor();

      void readParameters(std::istream& in);

      void setup(bool isContinuation);

      int compress();
 
      #if 0
      double computeLambda(double r);
      #endif

      int mdeCounter();

      void outputTimers(std::ostream& out) const;

      void clearTimers();
 
   private:

      int counter_;

      DArray< RField<D> > w0_;

      bool isAllocated_;

      DArray< RField<D> > wFieldTmp_;
 
      // Private virtual functions that interact with parent System

      int nElements() override;

      bool hasInitialGuess() override;

      void getCurrent(VectorT& curr) override;

      void evaluate() override;

      void getResidual(VectorT& resid) override;

      void update(VectorT& newGuess) override;

      void outputToLog() override;
 
      // Private virtual functions for vector math

      void setEqual(VectorT& a,
                    VectorT const & b) override;

      double dotProduct(VectorT const & a,
                        VectorT const & b) override;

      double maxAbs(VectorT const & hist) override;

      void subVV(VectorT& a, 
                 VectorT const & b, 
       VectorT const & c) override;

      void addEqVc(VectorT& a, 
         VectorT const & b, 
         double c) override;
 
      // Inherited protected member
      using Compressor<D>::system;

      using Base =  AmIteratorTmpl< Compressor<D>, VectorT >;
 
   };
 
   // Explicit instantiation declarations
   extern template class AmCompressor<1>;
   extern template class AmCompressor<2>;
   extern template class AmCompressor<3>;
 
} // namespace Rpg
} // namespace Pscf
#endif