Mercurial > repos > public > sbplib

diff +scheme/Schrodinger.m @ 495:b91d23271481 feature/quantumTriangles

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added new penalty parameter to the interface in shrodinger curve
author Ylva Rydin <ylva.rydin@telia.com>
date Fri, 24 Feb 2017 09:04:02 +0100
parents a39fe3bcbd95
children
line wrap: on
line diff
--- a/+scheme/Schrodinger.m	Thu Feb 23 09:32:30 2017 +0100
+++ b/+scheme/Schrodinger.m	Fri Feb 24 09:04:02 2017 +0100
@@ -22,12 +22,15 @@
 
     methods
         % Solving SE in the form u_t = i*u_xx -i*V;
-        function obj = Schrodinger(m,xlim,order,V)
+        function obj = Schrodinger(g,order,V)
             default_arg('V',0);
-            ops = sbp.D2Standard(m,xlim,order);
+            obj.grid = g;
+            m = N(obj.grid);
+            obj.x =  points(obj.grid);
+            ops = sbp.D2Standard(m,{obj.x(1) obj.x(end)},order);
             
-            obj.x=ops.x;
-            obj.h=ops.h;
+           
+            obj.h = ops.h;
             obj.D2 = ops.D2;
             obj.H =  ops.H;
             obj.Hi = ops.HI;