| 6 | 
  | 
 * redistribute this software in source and binary code form, provided | 
| 7 | 
  | 
 * that the following conditions are met: | 
| 8 | 
  | 
 * | 
| 9 | 
< | 
 * 1. Acknowledgement of the program authors must be made in any | 
| 10 | 
< | 
 *    publication of scientific results based in part on use of the | 
| 11 | 
< | 
 *    program.  An acceptable form of acknowledgement is citation of | 
| 12 | 
< | 
 *    the article in which the program was described (Matthew | 
| 13 | 
< | 
 *    A. Meineke, Charles F. Vardeman II, Teng Lin, Christopher | 
| 14 | 
< | 
 *    J. Fennell and J. Daniel Gezelter, "OOPSE: An Object-Oriented | 
| 15 | 
< | 
 *    Parallel Simulation Engine for Molecular Dynamics," | 
| 16 | 
< | 
 *    J. Comput. Chem. 26, pp. 252-271 (2005)) | 
| 17 | 
< | 
 * | 
| 18 | 
< | 
 * 2. Redistributions of source code must retain the above copyright | 
| 9 | 
> | 
 * 1. Redistributions of source code must retain the above copyright | 
| 10 | 
  | 
 *    notice, this list of conditions and the following disclaimer. | 
| 11 | 
  | 
 * | 
| 12 | 
< | 
 * 3. Redistributions in binary form must reproduce the above copyright | 
| 12 | 
> | 
 * 2. Redistributions in binary form must reproduce the above copyright | 
| 13 | 
  | 
 *    notice, this list of conditions and the following disclaimer in the | 
| 14 | 
  | 
 *    documentation and/or other materials provided with the | 
| 15 | 
  | 
 *    distribution. | 
| 29 | 
  | 
 * University of Notre Dame has been advised of the possibility of | 
| 30 | 
  | 
 * such damages. | 
| 31 | 
  | 
 * | 
| 32 | 
+ | 
 * SUPPORT OPEN SCIENCE!  If you use OpenMD or its source code in your | 
| 33 | 
+ | 
 * research, please cite the appropriate papers when you publish your | 
| 34 | 
+ | 
 * work.  Good starting points are: | 
| 35 | 
+ | 
 *                                                                       | 
| 36 | 
+ | 
 * [1]  Meineke, et al., J. Comp. Chem. 26, 252-271 (2005).              | 
| 37 | 
+ | 
 * [2]  Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006).           | 
| 38 | 
+ | 
 * [3]  Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008).           | 
| 39 | 
+ | 
 * [4] Kuang & Gezelter,  J. Chem. Phys. 133, 164101 (2010). | 
| 40 | 
+ | 
 * [4] , Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011). * | 
| 41 | 
  | 
 * | 
| 42 | 
– | 
 *  Hxy.cpp | 
| 43 | 
– | 
 *  OOPSE-2.0 | 
| 44 | 
– | 
 * | 
| 42 | 
  | 
 *  Created by Xiuquan Sun on 05/09/06. | 
| 43 | 
  | 
 *  @author  Xiuquan Sun  | 
| 44 | 
< | 
 *  @version $Id: Hxy.cpp,v 1.4 2006-05-17 21:51:42 tim Exp $ | 
| 44 | 
> | 
 *  @version $Id$ | 
| 45 | 
  | 
 * | 
| 46 | 
  | 
 */ | 
| 47 | 
  | 
 | 
| 58 | 
  | 
#include<stdlib.h> | 
| 59 | 
  | 
#include<math.h> | 
| 60 | 
  | 
 | 
| 61 | 
< | 
namespace oopse { | 
| 61 | 
> | 
namespace OpenMD { | 
| 62 | 
  | 
   | 
| 63 | 
  | 
  Hxy::Hxy(SimInfo* info, const std::string& filename, const std::string& sele, int nbins_x, int nbins_y, int nrbins) | 
| 64 | 
  | 
    : StaticAnalyser(info, filename), selectionScript_(sele),  evaluator_(info), seleMan_(info), nBinsX_(nbins_x), nBinsY_(nbins_y), nbins_(nrbins){ | 
| 70 | 
  | 
 | 
| 71 | 
  | 
    gridsample_.resize(nBinsX_*nBinsY_); | 
| 72 | 
  | 
    gridZ_.resize(nBinsX_*nBinsY_); | 
| 73 | 
+ | 
    mag.resize(nBinsX_*nBinsY_); | 
| 74 | 
+ | 
    newmag.resize(nBinsX_*nBinsY_);      | 
| 75 | 
  | 
 | 
| 76 | 
  | 
    sum_bin.resize(nbins_); | 
| 77 | 
  | 
    avg_bin.resize(nbins_); | 
| 82 | 
  | 
    errbin_sum_sq.resize(nbins_); | 
| 83 | 
  | 
    errbin_sq.resize(nbins_); | 
| 84 | 
  | 
 | 
| 85 | 
+ | 
    bin.resize(nbins_); | 
| 86 | 
+ | 
    samples.resize(nbins_); | 
| 87 | 
+ | 
 | 
| 88 | 
  | 
    setOutputName(getPrefix(filename) + ".Hxy"); | 
| 89 | 
  | 
  } | 
| 90 | 
  | 
 | 
| 91 | 
+ | 
  Hxy::~Hxy(){ | 
| 92 | 
+ | 
      gridsample_.clear(); | 
| 93 | 
+ | 
      gridZ_.clear(); | 
| 94 | 
+ | 
      sum_bin.clear(); | 
| 95 | 
+ | 
      avg_bin.clear(); | 
| 96 | 
+ | 
      errbin_sum.clear(); | 
| 97 | 
+ | 
      errbin.clear(); | 
| 98 | 
+ | 
      sum_bin_sq.clear(); | 
| 99 | 
+ | 
      avg_bin_sq.clear(); | 
| 100 | 
+ | 
      errbin_sum_sq.clear(); | 
| 101 | 
+ | 
      errbin_sq.clear(); | 
| 102 | 
+ | 
       | 
| 103 | 
+ | 
      for(unsigned int i=0; i < bin.size(); i++) | 
| 104 | 
+ | 
        bin[i].clear(); | 
| 105 | 
+ | 
      for(unsigned int i=0; i < samples.size(); i++) | 
| 106 | 
+ | 
        samples[i].clear(); | 
| 107 | 
+ | 
 | 
| 108 | 
+ | 
      mag.clear(); | 
| 109 | 
+ | 
      newmag.clear(); | 
| 110 | 
+ | 
  } | 
| 111 | 
+ | 
 | 
| 112 | 
  | 
  void Hxy::process() { | 
| 113 | 
  | 
#if defined(HAVE_FFTW_H) || defined(HAVE_DFFTW_H) || defined(HAVE_FFTW3_H) | 
| 114 | 
  | 
    DumpReader reader(info_, dumpFilename_);     | 
| 115 | 
  | 
    int nFrames = reader.getNFrames(); | 
| 116 | 
  | 
    nProcessed_ = nFrames/step_; | 
| 117 | 
  | 
     | 
| 118 | 
< | 
    std::vector<RealType> mag, newmag; | 
| 118 | 
> | 
    for(unsigned int k=0; k < bin.size(); k++) | 
| 119 | 
> | 
      bin[k].resize(nFrames); | 
| 120 | 
> | 
    for(unsigned int k=0; k < samples.size(); k++) | 
| 121 | 
> | 
      samples[k].resize(nFrames); | 
| 122 | 
> | 
 | 
| 123 | 
  | 
    RealType lenX_, lenY_; | 
| 124 | 
  | 
    RealType gridX_, gridY_; | 
| 125 | 
  | 
    RealType halfBoxX_, halfBoxY_; | 
| 126 | 
+ | 
 | 
| 127 | 
  | 
    int binNoX, binNoY; | 
| 128 | 
  | 
    RealType interpsum, value; | 
| 129 | 
  | 
    int ninterp, px, py, newp; | 
| 130 | 
  | 
    int newx, newy, newindex, index; | 
| 131 | 
  | 
    int new_i, new_j, new_index; | 
| 132 | 
+ | 
 | 
| 133 | 
  | 
    RealType freq_x, freq_y, zero_freq_x, zero_freq_y, freq; | 
| 134 | 
< | 
    RealType maxfreqx, maxfreqy, maxfreq, dfreq; | 
| 134 | 
> | 
    RealType maxfreqx, maxfreqy, maxfreq; | 
| 135 | 
> | 
 | 
| 136 | 
  | 
    int whichbin; | 
| 137 | 
  | 
    int nMolecules; | 
| 138 | 
+ | 
 | 
| 139 | 
+ | 
    std::fill(sum_bin.begin(), sum_bin.end(), 0.0); | 
| 140 | 
+ | 
    std::fill(avg_bin.begin(), avg_bin.end(), 0.0); | 
| 141 | 
+ | 
    std::fill(errbin_sum.begin(), errbin_sum.end(), 0.0); | 
| 142 | 
+ | 
    std::fill(errbin.begin(), errbin.end(), 0.0); | 
| 143 | 
+ | 
    std::fill(sum_bin_sq.begin(), sum_bin_sq.end(), 0.0); | 
| 144 | 
+ | 
    std::fill(avg_bin_sq.begin(), avg_bin_sq.end(), 0.0); | 
| 145 | 
+ | 
    std::fill(errbin_sum_sq.begin(), errbin_sum_sq.end(), 0.0); | 
| 146 | 
+ | 
    std::fill(errbin_sq.begin(), errbin_sq.end(), 0.0); | 
| 147 | 
+ | 
     | 
| 148 | 
+ | 
    for(unsigned int i=0; i < bin.size(); i++) | 
| 149 | 
+ | 
      std::fill(bin[i].begin(), bin[i].end(), 0.0); | 
| 150 | 
+ | 
     | 
| 151 | 
+ | 
    for(unsigned int i=0; i < samples.size(); i++) | 
| 152 | 
+ | 
      std::fill(samples[i].begin(), samples[i].end(), 0); | 
| 153 | 
  | 
     | 
| 154 | 
  | 
    for (int istep = 0; istep < nFrames; istep += step_) { | 
| 155 | 
  | 
       | 
| 165 | 
  | 
      fftwnd_plan p; | 
| 166 | 
  | 
#endif | 
| 167 | 
  | 
      fftw_complex *in, *out; | 
| 123 | 
– | 
 | 
| 168 | 
  | 
       | 
| 169 | 
  | 
      in = (fftw_complex*) fftw_malloc(sizeof(fftw_complex) * (nBinsX_*nBinsY_)); | 
| 170 | 
  | 
      out = (fftw_complex*) fftw_malloc(sizeof(fftw_complex) *(nBinsX_*nBinsY_)); | 
| 175 | 
  | 
#else | 
| 176 | 
  | 
      p = fftw2d_create_plan(nBinsX_, nBinsY_, FFTW_FORWARD, FFTW_ESTIMATE); | 
| 177 | 
  | 
#endif | 
| 178 | 
< | 
       | 
| 178 | 
> | 
 | 
| 179 | 
> | 
      std::fill(gridsample_.begin(), gridsample_.end(), 0); | 
| 180 | 
> | 
      std::fill(gridZ_.begin(), gridZ_.end(), 0.0); | 
| 181 | 
> | 
      std::fill(mag.begin(), mag.end(), 0.0); | 
| 182 | 
> | 
      std::fill(newmag.begin(), newmag.end(), 0.0); | 
| 183 | 
> | 
 | 
| 184 | 
  | 
      int i, j;    | 
| 185 | 
  | 
       | 
| 137 | 
– | 
      gridsample_.clear(); | 
| 138 | 
– | 
      gridZ_.clear(); | 
| 139 | 
– | 
      sum_bin.clear(); | 
| 140 | 
– | 
      avg_bin.clear(); | 
| 141 | 
– | 
      errbin_sum.clear(); | 
| 142 | 
– | 
      errbin.clear(); | 
| 143 | 
– | 
      sum_bin_sq.clear(); | 
| 144 | 
– | 
      avg_bin_sq.clear(); | 
| 145 | 
– | 
      errbin_sum_sq.clear(); | 
| 146 | 
– | 
      errbin_sq.clear(); | 
| 147 | 
– | 
       | 
| 148 | 
– | 
      mag.resize(nBinsX_*nBinsY_); | 
| 149 | 
– | 
      newmag.resize(nBinsX_*nBinsY_);      | 
| 150 | 
– | 
      mag.clear(); | 
| 151 | 
– | 
      newmag.clear(); | 
| 152 | 
– | 
       | 
| 186 | 
  | 
      StuntDouble* sd; | 
| 187 | 
  | 
       | 
| 188 | 
  | 
      lenX_ = hmat(0,0); | 
| 191 | 
  | 
      gridX_ = lenX_ /(nBinsX_); | 
| 192 | 
  | 
      gridY_ = lenY_ /(nBinsY_); | 
| 193 | 
  | 
       | 
| 194 | 
< | 
      RealType halfBoxX_ = lenX_ / 2.0;       | 
| 195 | 
< | 
      RealType halfBoxY_ = lenY_ / 2.0;       | 
| 194 | 
> | 
      halfBoxX_ = lenX_ / 2.0;       | 
| 195 | 
> | 
      halfBoxY_ = lenY_ / 2.0;       | 
| 196 | 
  | 
       | 
| 197 | 
  | 
      if (evaluator_.isDynamic()) { | 
| 198 | 
  | 
        seleMan_.setSelectionSet(evaluator_.evaluate()); | 
| 201 | 
  | 
      //wrap the stuntdoubles into a cell      | 
| 202 | 
  | 
      for (sd = seleMan_.beginSelected(i); sd != NULL; sd = seleMan_.nextSelected(i)) { | 
| 203 | 
  | 
        Vector3d pos = sd->getPos(); | 
| 204 | 
< | 
        currentSnapshot_->wrapVector(pos); | 
| 204 | 
> | 
        if (usePeriodicBoundaryConditions_) | 
| 205 | 
> | 
          currentSnapshot_->wrapVector(pos); | 
| 206 | 
  | 
        sd->setPos(pos); | 
| 207 | 
< | 
      } | 
| 207 | 
> | 
      }  | 
| 208 | 
  | 
       | 
| 209 | 
  | 
      //determine which atom belongs to which grid | 
| 210 | 
  | 
      for (sd = seleMan_.beginSelected(i); sd != NULL; sd = seleMan_.nextSelected(i)) { | 
| 211 | 
  | 
        Vector3d pos = sd->getPos(); | 
| 212 | 
  | 
        //int binNo = (pos.z() /deltaR_) - 1; | 
| 213 | 
< | 
        int binNoX = (pos.x() + halfBoxX_) /gridX_;  | 
| 214 | 
< | 
        int binNoY = (pos.y() + halfBoxY_) /gridY_; | 
| 213 | 
> | 
        int binNoX = (int) ((pos.x() + halfBoxX_) / gridX_); | 
| 214 | 
> | 
        int binNoY = (int) ((pos.y() + halfBoxY_) / gridY_); | 
| 215 | 
  | 
        //std::cout << "pos.z = " << pos.z() << " halfBoxZ_ = " << halfBoxZ_ << " deltaR_ = "  << deltaR_ << " binNo = " << binNo << "\n"; | 
| 216 | 
  | 
        gridZ_[binNoX*nBinsY_+binNoY] += pos.z(); | 
| 217 | 
  | 
        gridsample_[binNoX*nBinsY_+binNoY]++; | 
| 220 | 
  | 
      // FFT stuff depends on nx and ny, so delay allocation until we have | 
| 221 | 
  | 
      // that information | 
| 222 | 
  | 
       | 
| 189 | 
– | 
      for (i=0; i< nBinsX_; i++) { | 
| 190 | 
– | 
        for(j=0; j< nBinsY_; j++) { | 
| 191 | 
– | 
          newindex = i*nBinsY_ + j; | 
| 192 | 
– | 
          mag[newindex] = 0.0; | 
| 193 | 
– | 
          newmag[newindex] = 0.0; | 
| 194 | 
– | 
        } | 
| 195 | 
– | 
      } | 
| 196 | 
– | 
       | 
| 223 | 
  | 
      for(i = 0; i < nBinsX_; i++){ | 
| 224 | 
  | 
        for(j = 0; j < nBinsY_; j++){ | 
| 225 | 
  | 
          newindex = i * nBinsY_ + j; | 
| 293 | 
  | 
          c_im(in[newindex]) = 0.0; | 
| 294 | 
  | 
        }  | 
| 295 | 
  | 
      } | 
| 296 | 
+ | 
 | 
| 297 | 
  | 
#ifdef HAVE_FFTW3_H | 
| 298 | 
  | 
      fftw_execute(p); | 
| 299 | 
  | 
#else | 
| 306 | 
  | 
          mag[newindex] = pow(c_re(out[newindex]),2) + pow(c_im(out[newindex]),2); | 
| 307 | 
  | 
        } | 
| 308 | 
  | 
      } | 
| 309 | 
+ | 
 | 
| 310 | 
  | 
#ifdef HAVE_FFTW3_H | 
| 311 | 
  | 
      fftw_destroy_plan(p); | 
| 312 | 
  | 
#else | 
| 386 | 
  | 
       | 
| 387 | 
  | 
      for ( i = 0; i < nbins_; i++) { | 
| 388 | 
  | 
        if ( samples[i][istep] > 0) { | 
| 389 | 
< | 
          bin[i][istep] = 4.0 * sqrt(bin[i][istep] / (RealType)samples[i][istep]) / (RealType)nMolecules; | 
| 389 | 
> | 
          bin[i][istep] = 4.0 * sqrt(bin[i][istep] / (RealType)samples[i][istep]) / (RealType)nBinsX_ / (RealType)nBinsY_; | 
| 390 | 
  | 
        } | 
| 391 | 
  | 
      }     | 
| 364 | 
– | 
       | 
| 392 | 
  | 
    } | 
| 393 | 
< | 
   | 
| 393 | 
> | 
 | 
| 394 | 
  | 
    for (int i = 0; i < nbins_; i++) { | 
| 395 | 
  | 
      for (int j = 0; j < nFrames; j++) { | 
| 396 | 
  | 
        sum_bin[i] += bin[i][j]; | 
| 405 | 
  | 
      errbin[i] = sqrt( errbin_sum[i] / (RealType)nFrames ); | 
| 406 | 
  | 
      errbin_sq[i] = sqrt( errbin_sum_sq[i] / (RealType)nFrames ); | 
| 407 | 
  | 
    } | 
| 408 | 
< | 
     | 
| 408 | 
> | 
 | 
| 409 | 
  | 
    printSpectrum(); | 
| 410 | 
+ | 
 | 
| 411 | 
  | 
#else | 
| 412 | 
  | 
    sprintf(painCave.errMsg, "Hxy: FFTW support was not compiled in!\n"); | 
| 413 | 
  | 
    painCave.isFatal = 1; | 
| 414 | 
  | 
    simError();   | 
| 415 | 
  | 
 | 
| 416 | 
  | 
#endif | 
| 417 | 
< | 
 | 
| 390 | 
< | 
} | 
| 417 | 
> | 
  } | 
| 418 | 
  | 
     | 
| 419 | 
  | 
  void Hxy::printSpectrum() { | 
| 420 | 
  | 
    std::ofstream rdfStream(outputFilename_.c_str()); | 
| 421 | 
  | 
    if (rdfStream.is_open()) { | 
| 422 | 
< | 
       | 
| 423 | 
< | 
      for (int i = 0; i < nbins_; i++) { | 
| 422 | 
> | 
 | 
| 423 | 
> | 
      for (int i = 0; i < nbins_; ++i) { | 
| 424 | 
  | 
        if ( avg_bin[i] > 0 ){ | 
| 425 | 
< | 
          rdfStream << i*dfreq << "\t" | 
| 425 | 
> | 
          rdfStream << (RealType)i * dfreq << "\t" | 
| 426 | 
  | 
                    <<pow(avg_bin[i], 2)<<"\t" | 
| 427 | 
  | 
                    <<errbin_sq[i]<<"\t" | 
| 428 | 
  | 
                    <<avg_bin[i]<<"\t" | 
| 435 | 
  | 
      painCave.isFatal = 1; | 
| 436 | 
  | 
      simError();   | 
| 437 | 
  | 
    } | 
| 438 | 
< | 
     | 
| 438 | 
> | 
 | 
| 439 | 
  | 
    rdfStream.close(); | 
| 440 | 
+ | 
 | 
| 441 | 
  | 
  } | 
| 442 | 
  | 
   | 
| 443 | 
  | 
} |