[src] Q Fehler behoben

diff --git a/src/slpRectangle.cpp b/src/slpRectangle.cpp
index 5df8e7ea7daaafa448822e2ec6e336c3c1f51b72..911684772c93c60346426dfec9d092c9b67d8f3f 100644 (file)
--- a/src/slpRectangle.cpp
+++ b/src/slpRectangle.cpp
@@ -466,9 +466,11 @@ double calcParIntQ(double b, double d, double t, double v, double d1, double d2,
                                        sol += f_A(b * gauss_nodes[quad][i].n,\r
                                                        d * gauss_nodes[quad][j].n,\r
                                                        (t) * gauss_nodes[quad][k].n + d1,\r
-                                                       (v) * gauss_nodes[quad][l].n + d2, d3)\r
-                                                       * gauss_nodes[quad][i].w * gauss_nodes[quad][j].w\r
-                                                       * gauss_nodes[quad][k].w * gauss_nodes[quad][l].w;\r
+                                                       (v) * gauss_nodes[quad][l].n + d2, d3) * b\r
+                                                       * gauss_nodes[quad][i].w * d\r
+                                                       * gauss_nodes[quad][j].w * t\r
+                                                       * gauss_nodes[quad][k].w * v\r
+                                                       * gauss_nodes[quad][l].w;\r
                                }\r
                        }\r
                }\r

diff --git a/src/test_sol.m b/src/test_sol.m
index 9168d75f57d4c9190ec6429c901ad9fa5bd60087..d79f14f2b1cd3b5f8d32426f8ee339fb0aa138b2 100644 (file)
--- a/src/test_sol.m
+++ b/src/test_sol.m
@@ -9,10 +9,10 @@ mex mex_build_V.cpp slpRectangle.cpp CFLAGS="\$CFLAGS -fopenmp" CXXFLAGS="\$CXXF
 % Test ausführen
 
 %Anzahl der Schritte
-steps = 2;
+steps = 5;
 
 %Art der Berechnungen
-type = [1];
+type = [1 2];
 zeta = [1];