UseTheForce/DarkSide/atype_interface.h

/*
 *  atype_module_interface.h
 *  oopse
 *
 *  Created by Charles Vardeman II on 10/19/04.
 *  Copyright 2004 __MyCompanyName__. All rights reserved.
 *
 */

#ifndef USETHEFORCE_DARKSIDE_ATYPE_INTERFACE_H
#define USETHEFORCE_DARKSIDE_ATYPE_INTERFACE_H

#define __C

#include "config.h"

#define makeAtype F90_FUNC(makeatype, MAKEATYPE)

extern "C" {
  void makeAtype(int* unique_ident, 
                 int* isLJ, 
                 int* isSticky,
                 int* isDipole, 
                 int* isGB, 
                 int* isEAM,
                 int* isCharge,
                 double* lj_epslon, 
                 double* lj_sigma, 
                 double* charge,
                 double* dipole_moment, 
                 int* status );
}  
#endif
Revision:	1617
Committed:	Wed Oct 20 20:46:20 2004 UTC (19 years, 8 months ago) by chuckv
Content type:	text/plain
File size:	763 byte(s)
Log Message:	Fortran/C++ interface de-obfuscation project (It is a very long story)
#	Content
1	/*
2	* atype_module_interface.h
3	* oopse
4	*
5	* Created by Charles Vardeman II on 10/19/04.
6	* Copyright 2004 __MyCompanyName__. All rights reserved.
7	*
8	*/
9
10	#ifndef USETHEFORCE_DARKSIDE_ATYPE_INTERFACE_H
11	#define USETHEFORCE_DARKSIDE_ATYPE_INTERFACE_H
12
13	#define __C
14
15	#include "config.h"
16
17	#define makeAtype F90_FUNC(makeatype, MAKEATYPE)
18
19	extern "C" {
20	void makeAtype(int* unique_ident,
21	int* isLJ,
22	int* isSticky,
23	int* isDipole,
24	int* isGB,
25	int* isEAM,
26	int* isCharge,
27	double* lj_epslon,
28	double* lj_sigma,
29	double* charge,
30	double* dipole_moment,
31	int* status );
32	}
33	#endif