/*-------------------------------------------------------------------- * * grdmath_def.h [Generated by make_math.sh] * * Copyright (c) 1991-2002 by P. Wessel and W. H. F. Smith * See COPYING file for copying and redistribution conditions. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; version 2 of the License. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * Contact info: gmt.soest.hawaii.edu *--------------------------------------------------------------------*/ /* grdmath_def.h is automatically generated by make_math.sh; * Do NOT edit manually! * * For backward compatibility: */ #define ADD 3 #define DIV 25 #define MUL 67 #define RAISE 74 /* (POW) */ #define SUB 88 /* Declare all functions to return int */ void grd_ABS(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=00 */ void grd_ACOS(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=01 */ void grd_ACOSH(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=02 */ void grd_ADD(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=03 */ void grd_AND(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=04 */ void grd_ASIN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=05 */ void grd_ASINH(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=06 */ void grd_ATAN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=07 */ void grd_ATAN2(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=08 */ void grd_ATANH(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=09 */ void grd_BEI(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=10 */ void grd_BER(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=11 */ void grd_CDIST(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=12 */ void grd_CEIL(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=13 */ void grd_CHIDIST(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=14 */ void grd_COS(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=15 */ void grd_COSD(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=16 */ void grd_COSH(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=17 */ void grd_CURV(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=18 */ void grd_D2DX2(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=19 */ void grd_D2DY2(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=20 */ void grd_D2R(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=21 */ void grd_DDX(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=22 */ void grd_DDY(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=23 */ void grd_DILOG(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=24 */ void grd_DIV(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=25 */ void grd_DUP(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=26 */ void grd_ERF(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=27 */ void grd_ERFC(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=28 */ void grd_ERFINV(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=29 */ void grd_EQ(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=30 */ void grd_EXCH(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=31 */ void grd_EXP(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=32 */ void grd_EXTREMA(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=33 */ void grd_FDIST(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=34 */ void grd_FLOOR(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=35 */ void grd_FMOD(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=36 */ void grd_GDIST(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=37 */ void grd_GE(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=38 */ void grd_GT(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=39 */ void grd_HYPOT(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=40 */ void grd_I0(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=41 */ void grd_I1(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=42 */ void grd_IN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=43 */ void grd_INV(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=44 */ void grd_ISNAN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=45 */ void grd_J0(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=46 */ void grd_J1(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=47 */ void grd_JN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=48 */ void grd_K0(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=49 */ void grd_K1(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=50 */ void grd_KN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=51 */ void grd_KEI(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=52 */ void grd_KER(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=53 */ void grd_LE(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=54 */ void grd_LMSSCL(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=55 */ void grd_LOG(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=56 */ void grd_LOG10(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=57 */ void grd_LOG1P(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=58 */ void grd_LOWER(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=59 */ void grd_LT(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=60 */ void grd_MAD(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=61 */ void grd_MAX(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=62 */ void grd_MEAN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=63 */ void grd_MED(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=64 */ void grd_MIN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=65 */ void grd_MODE(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=66 */ void grd_MUL(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=67 */ void grd_NAN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=68 */ void grd_NEG(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=69 */ void grd_NRAND(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=70 */ void grd_OR(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=71 */ void grd_PLM(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=72 */ void grd_POP(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=73 */ void grd_POW(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=74 */ void grd_R2(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=75 */ void grd_R2D(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=76 */ void grd_RAND(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=77 */ void grd_RINT(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=78 */ void grd_SIGN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=79 */ void grd_SIN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=80 */ void grd_SIND(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=81 */ void grd_SINH(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=82 */ void grd_SQRT(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=83 */ void grd_STD(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=84 */ void grd_STEP(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=85 */ void grd_STEPX(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=86 */ void grd_STEPY(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=87 */ void grd_SUB(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=88 */ void grd_TAN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=89 */ void grd_TAND(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=90 */ void grd_TANH(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=91 */ void grd_TDIST(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=92 */ void grd_UPPER(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=93 */ void grd_XOR(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=94 */ void grd_Y0(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=95 */ void grd_Y1(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=96 */ void grd_YLM(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=97 */ void grd_YN(float *stack[], BOOLEAN *constant, double *factor, int last); /* id=98 */ /* Declare operator array */ char *operator[N_OPERATORS] = { "ABS", /* id = 00 */ "ACOS", /* id = 01 */ "ACOSH", /* id = 02 */ "ADD", /* id = 03 */ "AND", /* id = 04 */ "ASIN", /* id = 05 */ "ASINH", /* id = 06 */ "ATAN", /* id = 07 */ "ATAN2", /* id = 08 */ "ATANH", /* id = 09 */ "BEI", /* id = 10 */ "BER", /* id = 11 */ "CDIST", /* id = 12 */ "CEIL", /* id = 13 */ "CHIDIST", /* id = 14 */ "COS", /* id = 15 */ "COSD", /* id = 16 */ "COSH", /* id = 17 */ "CURV", /* id = 18 */ "D2DX2", /* id = 19 */ "D2DY2", /* id = 20 */ "D2R", /* id = 21 */ "DDX", /* id = 22 */ "DDY", /* id = 23 */ "DILOG", /* id = 24 */ "DIV", /* id = 25 */ "DUP", /* id = 26 */ "ERF", /* id = 27 */ "ERFC", /* id = 28 */ "ERFINV", /* id = 29 */ "EQ", /* id = 30 */ "EXCH", /* id = 31 */ "EXP", /* id = 32 */ "EXTREMA", /* id = 33 */ "FDIST", /* id = 34 */ "FLOOR", /* id = 35 */ "FMOD", /* id = 36 */ "GDIST", /* id = 37 */ "GE", /* id = 38 */ "GT", /* id = 39 */ "HYPOT", /* id = 40 */ "I0", /* id = 41 */ "I1", /* id = 42 */ "IN", /* id = 43 */ "INV", /* id = 44 */ "ISNAN", /* id = 45 */ "J0", /* id = 46 */ "J1", /* id = 47 */ "JN", /* id = 48 */ "K0", /* id = 49 */ "K1", /* id = 50 */ "KN", /* id = 51 */ "KEI", /* id = 52 */ "KER", /* id = 53 */ "LE", /* id = 54 */ "LMSSCL", /* id = 55 */ "LOG", /* id = 56 */ "LOG10", /* id = 57 */ "LOG1P", /* id = 58 */ "LOWER", /* id = 59 */ "LT", /* id = 60 */ "MAD", /* id = 61 */ "MAX", /* id = 62 */ "MEAN", /* id = 63 */ "MED", /* id = 64 */ "MIN", /* id = 65 */ "MODE", /* id = 66 */ "MUL", /* id = 67 */ "NAN", /* id = 68 */ "NEG", /* id = 69 */ "NRAND", /* id = 70 */ "OR", /* id = 71 */ "PLM", /* id = 72 */ "POP", /* id = 73 */ "POW", /* id = 74 */ "R2", /* id = 75 */ "R2D", /* id = 76 */ "RAND", /* id = 77 */ "RINT", /* id = 78 */ "SIGN", /* id = 79 */ "SIN", /* id = 80 */ "SIND", /* id = 81 */ "SINH", /* id = 82 */ "SQRT", /* id = 83 */ "STD", /* id = 84 */ "STEP", /* id = 85 */ "STEPX", /* id = 86 */ "STEPY", /* id = 87 */ "SUB", /* id = 88 */ "TAN", /* id = 89 */ "TAND", /* id = 90 */ "TANH", /* id = 91 */ "TDIST", /* id = 92 */ "UPPER", /* id = 93 */ "XOR", /* id = 94 */ "Y0", /* id = 95 */ "Y1", /* id = 96 */ "YLM", /* id = 97 */ "YN" /* id = 98 */ };