aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/vasp/source/ops_trnsc.h
diff options
context:
space:
mode:
Diffstat (limited to 'externals/grill/vasp/source/ops_trnsc.h')
-rw-r--r--externals/grill/vasp/source/ops_trnsc.h43
1 files changed, 0 insertions, 43 deletions
diff --git a/externals/grill/vasp/source/ops_trnsc.h b/externals/grill/vasp/source/ops_trnsc.h
deleted file mode 100644
index 408aeb9b..00000000
--- a/externals/grill/vasp/source/ops_trnsc.h
+++ /dev/null
@@ -1,43 +0,0 @@
-/*
-
-VASP modular - vector assembling signal processor / objects for Max/MSP and PD
-
-Copyright (c) 2002 Thomas Grill (xovo@gmx.net)
-For information on usage and redistribution, and for a DISCLAIMER OF ALL
-WARRANTIES, see the file, "license.txt," in this distribution.
-
-*/
-
-#ifndef __VASP_OPS_TRNSC_H
-#define __VASP_OPS_TRNSC_H
-
-#include "opfuns.h"
-
-// Transcendent math functions
-
-DEFOP(S,d_pow,pow,rbin)
-DEFOP(S,d_rpow,pow,cbin)
-
-DEFOP(S,d_sqrt,sqrt,run)
-DEFOP(S,d_ssqrt,ssqrt,run)
-
-DEFOP(S,d_exp,exp,run)
-DEFOP(S,d_log,log,run)
-
-namespace VaspOp {
- inline Vasp *m_pow(OpParam &p,CVasp &src,const Argument &arg,CVasp *dst = NULL) { return m_rbin(p,src,arg,dst,VecOp::d_pow); } // power
-
- Vasp *m_rpow(OpParam &p,CVasp &src,const Argument &arg,CVasp *dst = NULL); // radius power (with each two channels)
-
- inline Vasp *m_sqrt(OpParam &p,CVasp &src,CVasp *dst = NULL) { return m_run(p,src,dst,VecOp::d_sqrt); } // square root (from abs value)
- inline Vasp *m_ssqrt(OpParam &p,CVasp &src,CVasp *dst = NULL) { return m_run(p,src,dst,VecOp::d_ssqrt); } // square root (from abs value)
-
- inline Vasp *m_exp(OpParam &p,CVasp &src,CVasp *dst = NULL) { return m_run(p,src,dst,VecOp::d_exp); } // exponential function
- inline Vasp *m_log(OpParam &p,CVasp &src,CVasp *dst = NULL) { return m_run(p,src,dst,VecOp::d_log); } // natural logarithm
-
-// inline Vasp *m_cexp(OpParam &p,CVasp &src,CVasp *dst = NULL) { return m_cun(p,src,dst,VecOp::d_cexp); } // complex exponential function
-// inline Vasp *m_clog(OpParam &p,CVasp &src,CVasp *dst = NULL) { return m_cun(p,src,dst,VecOp::d_clog); } // complex logarithm (how about branches?)
-
-}
-
-#endif