ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-4/src/UseTheForce/DarkSide/sticky_interface.h
Revision: 1617
Committed: Wed Oct 20 20:46:20 2004 UTC (19 years, 10 months ago) by chuckv
Content type: text/plain
File size: 862 byte(s)
Log Message:
Fortran/C++ interface de-obfuscation project (It is a very long story)

File Contents

# Content
1 /*
2 * sticky_pair_module_interface.h
3 * oopse
4 *
5 * Created by Charles Vardeman II on 10/19/04.
6 * Copyright 2004 University of Notre Dame. All rights reserved.
7 *
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 extern "C" {
16
17 void F90_FUNC_(set_sticky_params, SET_STICKY_PARAMS)( double* sticky_w0,
18 double* sticky_v0,
19 double* sticky_v0p,
20 double* sticky_rl,
21 double* sticky_ru,
22 double* sticky_rlp,
23 double* sticky_rup );
24
25 }
26
27 #endif