~ubuntu-branches/debian/sid/lammps/sid

« back to all changes in this revision

Viewing changes to src/USER-QMMM/fix_qmmm.cpp

  • Committer: Package Import Robot
  • Author(s): Anton Gladky
  • Date: 2015-04-29 23:44:49 UTC
  • mfrom: (5.1.3 experimental)
  • Revision ID: package-import@ubuntu.com-20150429234449-mbhy9utku6hp6oq8
Tags: 0~20150313.gitfa668e1-1
Upload into unstable.

Show diffs side-by-side

added added

removed removed

Lines of Context:
395
395
  }
396
396
 
397
397
  if (qmmm_role == QMMM_ROLE_MASTER) {
398
 
    MPI_Status status;
399
 
    MPI_Request request;
400
398
    int i,tmp;
401
399
 
402
400
    /* check and potentially grow local communication buffers. */
408
406
    struct commdata *buf = static_cast<struct commdata *>(comm_buf);    
409
407
 
410
408
    if (comm->me == 0) {
 
409
      MPI_Status status;
 
410
      MPI_Request request;
411
411
      // insert local atoms into comm buffer
412
412
      for (i=0; i<nlocal; ++i) {
413
413
        if (mask[i] & groupbit) {
642
642
    taginthash_init(qm_hash, num_qm);
643
643
    qm_idmap = (void *)qm_hash;
644
644
 
645
 
    MPI_Status status;
646
 
    MPI_Request request;
647
645
    const int nlocal = atom->nlocal;
648
646
    int i, j, tmp, ndata, qm_ntag;
649
647
    tagint *tag = atom->tag;
651
649
    struct commdata *buf = static_cast<struct commdata *>(comm_buf);
652
650
 
653
651
    if (me == 0) {
 
652
      MPI_Status status;
 
653
      MPI_Request request;
654
654
      tagint *qm_taglist = new tagint[num_qm];
655
655
      qm_ntag = 0;
656
656
      for (i=0; i < nlocal; ++i) {