| 1 |
< |
#include <cstdlib> |
| 2 |
< |
#include <cstdio> |
| 3 |
< |
#include <cstring> |
| 1 |
> |
#include <stdlib.h> |
| 2 |
> |
#include <stdio.h> |
| 3 |
> |
#include <string.h> |
| 4 |
|
|
| 5 |
|
#include <iostream> |
| 6 |
|
using namespace std; |
| 30 |
|
double mass; |
| 31 |
|
double lattice_constant; |
| 32 |
|
double eam_drho; // The distance between each of the points indexed by rho. |
| 33 |
+ |
double eam_rcut; // The cutoff radius for eam. |
| 34 |
|
double eam_dr; // The distance between each of the rho points. |
| 35 |
|
int eam_nrho; // Number of points indexed by rho |
| 36 |
|
int eam_nr; // The number of points based on r (Both Phi(r) and Rho(r)). |
| 36 |
– |
double eam_rcut; // The cutoff radius for eam. |
| 37 |
|
int eam_ident; // Atomic number |
| 38 |
|
int ident; |
| 39 |
|
int last; // 0 -> default |
| 76 |
|
void add( atomStruct &info, double *the_eam_rvals, |
| 77 |
|
double *the_eam_rhovals,double *the_eam_Frhovals ){ |
| 78 |
|
|
| 79 |
– |
int i; |
| 80 |
– |
|
| 79 |
|
// check for duplicates |
| 80 |
|
|
| 81 |
|
if( !strcmp( info.name, name ) ){ |
| 162 |
|
char* ffPath_env = "FORCE_PARAM_PATH"; |
| 163 |
|
char* ffPath; |
| 164 |
|
char temp[200]; |
| 167 |
– |
char errMsg[1000]; |
| 165 |
|
|
| 166 |
|
headAtomType = NULL; |
| 167 |
|
currentAtomType = NULL; |
| 179 |
|
// Init the atomStruct mpi type |
| 180 |
|
|
| 181 |
|
atomStruct atomProto; // mpiPrototype |
| 182 |
< |
int atomBC[3] = {15,4,6}; // block counts |
| 182 |
> |
int atomBC[3] = {15,5,5}; // block counts |
| 183 |
|
MPI_Aint atomDspls[3]; // displacements |
| 184 |
|
MPI_Datatype atomMbrTypes[3]; // member mpi types |
| 185 |
|
|
| 272 |
|
MPI_Allreduce( &tempEamRcut, &eamRcut, 1, MPI_DOUBLE, MPI_MAX, |
| 273 |
|
MPI_COMM_WORLD); |
| 274 |
|
#endif //is_mpi |
| 275 |
< |
entry_plug->setRcut(eamRcut); |
| 275 |
> |
entry_plug->setDefaultRcut(eamRcut); |
| 276 |
|
} |
| 277 |
|
|
| 278 |
|
|
| 302 |
|
info.last = 1; // initialize last to have the last set. |
| 303 |
|
// if things go well, last will be set to 0 |
| 304 |
|
|
| 308 |
– |
int i; |
| 305 |
|
int identNum; |
| 306 |
|
double *eam_rvals; // Z of r values |
| 307 |
|
double *eam_rhovals; // rho of r values |
| 449 |
|
int isDipole = 0; |
| 450 |
|
int isSSD = 0; |
| 451 |
|
int isGB = 0; |
| 452 |
< |
int isEAM= 1; |
| 452 |
> |
int isEAM = 1; |
| 453 |
> |
int isCharge = 0; |
| 454 |
|
double dipole = 0.0; |
| 455 |
+ |
double charge = 0.0; |
| 456 |
|
double eamSigma = 0.0; |
| 457 |
|
double eamEpslon = 0.0; |
| 458 |
|
|
| 467 |
|
&isDipole, |
| 468 |
|
&isGB, |
| 469 |
|
&isEAM, |
| 470 |
+ |
&isCharge, |
| 471 |
|
&eamEpslon, |
| 472 |
|
&eamSigma, |
| 473 |
+ |
&charge, |
| 474 |
|
&dipole, |
| 475 |
|
&isError ); |
| 476 |
|
if( isError ){ |
| 535 |
|
|
| 536 |
|
// initialize the atoms |
| 537 |
|
|
| 538 |
– |
|
| 539 |
– |
Atom* thisAtom; |
| 540 |
– |
|
| 538 |
|
for( i=0; i<nAtoms; i++ ){ |
| 539 |
|
|
| 540 |
|
currentAtomType = headAtomType->find( the_atoms[i]->getType() ); |
| 1020 |
|
myEam_rhovals[j+0] = atof( the_token ); |
| 1021 |
|
|
| 1022 |
|
// Value 2 |
| 1023 |
< |
if ( (the_token = strtok( eam_read_buffer, " \n\t,;")) == NULL){ |
| 1023 |
> |
if ( (the_token = strtok( NULL, " \n\t,;")) == NULL){ |
| 1024 |
|
sprintf( painCave.errMsg, |
| 1025 |
|
"Error parseing EAM nrho: line in %s\n", eamPotFile ); |
| 1026 |
|
painCave.isFatal = 1; |
| 1030 |
|
myEam_rhovals[j+1] = atof( the_token ); |
| 1031 |
|
|
| 1032 |
|
// Value 3 |
| 1033 |
< |
if ( (the_token = strtok( eam_read_buffer, " \n\t,;")) == NULL){ |
| 1033 |
> |
if ( (the_token = strtok( NULL, " \n\t,;")) == NULL){ |
| 1034 |
|
sprintf( painCave.errMsg, |
| 1035 |
|
"Error parseing EAM nrho: line in %s\n", eamPotFile ); |
| 1036 |
|
painCave.isFatal = 1; |
| 1040 |
|
myEam_rhovals[j+2] = atof( the_token ); |
| 1041 |
|
|
| 1042 |
|
// Value 4 |
| 1043 |
< |
if ( (the_token = strtok( eam_read_buffer, " \n\t,;")) == NULL){ |
| 1043 |
> |
if ( (the_token = strtok( NULL, " \n\t,;")) == NULL){ |
| 1044 |
|
sprintf( painCave.errMsg, |
| 1045 |
|
"Error parseing EAM nrho: line in %s\n", eamPotFile ); |
| 1046 |
|
painCave.isFatal = 1; |
| 1050 |
|
myEam_rhovals[j+3] = atof( the_token ); |
| 1051 |
|
|
| 1052 |
|
// Value 5 |
| 1053 |
< |
if ( (the_token = strtok( eam_read_buffer, " \n\t,;")) == NULL){ |
| 1053 |
> |
if ( (the_token = strtok( NULL, " \n\t,;")) == NULL){ |
| 1054 |
|
sprintf( painCave.errMsg, |
| 1055 |
|
"Error parseing EAM nrho: line in %s\n", eamPotFile ); |
| 1056 |
|
painCave.isFatal = 1; |
| 1058 |
|
} |
| 1059 |
|
|
| 1060 |
|
myEam_rhovals[j+4] = atof( the_token ); |
| 1061 |
< |
|
| 1061 |
> |
|
| 1062 |
|
} |
| 1063 |
|
*eam_rvals = myEam_rvals; |
| 1064 |
|
*eam_rhovals = myEam_rhovals; |