scalar_unary_function.sed

高效的c++科学算法库

#!/bin/sh 
#                                              useful for emacs -*- sh -*-
# ########################################################################
# automatically generate functions declarations
# ########################################################################
# $Id: scalar_unary_function.sed,v 1.2 1998/11/06 12:02:22 paubert Exp $
# ########################################################################
# WARNING: do to evaluation by shell you need to \\\\\\\\ (8x) 
# character & and /
# ########################################################################

# ----------------------------------------------------------------------
declare -a     XXname=("FctAbs"      "FctSqrt"        "FctLn" \
                       "FctLog"      "FctLog10"       "FctPow10" \
                       "FctExp"      "FctSin"         "FctCos" \
                       "FctTan"      "FctSinH"        "FctCosH" \
                       "FctTanH"     "FctASinH"       "FctACosH" \
                       "FctATanH"    "FctCeil"        "FctFloor" \
                       "FctRint"     "FctErF"         "FctErFC" \
                       "FctJ0"       "FctJ1"          "FctY0" \
                       "FctY1"       "FctExpM1"       "FctLn1P" \
                       "FctCbRt"     "FctLGamma"      "FctIsNaN" \
                       "FctIsInf"    "FctFinite" )

declare -a XXoperator=("abs"         "sqrt"           "ln" \
                       "log"         "log10"          "pow10" \
                       "exp"         "sin"            "cos" \
                       "tan"         "sinh"           "cosh" \
                       "tanh"        "asinh"          "acosh" \
                       "atanh"       "ceil"           "floor" \
                       "rint"        "erf"            "erfc" \
                       "j0"          "j1"             "y0" \
                       "y1"          "expm1"          "log1p" \
                       "cbrt"        "lgamma"         "isnan" \
                       "isinf"       "finite" )

# ----------------------------------------------------------------------

SRCDIR=`dirname $0`
COMMAND=`basename $0`
RADICAL=${COMMAND%.sed}
OUTFILES=./${RADICAL}.h
ALLFILES=`ls ${SRCDIR}/${RADICAL}.hxx`

# ----------------------------------------------------------------------

. ${SRCDIR}/generate.sh

slprintbegin "${OUTFILES}" "${COMMAND}" "${ALLFILES}"
slsimpleprint "${XXname[*]}" "${XXoperator[*]}" \
              "${RADICAL}" "${OUTFILES}" "${SRCDIR}"
slprintend    "${OUTFILES}" 

# ----------------------------------------------------------------------