1 |
– |
|
1 |
|
#ifndef USETHEFORCE_DARKSIDE_EAM_INTERFACE_H |
2 |
|
#define USETHEFORCE_DARKSIDE_EAM_INTERFACE_H |
3 |
|
|
4 |
|
#define __C |
5 |
+ |
|
6 |
|
#include "config.h" |
7 |
+ |
|
8 |
+ |
#define newEAMtype F90_FUNC(neweamtype, NEWEAMTYPE) |
9 |
+ |
|
10 |
|
extern "C"{ |
8 |
– |
void F90_FUNC(neweamtype, NEWEAMTYPE)( double* lattice_constant, |
9 |
– |
int* eam_nrho, |
10 |
– |
double* eam_drho, |
11 |
– |
int* eam_nr, |
12 |
– |
double* eam_dr, |
13 |
– |
double* eam_rcut, |
14 |
– |
double* eam_rvals, |
15 |
– |
double* eam_rhovals, |
16 |
– |
double* eam_Frhovals, |
17 |
– |
int* eam_ident, |
18 |
– |
int* status ); |
19 |
– |
|
20 |
– |
|
11 |
|
void newEAMtype( double* lattice_constant, |
12 |
|
int* eam_nrho, |
13 |
|
double* eam_drho, |
18 |
|
double* eam_rhovals, |
19 |
|
double* eam_Frhovals, |
20 |
|
int* eam_ident, |
21 |
< |
int* status ){ |
22 |
< |
|
33 |
< |
F90_FUNC(neweamtype, NEWEAMTYPE)(lattice_constant, |
34 |
< |
eam_nrho, |
35 |
< |
eam_drho, |
36 |
< |
eam_nr, |
37 |
< |
eam_dr, |
38 |
< |
eam_rcut, |
39 |
< |
eam_rvals, |
40 |
< |
eam_rhovals, |
41 |
< |
eam_Frhovals, |
42 |
< |
eam_ident, |
43 |
< |
status ); |
44 |
< |
} |
45 |
< |
} |
21 |
> |
int* status ); |
22 |
> |
} |
23 |
|
#endif |