aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/vasp/source/ops_cplx.h
diff options
context:
space:
mode:
authorThomas Grill <xovo@users.sourceforge.net>2003-03-17 04:36:54 +0000
committerThomas Grill <xovo@users.sourceforge.net>2003-03-17 04:36:54 +0000
commit3eb7ec9a67e867275b862f9947deafe387012819 (patch)
tree6fd9d9f37721cdd28197ee5c54a3546060bd58af /externals/grill/vasp/source/ops_cplx.h
parentbc6f43fbe1b22b1c2c63a32372126e0eaaaa08b0 (diff)
""
svn path=/trunk/; revision=476
Diffstat (limited to 'externals/grill/vasp/source/ops_cplx.h')
-rw-r--r--externals/grill/vasp/source/ops_cplx.h13
1 files changed, 6 insertions, 7 deletions
diff --git a/externals/grill/vasp/source/ops_cplx.h b/externals/grill/vasp/source/ops_cplx.h
index c77de675..696aae55 100644
--- a/externals/grill/vasp/source/ops_cplx.h
+++ b/externals/grill/vasp/source/ops_cplx.h
@@ -15,16 +15,15 @@ WARRANTIES, see the file, "license.txt," in this distribution.
// Complex functions
-namespace VecOp {
- inline BL d_polar(OpParam &p) { return d__cun<S,f_polar<S> >(p); }
- inline BL d_rect(OpParam &p) { return d__cun<S,f_rect<S> >(p); }
+DEFOP(S,d_polar,polar,cun)
+DEFOP(S,d_rect,rect,cun)
- inline BL d_radd(OpParam &p) { return d__cbin<S,f_radd<S> >(p); }
+DEFOP(S,d_radd,radd,cbin)
- inline BL d_cnorm(OpParam &p) { return d__cun<S,f_norm<S> >(p); }
+DEFOP(S,d_cnorm,norm,cun)
+
+DEFOP(S,d_cconj,conj,cun)
- inline BL d_cconj(OpParam &p) { return D__cun<S,f_conj<S> >(p); }
-}
namespace VaspOp {
inline Vasp *m_polar(OpParam &p,CVasp &src,CVasp *dst = NULL) { return m_cun(p,src,dst,VecOp::d_polar); } // cartesian -> polar (each two)