1 |
#ifdef __C |
2 |
#ifndef __FFORCEOPTIONS |
3 |
#define __FFORCEOPTIONS |
4 |
|
5 |
#define GEOMETRIC_MIXING_RULE 1 |
6 |
#define ARITHMETIC_MIXING_RULE 2 |
7 |
|
8 |
typedef struct{ |
9 |
int DistanceMixingRule; |
10 |
int EnergyMixingRule; |
11 |
double vdw14scale; |
12 |
double electrostatic14scale; |
13 |
} ForceOptions; |
14 |
|
15 |
|
16 |
#endif |
17 |
#endif /*__C*/ |
18 |
|
19 |
#ifdef __FORTRAN90 |
20 |
|
21 |
INTEGER, PARAMETER:: GEOMETRIC_MIXING_RULE = 1 |
22 |
INTEGER, PARAMETER:: ARITHMETIC_MIXING_RULE = 2 |
23 |
|
24 |
type :: ForceOptions |
25 |
SEQUENCE |
26 |
integer :: DistanceMixingRule |
27 |
integer :: EnergyMixingRule |
28 |
real(kind=dp) :: vdw14scale |
29 |
real(kind=dp) :: electrostatic14scale |
30 |
end type ForceOptions |
31 |
|
32 |
#endif |