source: branches/r9/lib/rappture/RpUtilsFInterface.h @ 4873

Last change on this file since 4873 was 3362, checked in by ldelgass, 11 years ago

Merge nanovis2 branch to trunk

File size: 894 bytes
Line 
1/*
2 * ----------------------------------------------------------------------
3 *  INTERFACE: Fortran Rappture Utils Header
4 *
5 * ======================================================================
6 *  AUTHOR:  Derrick S. Kearney, Purdue University
7 *  Copyright (c) 2004-2012  HUBzero Foundation, LLC
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 _RAPPTURE_UTILS_F_H
15#define _RAPPTURE_UTILS_F_H
16
17#ifdef __cplusplus
18    #include "RpUtilsFStubs.h"
19    extern "C" {
20#endif // ifdef __cplusplus
21
22int rp_utils_progress ( int* percent, char* text, int text_len );
23
24
25/**********************************************************/
26
27#ifdef __cplusplus
28    }
29#endif // ifdef __cplusplus
30
31#endif // ifndef _RAPPTURE_UTILS_F_H
Note: See TracBrowser for help on using the repository browser.