sim-r.hpp

   1 #ifndef SIM_HPP
   2 #define SIM_HPP
   3
   4 #include <gsl/gsl_rng.h>
   5 #include <complex>
   6 #include <math.h>
   7
   8 #include "latlib/neigh.h"
   9
  10 class sim : public o815::sim {
  11 public:
  12   struct siteconf {
  13     complex<double> phi;
  14   };
  15   sim(o815 *_O815);
  16   siteconf* conf;
  17   unsigned int LSIZE2;
  18
  19 private:
  20   void _makeSweep();
  21   void _newParas();
  22   gsl_rng* rangsl;
  23   neigh *nb;
  24   void updatePhi (const int& x);
  25   double M;
  26 };
  27
  28
  29
  30 sim::sim(o815 *_O815) : o815::sim( _O815,
  31                                    sizeof(siteconf)*
  32                                    (_O815->comargs.lsize[0]*_O815->comargs.lsize[1]) ) {
  33   conf = (siteconf*)confMem;
  34
  35   rangsl = gsl_rng_alloc(gsl_rng_ranlxs0);
  36   gsl_rng_set(rangsl, time(NULL));
  37
  38   LSIZE2 = _O815->comargs.lsize[0] * _O815->comargs.lsize[1];
  39
  40   nb = new neigh(2, _O815->comargs.lsize[0], _O815->comargs.lsize[1]);
  41 }
  42
  43 void sim::updatePhi (const int& x)
  44 {
  45   const double r = gsl_rng_uniform(rangsl);
  46   const double theta = gsl_rng_uniform(rangsl) * 2*M_PI;
  47   complex<double> V=0;
  48
  49   for (int nu=0; nu<4; nu++)
  50     V += conf[ (*nb)[x*4+nu] ].phi;
  51
  52   conf[x].phi = sqrt(std::log( 1./(1-r) )) / sqrt(M)
  53     * complex<double>( cos(theta), sin(theta) )
  54     + V / M;
  55 }
  56
  57 void sim::_makeSweep() {
  58   for (int ix=0; ix<LSIZE2; ix++)
  59     updatePhi(ix);
  60 }
  61
  62 void sim::_newParas() {
  63   M = pow( (*O815->paraQ)["mass"], 2 ) + 4;
  64   *log << "SIM: Resetting fields." << endl << flush;
  65   memset(conf, 0, sizeof(siteconf)*LSIZE2);
  66 }
  67
  68 #endif