| 1 |
gezelter |
115 |
/* |
| 2 |
|
|
* sticky_pair_module_interface.h |
| 3 |
|
|
* oopse |
| 4 |
|
|
* |
| 5 |
|
|
* Created by Charles Vardeman II on 10/19/04. |
| 6 |
chuckv |
124 |
* Copyright 2004 University of Notre Dame. All rights reserved. |
| 7 |
gezelter |
115 |
* |
| 8 |
|
|
*/ |
| 9 |
|
|
#ifndef USETHEFORCE_DARKSIDE_STICKY_INTERFACE_H |
| 10 |
|
|
#define USETHEFORCE_DARKSIDE_STICKY_INTERFACE_H |
| 11 |
|
|
|
| 12 |
|
|
#define __C |
| 13 |
|
|
#include "config.h" |
| 14 |
|
|
|
| 15 |
gezelter |
128 |
#define makeStickyType F90_FUNC(makestickytype, MAKESTICKYTYPE) |
| 16 |
|
|
|
| 17 |
chuckv |
124 |
extern "C" { |
| 18 |
gezelter |
115 |
|
| 19 |
gezelter |
128 |
void makeStickyType( double* sticky_w0, |
| 20 |
|
|
double* sticky_v0, |
| 21 |
|
|
double* sticky_v0p, |
| 22 |
|
|
double* sticky_rl, |
| 23 |
|
|
double* sticky_ru, |
| 24 |
|
|
double* sticky_rlp, |
| 25 |
|
|
double* sticky_rup ); |
| 26 |
gezelter |
115 |
} |
| 27 |
|
|
|
| 28 |
|
|
#endif |