From 6a2cccf403ac6045d987eb771b5ac904a33b122a Mon Sep 17 00:00:00 2001
From: Thomas Grill <xovo@users.sourceforge.net>
Date: Wed, 19 Mar 2003 04:36:44 +0000
Subject:  ""

svn path=/trunk/; revision=482
---
 externals/grill/vasp/source/opfuns.h | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'externals/grill/vasp/source/opfuns.h')

diff --git a/externals/grill/vasp/source/opfuns.h b/externals/grill/vasp/source/opfuns.h
index 2228641d..3a14eb95 100644
--- a/externals/grill/vasp/source/opfuns.h
+++ b/externals/grill/vasp/source/opfuns.h
@@ -121,7 +121,7 @@ namespace VecOp {
     template<class T> class f_sqr {
     public: 
     	static I run_opt() { return 3; }
-        static V run(T &v,T a) { v = a*a; } 
+        static V run(T &v,T a) { v = a*a; post("sq"); } 
     	static I cun_opt() { return 1; }
         static V cun(T &rv,T &iv,T ra,T ia) { rv = ra*ra-ia*ia; iv = ra*ia*2; }
     };
@@ -449,8 +449,9 @@ namespace VecOp {
 }
 
 
+
 #define DEFOP(T,FUN,OP,KIND) \
-namespace VecOp { inline BL FUN(OpParam &p) { return D__##KIND<T,f_##OP<T> >(p); } }
+namespace VecOp { inline BL FUN(OpParam &p) { return D__##KIND(T,f_##OP<T>,p); } }
 
 
 #define DEFVEC_R(T,OP) \
-- 
cgit v1.2.1