diff options
author | Thomas Grill <xovo@users.sourceforge.net> | 2003-03-17 04:36:54 +0000 |
---|---|---|
committer | Thomas Grill <xovo@users.sourceforge.net> | 2003-03-17 04:36:54 +0000 |
commit | 3eb7ec9a67e867275b862f9947deafe387012819 (patch) | |
tree | 6fd9d9f37721cdd28197ee5c54a3546060bd58af /externals/grill/vasp/source/ops_cplx.h | |
parent | bc6f43fbe1b22b1c2c63a32372126e0eaaaa08b0 (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.h | 13 |
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) |