unstable-commit

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

diff --git a/trunk/noumerov/noumerov b/trunk/noumerov/noumerov
index 3379d66..147948b 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 e2e10e2..aa5d2f0 100644 (file)
--- a/trunk/noumerov/noumerov.c
+++ b/trunk/noumerov/noumerov.c
@@ -367,13 +367,6 @@ void param_print(p)
 param *p;
 {
        const double hbar = GSL_CONST_MKSA_PLANCKS_CONSTANT_HBAR;
-       /*
-       DEBUG_PRINT2("% e", GSL_DBL_EPSILON);
-       DEBUG_PRINT2("% e", DBL_MIN);
-       DEBUG_PRINT2("% e", (2.0 * p->m / (hbar * hbar)));
-       DEBUG_PRINT2("% e", (p->m * p->omega * p->omega));
-       DEBUG_PRINT2("% e", (hbar * p->omega));
-       */
        DEBUG_PRINT2("% e", p->m);
        DEBUG_PRINT2("% d", p->l);
        DEBUG_PRINT2("% e", p->E);
@@ -416,6 +409,13 @@ param *p;
           dma_array_print(p->u);
           dma_array_print(p->dudr);
         */
+       /*
+       DEBUG_PRINT2("% e", GSL_DBL_EPSILON);
+       DEBUG_PRINT2("% e", DBL_MIN);
+       DEBUG_PRINT2("% e", (2.0 * p->m / (hbar * hbar)));
+       DEBUG_PRINT2("% e", (p->m * p->omega * p->omega));
+       DEBUG_PRINT2("% e", (hbar * p->omega));
+       */
        return;
 }
 

diff --git a/trunk/noumerov/noumerov.o b/trunk/noumerov/noumerov.o
index f8d142c..687ce11 100644 (file)
Binary files a/trunk/noumerov/noumerov.o and b/trunk/noumerov/noumerov.o differ