""

svn path=/trunk/; revision=488

1 files changed, 10 insertions, 1 deletions

diff --git a/externals/grill/vasp/source/opfuns.h b/externals/grill/vasp/source/opfuns.h
index 3a14eb95..51b1fd06 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; post("sq"); } 
+        static V run(T &v,T a) { v = a*a; } 
     	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; }
     };
@@ -133,6 +133,15 @@ namespace VecOp {
     };
 
 
+    template<class T> class f_sumq {
+    public: 
+    	static I rop_opt() { return 2; }
+        static V rop(T &,T ra,OpParam &p) 
+        { 
+	        p.norm.minmax += ra; 
+        } 
+    };
+
     // transcendent
 
     template<class T> class f_powi {