X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=check%2Fcheck_lsolve.cpp;h=9f2a1ae562a518e9ce9559c0bd896cded38912dc;hp=80bfdc1283ec4863b4eb5a2e74fa2b8f468707f7;hb=781107fc309db9eadc2e0540d35d9813da0afd4d;hpb=ae3044935ddf13dd325f6e11770357b99bbe6095 diff --git a/check/check_lsolve.cpp b/check/check_lsolve.cpp index 80bfdc12..9f2a1ae5 100644 --- a/check/check_lsolve.cpp +++ b/check/check_lsolve.cpp @@ -1,10 +1,11 @@ /** @file check_lsolve.cpp * * These test routines do some simple checks on solving linear systems of - * symbolic equations. */ + * symbolic equations. They are a well-tried resource for cross-checking + * the underlying symbolic manipulations. */ /* - * GiNaC Copyright (C) 1999-2000 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2004 Johannes Gutenberg University Mainz, Germany * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -22,6 +23,7 @@ */ #include "checks.h" +#include static unsigned check_matrix_solve(unsigned m, unsigned n, unsigned p, unsigned degree) @@ -49,9 +51,9 @@ static unsigned check_matrix_solve(unsigned m, unsigned n, unsigned p, matrix X(n,p); for (unsigned i=0; i a; vector x; for (unsigned i=0; i