ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-4/src/UseTheForce/DarkSide/shapes_interface.h
Revision: 1647
Committed: Tue Oct 26 18:03:12 2004 UTC (19 years, 8 months ago) by chrisfen
Content type: text/plain
File size: 1147 byte(s)
Log Message:
Changes to help advance shapes

File Contents

# Content
1 /**
2 * @file shapes_module.h
3 * @author Dan Gezelter
4 * @date 10/19/2004
5 * @version 1.0
6 */
7
8 #ifndef USETHEFORCE_DARKSIDE_SHAPES_INTERFACE_H
9 #define USETHEFORCE_DARKSIDE_SHAPES_INTERFACE_H
10
11 #define __C
12
13 #include "config.h"
14
15 #define makeShape F90_FUNC(makeshape, MAKESHAPE)
16 #define completeShapeFF F90_FUNC(completeshapeff, COMPLETESHAPEFF)
17
18 #define SH_COS 0
19 #define SH_SIN 1
20
21 extern "C" {
22
23 void makeShape(int* nContactFuncs,
24 int* ContactFuncLValue,
25 int* ContactFuncMValue,
26 int* ContactFunctionType,
27 double* ContactFuncCoefficient,
28 int* nRangeFuncs,
29 int* RangeFuncLValue,
30 int* RangeFuncMValue,
31 int* RangeFunctionType,
32 double* RangeFuncCoefficient,
33 int* nStrengthFuncs,
34 int* StrengthFuncLValue,
35 int* StrengthFuncMValue,
36 int* StrengthFunctionType,
37 double* StrengthFuncCoefficient,
38 int* myAtid,
39 int* status);
40
41 void completeShapeFF( int* status);
42 }
43
44 #endif