diff options
author | Thomas Grill <xovo@users.sourceforge.net> | 2003-03-14 04:36:57 +0000 |
---|---|---|
committer | Thomas Grill <xovo@users.sourceforge.net> | 2003-03-14 04:36:57 +0000 |
commit | 0e1b013af77442311cd3708ec4bdbedb197a28e2 (patch) | |
tree | b78bdeb16ac023ce8cbff7f8319762eb29827729 /externals/grill/vasp/source/ops_gate.cpp | |
parent | aee82b636f867865ba00cb25d2a021f9f4e2aab4 (diff) |
""
svn path=/trunk/; revision=468
Diffstat (limited to 'externals/grill/vasp/source/ops_gate.cpp')
-rw-r--r-- | externals/grill/vasp/source/ops_gate.cpp | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/externals/grill/vasp/source/ops_gate.cpp b/externals/grill/vasp/source/ops_gate.cpp index 3dd15fbb..919ee07f 100644 --- a/externals/grill/vasp/source/ops_gate.cpp +++ b/externals/grill/vasp/source/ops_gate.cpp @@ -17,32 +17,6 @@ WARRANTIES, see the file, "license.txt," in this distribution. // -------------------------------------------------------------- -template<class T> V f_gate(T &rv,T ra,T rb) { rv = fabs(ra) >= rb?ra:0; } -template<class T> V f_igate(T &rv,T ra,T rb) { rv = fabs(ra) <= rb?ra:0; } - -template<class T> V f_rgate(T &rv,T &iv,T ra,T ia,T rb,T) -{ - register const T _abs = sqabs(ra,ia); - - if(_abs >= rb*rb) rv = ra,iv = ia; - else rv = iv = 0; -} - -template<class T> V f_rigate(T &rv,T &iv,T ra,T ia,T rb,T) -{ - register const T _abs = sqabs(ra,ia); - - if(_abs <= rb*rb) rv = ra,iv = ia; - else rv = iv = 0; -} - -BL VecOp::d_gate(OpParam &p) { D__rbin(f_gate<S>,p); } -BL VecOp::d_igate(OpParam &p) { d__rbin(f_igate<S>,p); } -BL VecOp::d_rgate(OpParam &p) { d__cbin(f_rgate<S>,p); } -BL VecOp::d_rigate(OpParam &p) { d__cbin(f_rigate<S>,p); } - - - Vasp *VaspOp::m_gate(OpParam &p,CVasp &src,const Argument &arg,CVasp *dst) { Vasp *ret = NULL; |