UseTheForce/DarkSide/gb_interface.h

/*
 *  gb_interface.h
 *  oopse
 *
 *  Created by Charles Vardeman II on 10/19/04.
 *  Copyright 2004 __MyCompanyName__. All rights reserved.
 *
 */
#ifndef USETHEFORCE_DARKSIDE_GB_INTERFACE_H
#define USETHEFORCE_DARKSIDE_GB_INTERFACE_H

#define __C

#include "config.h"

#define newGayBerneType F90_FUNC_(set_gb_pair_params, SET_GB_PAIR_PARAMS)

extern "C"{
  void newGayBerneType( double* GB_sigma,
                        double* GB_l2b_ratio,
                        double* GB_eps,
                        double* GB_eps_ratio,
                        double* GB_mu,
                        double* GB_nu );
}
#endif
Revision:	124
Committed:	Wed Oct 20 20:46:20 2004 UTC (20 years, 6 months ago) by chuckv
Content type:	text/plain
File size:	622 byte(s)
Log Message:	Fortran/C++ interface de-obfuscation project (It is a very long story)
#	User	Rev	Content
1	gezelter	115	/*
2	chuckv	124	* gb_interface.h
3	gezelter	115	* oopse
4			*
5			* Created by Charles Vardeman II on 10/19/04.
6			* Copyright 2004 __MyCompanyName__. All rights reserved.
7			*
8			*/
9			#ifndef USETHEFORCE_DARKSIDE_GB_INTERFACE_H
10			#define USETHEFORCE_DARKSIDE_GB_INTERFACE_H
11
12			#define __C
13	chuckv	124
14	gezelter	115	#include "config.h"
15	chuckv	124
16			#define newGayBerneType F90_FUNC_(set_gb_pair_params, SET_GB_PAIR_PARAMS)
17
18	gezelter	115	extern "C"{
19	chuckv	124	void newGayBerneType( double* GB_sigma,
20			double* GB_l2b_ratio,
21			double* GB_eps,
22			double* GB_eps_ratio,
23			double* GB_mu,
24			double* GB_nu );
25	gezelter	115	}
26			#endif