aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/vasp/source/ops_gate.cpp
diff options
context:
space:
mode:
authorThomas Grill <xovo@users.sourceforge.net>2009-04-01 21:13:09 +0000
committerThomas Grill <xovo@users.sourceforge.net>2009-04-01 21:13:09 +0000
commit0ed7a8b68dd73e2b0473b8127aeca99f3bac9061 (patch)
tree5c67818b38a5cc2f9caa5ca7f8640ca356adf02b /externals/grill/vasp/source/ops_gate.cpp
parentbb4c7f6a245394d09dac9adfb2efb093d3d98452 (diff)
cleaned up grill externals - replaced with svn:externals to svn.grrrr.org/ext/trunk/
svn path=/trunk/; revision=10951
Diffstat (limited to 'externals/grill/vasp/source/ops_gate.cpp')
-rw-r--r--externals/grill/vasp/source/ops_gate.cpp63
1 files changed, 0 insertions, 63 deletions
diff --git a/externals/grill/vasp/source/ops_gate.cpp b/externals/grill/vasp/source/ops_gate.cpp
deleted file mode 100644
index 919ee07f..00000000
--- a/externals/grill/vasp/source/ops_gate.cpp
+++ /dev/null
@@ -1,63 +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.
-
-*/
-
-#include "main.h"
-#include "ops_cmp.h"
-#include "opdefs.h"
-#include "util.h"
-#include <math.h>
-
-// --------------------------------------------------------------
-
-
-Vasp *VaspOp::m_gate(OpParam &p,CVasp &src,const Argument &arg,CVasp *dst)
-{
- Vasp *ret = NULL;
- RVecBlock *vecs = GetRVecs(p.opname,src,dst);
- if(vecs) {
- if(arg.IsList() && arg.GetList().Count() >= 1 && flext::CanbeFloat(arg.GetList()[0]))
- p.rbin.arg = flext::GetAFloat(arg.GetList()[0]);
- else {
- post("%s - argument is invalid -> set to 1",p.opname);
- p.rbin.arg = 1;
- }
-
- ret = DoOp(vecs,VecOp::d_gate,p);
- delete vecs;
- }
- return ret;
-}
-
-
-Vasp *VaspOp::m_rgate(OpParam &p,CVasp &src,const Argument &arg,CVasp *dst)
-{
- Vasp *ret = NULL;
- CVecBlock *vecs = GetCVecs(p.opname,src,dst);
- if(vecs) {
- if(arg.IsList() && arg.GetList().Count() >= 1 && flext::CanbeFloat(arg.GetList()[0]))
- p.cbin.rarg = flext::GetAFloat(arg.GetList()[0]);
- else {
- post("%s - argument is invalid -> set to 1",p.opname);
- p.cbin.rarg = 1;
- }
- p.cbin.iarg = 0; // not used anyway
-
- ret = DoOp(vecs,VecOp::d_rgate,p);
- delete vecs;
- }
- return ret;
-}
-
-VASP_ANYOP("vasp.gate",gate,1,true,VASP_ARG_R(1),"set destination to 0 if source < argument")
-VASP_ANYOP("vasp.rgate",rgate,1,true,VASP_ARG_R(1),"complex radius gate: set destination to 0 if rad(complex source) < rad(complex argument)")
-
-
-// --------------------------------------------------------------
-