src/UseTheForce/fSwitchingFunction.h

#ifdef __OPENMD_C
#ifndef __FSWITCHINGFUNCTION
#define __FSWITCHINGFUNCTION

#define NSWITCHTYPES         3
#define LJ_SWITCH            1
#define ELECTROSTATIC_SWITCH 2
#define GROUP_SWITCH         3
#define SPLINE_SEGMENTS      101

#endif
#endif /*__OPENMD_C*/

#ifdef  __FORTRAN90

  INTEGER, PARAMETER:: NSWITCHTYPES         = 3
  INTEGER, PARAMETER:: LJ_SWITCH            = 1
  INTEGER, PARAMETER:: ELECTROSTATIC_SWITCH = 2
  INTEGER, PARAMETER:: GROUP_SWITCH         = 3
  INTEGER, PARAMETER:: SPLINE_SEGMENTS      = 101

#endif
Revision:	1670
Committed:	Fri Jan 27 19:07:19 2012 UTC (13 years, 7 months ago) by chuckv
Content type:	text/plain
File size:	536 byte(s)
Log Message:	Adding experimental branch for calculation of the heatflux based on old version of OpenMD. This will need to be ported to the development branch later.
#	User	Rev	Content
1	gezelter	1390	#ifdef __OPENMD_C
2	gezelter	2	#ifndef __FSWITCHINGFUNCTION
3			#define __FSWITCHINGFUNCTION
4
5			#define NSWITCHTYPES 3
6			#define LJ_SWITCH 1
7			#define ELECTROSTATIC_SWITCH 2
8			#define GROUP_SWITCH 3
9	chrisfen	937	#define SPLINE_SEGMENTS 101
10	gezelter	2
11			#endif
12	gezelter	1390	#endif /__OPENMD_C/
13	gezelter	2
14			#ifdef __FORTRAN90
15
16			INTEGER, PARAMETER:: NSWITCHTYPES = 3
17			INTEGER, PARAMETER:: LJ_SWITCH = 1
18			INTEGER, PARAMETER:: ELECTROSTATIC_SWITCH = 2
19			INTEGER, PARAMETER:: GROUP_SWITCH = 3
20	chrisfen	937	INTEGER, PARAMETER:: SPLINE_SEGMENTS = 101
21	gezelter	2
22			#endif