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; |
32 |
|
double mass; |
33 |
|
double epslon; |
34 |
|
double sigma; |
35 |
+ |
double charge; |
36 |
|
double dipole; |
37 |
|
double w0; |
38 |
|
double v0; |
39 |
+ |
double v0p; |
40 |
+ |
double rl; |
41 |
+ |
double ru; |
42 |
+ |
double rlp; |
43 |
+ |
double rup; |
44 |
|
int isSSD; |
45 |
+ |
int isCharge; |
46 |
|
int isDipole; |
47 |
|
int ident; |
48 |
|
int last; // 0 -> default |
116 |
|
void printMe( void ){ |
117 |
|
|
118 |
|
std::cerr << "LinkedAtype " << name << ": ident = " << ident << "\n"; |
119 |
< |
if( next != NULL ) next->printMe(); |
119 |
> |
// if( next != NULL ) next->printMe(); |
120 |
|
|
121 |
|
} |
122 |
|
|
145 |
|
next->dipole = info.dipole; |
146 |
|
next->w0 = info.w0; |
147 |
|
next->v0 = info.v0; |
148 |
+ |
next->v0p = info.v0p; |
149 |
+ |
next->rl = info.rl; |
150 |
+ |
next->ru = info.ru; |
151 |
+ |
next->rlp = info.rlp; |
152 |
+ |
next->rup = info.rup; |
153 |
|
next->ident = info.ident; |
154 |
|
} |
155 |
|
} |
166 |
|
info.dipole = dipole; |
167 |
|
info.w0 = w0; |
168 |
|
info.v0 = v0; |
169 |
+ |
info.v0p = v0p; |
170 |
+ |
info.rl = rl; |
171 |
+ |
info.ru = ru; |
172 |
+ |
info.rlp = rlp; |
173 |
+ |
info.rup = rup; |
174 |
|
info.ident = ident; |
175 |
|
info.last = 0; |
176 |
|
} |
187 |
|
double dipole; |
188 |
|
double w0; |
189 |
|
double v0; |
190 |
+ |
double v0p; |
191 |
+ |
double rl; |
192 |
+ |
double ru; |
193 |
+ |
double rlp; |
194 |
+ |
double rup; |
195 |
|
int ident; |
196 |
|
LinkedAtomType* next; |
197 |
|
}; |
456 |
|
char* ffPath_env = "FORCE_PARAM_PATH"; |
457 |
|
char* ffPath; |
458 |
|
char temp[200]; |
437 |
– |
char errMsg[1000]; |
459 |
|
|
460 |
|
headAtomType = NULL; |
461 |
|
currentAtomType = NULL; |
477 |
|
// Init the atomStruct mpi type |
478 |
|
|
479 |
|
atomStruct atomProto; // mpiPrototype |
480 |
< |
int atomBC[3] = {15,6,4}; // block counts |
480 |
> |
int atomBC[3] = {15,12,5}; // block counts |
481 |
|
MPI_Aint atomDspls[3]; // displacements |
482 |
|
MPI_Datatype atomMbrTypes[3]; // member mpi types |
483 |
|
|
659 |
|
|
660 |
|
void DUFF::readParams( void ){ |
661 |
|
|
641 |
– |
int i, a, b, c, d; |
662 |
|
int identNum; |
643 |
– |
char* atomA; |
644 |
– |
char* atomB; |
645 |
– |
char* atomC; |
646 |
– |
char* atomD; |
663 |
|
|
664 |
|
atomStruct atomInfo; |
665 |
|
bondStruct bondInfo; |
731 |
|
while( currentAtomType != NULL ){ |
732 |
|
currentAtomType->duplicate( atomInfo ); |
733 |
|
|
718 |
– |
|
719 |
– |
|
734 |
|
sendFrcStruct( &atomInfo, mpiAtomStructType ); |
735 |
|
|
736 |
|
sprintf( checkPointMsg, |
748 |
|
else{ |
749 |
|
|
750 |
|
// listen for node 0 to send out the force params |
751 |
< |
|
751 |
> |
|
752 |
|
MPIcheckPoint(); |
753 |
|
|
754 |
|
headAtomType = new LinkedAtomType; |
755 |
< |
recieveFrcStruct( &atomInfo, mpiAtomStructType ); |
755 |
> |
receiveFrcStruct( &atomInfo, mpiAtomStructType ); |
756 |
|
|
757 |
|
while( !atomInfo.last ){ |
758 |
|
|
745 |
– |
|
746 |
– |
|
759 |
|
headAtomType->add( atomInfo ); |
760 |
|
|
761 |
|
MPIcheckPoint(); |
762 |
|
|
763 |
< |
recieveFrcStruct( &atomInfo, mpiAtomStructType ); |
763 |
> |
receiveFrcStruct( &atomInfo, mpiAtomStructType ); |
764 |
|
} |
765 |
|
} |
766 |
|
|
776 |
|
|
777 |
|
int isGB = 0; |
778 |
|
int isLJ = 1; |
779 |
< |
double GB_dummy = 0.0; |
780 |
< |
|
781 |
< |
|
779 |
> |
int isEAM =0; |
780 |
> |
int isCharge = 0; |
781 |
> |
double charge=0.0; |
782 |
> |
|
783 |
|
currentAtomType = headAtomType->next;; |
784 |
|
while( currentAtomType != NULL ){ |
785 |
|
|
786 |
< |
if(currentAtomType->isDipole) entry_plug->useDipole = 1; |
786 |
> |
if(currentAtomType->isDipole) entry_plug->useDipoles = 1; |
787 |
|
if(currentAtomType->isSSD) { |
788 |
|
entry_plug->useSticky = 1; |
789 |
< |
set_sticky_params( &(currentAtomType->w0), &(currentAtomType->v0)); |
789 |
> |
set_sticky_params( &(currentAtomType->w0), &(currentAtomType->v0), |
790 |
> |
&(currentAtomType->v0p), |
791 |
> |
&(currentAtomType->rl), &(currentAtomType->ru), |
792 |
> |
&(currentAtomType->rlp), &(currentAtomType->rup)); |
793 |
|
} |
794 |
|
|
795 |
|
if( currentAtomType->name[0] != '\0' ){ |
799 |
|
&(currentAtomType->isSSD), |
800 |
|
&(currentAtomType->isDipole), |
801 |
|
&isGB, |
802 |
+ |
&isEAM, |
803 |
+ |
&isCharge, |
804 |
|
&(currentAtomType->epslon), |
805 |
|
&(currentAtomType->sigma), |
806 |
+ |
&charge, |
807 |
|
&(currentAtomType->dipole), |
808 |
|
&isError ); |
809 |
|
if( isError ){ |
894 |
|
MPIcheckPoint(); |
895 |
|
|
896 |
|
headBondType = new LinkedBondType; |
897 |
< |
recieveFrcStruct( &bondInfo, mpiBondStructType ); |
897 |
> |
receiveFrcStruct( &bondInfo, mpiBondStructType ); |
898 |
|
while( !bondInfo.last ){ |
899 |
|
|
900 |
|
headBondType->add( bondInfo ); |
901 |
< |
recieveFrcStruct( &bondInfo, mpiBondStructType ); |
901 |
> |
receiveFrcStruct( &bondInfo, mpiBondStructType ); |
902 |
|
} |
903 |
|
} |
904 |
|
|
922 |
|
fastForward( "BendTypes", "initializeBends" ); |
923 |
|
|
924 |
|
// we are now at the bendTypes section |
925 |
< |
|
925 |
> |
|
926 |
|
eof_test = fgets( readLine, sizeof(readLine), frcFile ); |
927 |
|
lineNum++; |
928 |
|
|
977 |
|
MPIcheckPoint(); |
978 |
|
|
979 |
|
headBendType = new LinkedBendType; |
980 |
< |
recieveFrcStruct( &bendInfo, mpiBendStructType ); |
980 |
> |
receiveFrcStruct( &bendInfo, mpiBendStructType ); |
981 |
|
while( !bendInfo.last ){ |
982 |
|
|
983 |
|
headBendType->add( bendInfo ); |
984 |
< |
recieveFrcStruct( &bendInfo, mpiBendStructType ); |
984 |
> |
receiveFrcStruct( &bendInfo, mpiBendStructType ); |
985 |
|
} |
986 |
|
} |
987 |
|
|
1062 |
|
MPIcheckPoint(); |
1063 |
|
|
1064 |
|
headTorsionType = new LinkedTorsionType; |
1065 |
< |
recieveFrcStruct( &torsionInfo, mpiTorsionStructType ); |
1065 |
> |
receiveFrcStruct( &torsionInfo, mpiTorsionStructType ); |
1066 |
|
while( !torsionInfo.last ){ |
1067 |
|
|
1068 |
|
headTorsionType->add( torsionInfo ); |
1069 |
< |
recieveFrcStruct( &torsionInfo, mpiTorsionStructType ); |
1069 |
> |
receiveFrcStruct( &torsionInfo, mpiTorsionStructType ); |
1070 |
|
} |
1071 |
|
} |
1072 |
|
|
1120 |
|
// initialize the atoms |
1121 |
|
|
1122 |
|
DirectionalAtom* dAtom; |
1123 |
+ |
double ji[3]; |
1124 |
|
|
1125 |
|
for(int i=0; i<nAtoms; i++ ){ |
1126 |
|
|
1134 |
|
} |
1135 |
|
|
1136 |
|
the_atoms[i]->setMass( currentAtomType->mass ); |
1117 |
– |
the_atoms[i]->setEpslon( currentAtomType->epslon ); |
1118 |
– |
the_atoms[i]->setSigma( currentAtomType->sigma ); |
1137 |
|
the_atoms[i]->setIdent( currentAtomType->ident ); |
1120 |
– |
the_atoms[i]->setLJ(); |
1138 |
|
|
1139 |
|
if( bigSigma < currentAtomType->sigma ) bigSigma = currentAtomType->sigma; |
1140 |
|
|
1142 |
|
if( the_atoms[i]->isDirectional() ){ |
1143 |
|
|
1144 |
|
dAtom = (DirectionalAtom *) the_atoms[i]; |
1128 |
– |
dAtom->setMu( currentAtomType->dipole ); |
1145 |
|
dAtom->setHasDipole( 1 ); |
1146 |
< |
dAtom->setJx( 0.0 ); |
1147 |
< |
dAtom->setJy( 0.0 ); |
1148 |
< |
dAtom->setJz( 0.0 ); |
1146 |
> |
|
1147 |
> |
ji[0] = 0.0; |
1148 |
> |
ji[1] = 0.0; |
1149 |
> |
ji[2] = 0.0; |
1150 |
> |
|
1151 |
> |
dAtom->setJ( ji ); |
1152 |
|
|
1153 |
|
if(!strcmp("SSD",the_atoms[i]->getType())){ |
1154 |
|
dAtom->setI( waterI ); |
1136 |
– |
dAtom->setSSD( 1 ); |
1155 |
|
} |
1156 |
|
else if(!strcmp("HEAD",the_atoms[i]->getType())){ |
1157 |
|
dAtom->setI( headI ); |
1140 |
– |
dAtom->setSSD( 0 ); |
1158 |
|
} |
1159 |
|
else{ |
1160 |
|
sprintf(painCave.errMsg, |
1178 |
|
else{ |
1179 |
|
if( the_atoms[i]->isDirectional() ){ |
1180 |
|
sprintf( painCave.errMsg, |
1181 |
< |
"DUFF error: Atom \"%s\" was given a standard" |
1181 |
> |
"DUFF error: Atom \"%s\" was given a standard " |
1182 |
|
"orientation in the BASS file, yet it is not a dipole.\n", |
1183 |
|
currentAtomType->name); |
1184 |
|
painCave.isFatal = 1; |
1302 |
|
} |
1303 |
|
|
1304 |
|
gBend = new GhostBend( *the_atoms[a], |
1305 |
< |
*the_atoms[b] ); |
1305 |
> |
*the_atoms[b]); |
1306 |
> |
|
1307 |
|
gBend->setConstants( currentBendType->k1, |
1308 |
|
currentBendType->k2, |
1309 |
|
currentBendType->k3, |
1319 |
|
currentBendType->k3, |
1320 |
|
currentBendType->t0 ); |
1321 |
|
bendArray[i] = qBend; |
1322 |
< |
} |
1322 |
> |
} |
1323 |
|
} |
1324 |
|
} |
1325 |
|
} |
1512 |
|
} |
1513 |
|
|
1514 |
|
info.v0 = atof( the_token ); |
1515 |
+ |
if( ( the_token = strtok( NULL, " \n\t,;" ) ) == NULL ){ |
1516 |
+ |
sprintf( painCave.errMsg, |
1517 |
+ |
"Error parseing AtomTypes: line %d\n", lineNum ); |
1518 |
+ |
painCave.isFatal = 1; |
1519 |
+ |
simError(); |
1520 |
+ |
} |
1521 |
+ |
|
1522 |
+ |
info.v0p = atof( the_token ); |
1523 |
+ |
|
1524 |
+ |
if( ( the_token = strtok( NULL, " \n\t,;" ) ) == NULL ){ |
1525 |
+ |
sprintf( painCave.errMsg, |
1526 |
+ |
"Error parseing AtomTypes: line %d\n", lineNum ); |
1527 |
+ |
painCave.isFatal = 1; |
1528 |
+ |
simError(); |
1529 |
+ |
} |
1530 |
+ |
|
1531 |
+ |
info.rl = atof( the_token ); |
1532 |
+ |
|
1533 |
+ |
if( ( the_token = strtok( NULL, " \n\t,;" ) ) == NULL ){ |
1534 |
+ |
sprintf( painCave.errMsg, |
1535 |
+ |
"Error parseing AtomTypes: line %d\n", lineNum ); |
1536 |
+ |
painCave.isFatal = 1; |
1537 |
+ |
simError(); |
1538 |
+ |
} |
1539 |
+ |
|
1540 |
+ |
info.ru = atof( the_token ); |
1541 |
+ |
|
1542 |
+ |
if( ( the_token = strtok( NULL, " \n\t,;" ) ) == NULL ){ |
1543 |
+ |
sprintf( painCave.errMsg, |
1544 |
+ |
"Error parseing AtomTypes: line %d\n", lineNum ); |
1545 |
+ |
painCave.isFatal = 1; |
1546 |
+ |
simError(); |
1547 |
+ |
} |
1548 |
+ |
|
1549 |
+ |
info.rlp = atof( the_token ); |
1550 |
+ |
|
1551 |
+ |
if( ( the_token = strtok( NULL, " \n\t,;" ) ) == NULL ){ |
1552 |
+ |
sprintf( painCave.errMsg, |
1553 |
+ |
"Error parseing AtomTypes: line %d\n", lineNum ); |
1554 |
+ |
painCave.isFatal = 1; |
1555 |
+ |
simError(); |
1556 |
+ |
} |
1557 |
+ |
|
1558 |
+ |
info.rup = atof( the_token ); |
1559 |
|
} |
1560 |
< |
else info.v0 = info.w0 = 0.0; |
1560 |
> |
else info.v0 = info.w0 = info.v0p = info.rl = info.ru = info.rlp = info.rup = 0.0; |
1561 |
|
|
1562 |
|
return 1; |
1563 |
|
} |
1603 |
|
} |
1604 |
|
|
1605 |
|
info.d0 = atof( the_token ); |
1606 |
+ |
|
1607 |
+ |
info.k0=0.0; |
1608 |
|
} |
1609 |
|
else if( !strcmp( bondType, "harmonic" ) ){ |
1610 |
|
info.type = HARMONIC_BOND; |
1631 |
|
else{ |
1632 |
|
sprintf( painCave.errMsg, |
1633 |
|
"Unknown DUFF bond type \"%s\" at line %d\n", |
1634 |
< |
info.type, |
1634 |
> |
bondType, |
1635 |
|
lineNum ); |
1636 |
|
painCave.isFatal = 1; |
1637 |
|
simError(); |