#include "f2c.h"
#include <glib.h>
Go to the source code of this file.
Defines | |
#define | imach ((integer *)&equiv_0) |
#define | output ((integer *)&equiv_0 + 3) |
#define | log10 ((integer *)&equiv_4 + 4) |
#define | large ((integer *)&equiv_4 + 1) |
#define | rmach ((real *)&equiv_4) |
#define | small ((integer *)&equiv_4) |
#define | diver ((integer *)&equiv_4 + 3) |
#define | right ((integer *)&equiv_4 + 2) |
#define | log10 ((integer *)&equiv_4 + 8) |
#define | dmach ((doublereal *)&equiv_4) |
#define | large ((integer *)&equiv_4 + 2) |
#define | small ((integer *)&equiv_4) |
#define | diver ((integer *)&equiv_4 + 6) |
#define | right ((integer *)&equiv_4 + 4) |
Functions | |
integer | old_i1mach_ (integer *i__) |
doublereal | r1mach_ (integer *i__) |
doublereal | old_d1mach_ (integer *i__) |
int | fdump_ (void) |
#define diver ((integer *)&equiv_4 + 6) |
#define diver ((integer *)&equiv_4 + 3) |
#define dmach ((doublereal *)&equiv_4) |
Referenced by old_d1mach_().
#define imach ((integer *)&equiv_0) |
Referenced by old_i1mach_().
#define large ((integer *)&equiv_4 + 2) |
#define large ((integer *)&equiv_4 + 1) |
#define log10 ((integer *)&equiv_4 + 8) |
#define log10 ((integer *)&equiv_4 + 4) |
Referenced by convert_accel_to_mercalli(), main(), sakura_reynolds_number(), and sakura_settling_velocity().
#define output ((integer *)&equiv_0 + 3) |
Referenced by old_i1mach_().
#define right ((integer *)&equiv_4 + 4) |
#define right ((integer *)&equiv_4 + 2) |
Referenced by get_suspended_sediment_box().
#define small ((integer *)&equiv_4) |
#define small ((integer *)&equiv_4) |
doublereal old_d1mach_ | ( | integer * | i__ | ) |
doublereal r1mach_ | ( | integer * | i__ | ) |