ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE/libmdtools/fortranWrapDefines.hpp
Revision: 378
Committed: Fri Mar 21 17:42:12 2003 UTC (21 years, 3 months ago) by mmeineke
File size: 1248 byte(s)
Log Message:
This commit was generated by cvs2svn to compensate for changes in r377,
which included commits to RCS files with non-trunk default branches.

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, double* w0, double* v0, double* GB_sigma, double* GB_l2b_ratio, double* GB_eps, double* GB_eps_ratio, double* GB_mu, double* GB_nu, 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 setFortranSimList ( simtype* the_Info, int* nLocal, int* identArray, int* nLocalExcludes, int* excludesLocalArray, int* nGloabalsExcludes, int* excludesGlobalArray, int* isError )
14
15 #define setFortranBoxList ( double *BoxArray )
16 // BoxArray is a length 3 array
17
18 #ifdef IS_MPI
19
20 #define setFortranMPIlist (mpiSimData* the_mpiPlug, int *nLocal, int* globalIndexArray, int* isError )
21
22 #endif // is_mpi
23
24 #endif // frotranWrapDefines.hpp