ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE/libmdtools/fortranWrapDefines.hpp
Revision: 626
Committed: Wed Jul 16 21:30:56 2003 UTC (20 years, 11 months ago) by mmeineke
File size: 1494 byte(s)
Log Message:
Changed how cutoffs were handled from C. Now notifyCutoffs in Fortran notifies those who need the information of any changes to cutoffs.

File Contents

# Content
1 #ifndef __FORTRAN_WRAP_DEFINES_H__
2 #define __FORTRAN_WRAP_DEFINES_H__
3
4 // this defines some function lists, that are too long to keep track
5 // of everywhere
6
7 #define makeAtypeList ( int* unique_ident, int* isLJ, int* isSticky, int* isDipole, int* isGB, double* lj_epslon, double* lj_sigma, double* dipole_moment, int* status )
8
9 #define initFortranFFList ( int* LJ_mix_policy, int* useReactionField, int *isError )
10
11 #define doForceLoopList ( double* positionArray, double* RotationMatrixArray, double* unitVectorArray_l, double* forceArray, double *torqueArray, double* StressTensor, double* potentialEnergy, short int* doPotentialCalc, short int* doStressCalc, int* isError )
12
13 #define set_sticky_params_List ( double* sticky_w0, double* sticky_v0 )
14
15 #define set_gb_pair_params_List ( double* GB_sigma, double* GB_l2b_ratio, double* GB_eps, double* GB_eps_ratio, double* GB_mu, double* GB_nu )
16
17 #define setFortranSimList ( simtype* the_Info, int* nGlobal, int* nLocal, int* identArray, int* nLocalExcludes, int* excludesLocalArray, int* nGloabalsExcludes, int* excludesGlobalArray, int* molMembershipArray, int* isError )
18
19 #define setFortranBoxList ( double *Hmat, double *HmatI, int* orthoRhombic )
20 // BoxArray is a length 3 array
21
22 #define notifyFortranCutOffList ( double *rCut, double *rList, double *ecr, double *est )
23
24 #ifdef IS_MPI
25
26 #define setFortranMPIlist (mpiSimData* the_mpiPlug, int *nLocal, int* globalIndexArray, int* isError )
27
28 #endif // is_mpi
29
30 #endif // frotranWrapDefines.hpp