source: trunk/include/fortran/RpUnitsFInterface.h @ 115

Last change on this file since 115 was 115, checked in by mmc, 19 years ago

Updated all copyright notices.

File size: 1.6 KB
Line 
1/*
2 * ----------------------------------------------------------------------
3 *  INTERFACE: Fortran Rappture Units Source
4 *
5 * ======================================================================
6 *  AUTHOR:  Derrick Kearney, Purdue University
7 *  Copyright (c) 2004-2005  Purdue Research Foundation
8 *
9 *  See the file "license.terms" for information on usage and
10 *  redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
11 * ======================================================================
12 */
13
14#ifndef _RpUNITS_F_H
15#define _RpUNITS_F_H
16
17#include "RpFortranCommon.h"
18#include "RpUnitsFStubs.h"
19
20#ifdef __cplusplus
21extern "C" {
22#endif
23
24int rp_define_unit(char* unitName, int* basisName, int unitName_len);
25
26int rp_find(char* searchName, int searchName_len);
27
28int rp_make_metric(int* basis);
29
30int rp_get_units(int* unitRefVal, char* retText, int retText_len);
31
32int rp_get_units_name(int* unitRefVal, char* retText, int retText_len);
33
34int rp_get_exponent(int* unitRefVal, double* retExponent);
35
36int rp_get_basis(int* unitRefVal);
37
38int rp_units_convert_dbl (  char* fromVal,
39                            char* toUnitsName,
40                            double* convResult,
41                            int fromVal_len,
42                            int toUnitsName_len );
43
44int rp_units_convert_str (  char* fromVal,
45                            char* toUnitsName,
46                            char* retText,
47                            int fromVal_len,
48                            int toUnitsName_len,
49                            int retText_len     );
50
51int rp_units_add_presets ( char* presetName, int presetName_len);
52
53#ifdef __cplusplus
54}
55#endif
56
57#endif
Note: See TracBrowser for help on using the repository browser.