unstable-commit

git-svn-id: svn+ssh://svn.sourceforge.jp/svnroot/applied-gslp@181 0e905424-1750-4201-adbd-bf076348bc1c

diff --git a/trunk/noumerov/noumerov b/trunk/noumerov/noumerov
index 87ebe47..c05b214 100755 (executable)
Binary files a/trunk/noumerov/noumerov and b/trunk/noumerov/noumerov differ

diff --git a/trunk/noumerov/noumerov.c b/trunk/noumerov/noumerov.c
index 0a655a7..4703e91 100644 (file)
--- a/trunk/noumerov/noumerov.c
+++ b/trunk/noumerov/noumerov.c
@@ -124,9 +124,9 @@ param *p;
        p->x_0 = exp(C / (gsl_pow_5(p->t_0)));
        p->v_0 = p->x_0 * (C * (-5) / gsl_pow_6(p->t_0));
        i = 0;
-       p->delta = norm_rad(6.0);
+       p->delta = 0.138474818354818;/*norm_rad(6.0);*/
        p->k = sqrt(2 * p->m * p->E) / hbar;
-       p->A = 1E+16;
+       p->A = 2.73547e+31;/*1E+16;*/
        p->r_num = 100;
        p->r = dma_array_new(p->r_num);
        p->u = dma_array_new(p->r_num);

diff --git a/trunk/noumerov/noumerov.o b/trunk/noumerov/noumerov.o
index 843db5f..2c0bab2 100644 (file)
Binary files a/trunk/noumerov/noumerov.o and b/trunk/noumerov/noumerov.o differ

diff --git a/trunk/noumerov/noumerov.plt b/trunk/noumerov/noumerov.plt
index a475546..ea736a6 100644 (file)
--- a/trunk/noumerov/noumerov.plt
+++ b/trunk/noumerov/noumerov.plt
@@ -34,6 +34,8 @@ A=2.73547e+31
 delta=0.138474818354818
 b=2.22818982634668
 
+#A=1E31
+#delta=0.0
 f(x,A,delta,b)=A*sin(b*x-(l*pi/2)+delta);
 g(x,A,delta,b)=A*b*x*(cos(delta)*j1(b*x)-sin(delta)*y1(b*x));
 #g(x,A,delta,b)=A*(cos(delta)*j1_(b*x)-sin(delta)*y1_(b*x));