ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/branches/new_design/OOPSE-4/src/UseTheForce/DarkSide/shapes_interface.h
Revision: 1683
Committed: Thu Oct 28 22:34:02 2004 UTC (19 years, 8 months ago)
Content type: text/plain
File size: 1148 byte(s)
Log Message:
This commit was manufactured by cvs2svn to create branch 'new_design'.

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
19 #define SH_COS 0
20 #define SH_SIN 1
21
22 extern "C" {
23
24 void makeShape(int* nContactFuncs,
25 int* ContactFuncLValue,
26 int* ContactFuncMValue,
27 int* ContactFunctionType,
28 double* ContactFuncCoefficient,
29 int* nRangeFuncs,
30 int* RangeFuncLValue,
31 int* RangeFuncMValue,
32 int* RangeFunctionType,
33 double* RangeFuncCoefficient,
34 int* nStrengthFuncs,
35 int* StrengthFuncLValue,
36 int* StrengthFuncMValue,
37 int* StrengthFunctionType,
38 double* StrengthFuncCoefficient,
39 int* myAtid,
40 int* status);
41
42 void completeShapeFF( int* status);
43 }
44
45 #endif