From: kanschat Date: Tue, 5 Sep 2006 23:14:30 +0000 (+0000) Subject: new test directory for LAPACK functionality X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=5f73f0f9939f08965eeb3e0a7d556a4fe08e2320;p=dealii-svn.git new test directory for LAPACK functionality git-svn-id: https://svn.dealii.org/trunk@13836 0785d39b-7218-0410-832d-ea1e28bc413d --- diff --git a/tests/lapack/Makefile b/tests/lapack/Makefile new file mode 100644 index 0000000000..3a72131993 --- /dev/null +++ b/tests/lapack/Makefile @@ -0,0 +1,39 @@ +############################################################ +# $Id$ +# Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006 by the deal.II authors +############################################################ + +############################################################ +# Include general settings for including DEAL libraries +############################################################ + +include ../Makefile.paths +include $D/common/Make.global_options +debug-mode = on + +libraries = $(lib-lac.g) \ + $(lib-base.g) +libraries_o = $(lib-lac.o) \ + $(lib-base.o) + +default: run-tests + +############################################################ + +tests_x = tridiagonal_ev1 + + +# from above list of regular expressions, generate the real set of +# tests +expand = $(shell echo $(addsuffix .cc,$(1)) \ + | $(PERL) -pi -e 's/\.cc//g;') +tests = $(call expand,$(tests_x)) + +############################################################ + + +include ../Makefile.rules +include Makefile.depend +include Makefile.tests + +.PHONY: default \ No newline at end of file diff --git a/tests/lapack/tridiagonal_ev1.cc b/tests/lapack/tridiagonal_ev1.cc new file mode 100644 index 0000000000..00724939b6 --- /dev/null +++ b/tests/lapack/tridiagonal_ev1.cc @@ -0,0 +1,50 @@ +//-------------------------------------------------------------------- +// $Id$ +// Version: $Name$ +// +// Copyright (C) 2006 by the deal.II authors +// +// This file is subject to QPL and may not be distributed +// without copyright and license information. Please refer +// to the file deal.II/doc/license.html for the text and +// further information on this license. +// +//-------------------------------------------------------------------- + +// Tests compute_eigenvalues() and eigenvalue() of TridiagonalMatrix + +#include "../tests.h" +#include +#include +#include + +#include +#include + + +template +void test_laplacian(unsigned int n) +{ + TridiagonalMatrix M(n, true); + for (unsigned int i=0;i(50); +} diff --git a/tests/lapack/tridiagonal_ev1/cmp/generic b/tests/lapack/tridiagonal_ev1/cmp/generic new file mode 100644 index 0000000000..c8eede55a5 --- /dev/null +++ b/tests/lapack/tridiagonal_ev1/cmp/generic @@ -0,0 +1,10 @@ + +DEAL:Rect::operator= (const FullMatrix&) ok +DEAL:Rect::vmult ok +DEAL:Rect::vmult_add ok +DEAL:Rect::Tvmult ok +DEAL:Rect::Tvmult_add ok +DEAL::Eigenvalues 5 0 +DEAL::Eigenvalues 1 0 +DEAL::Eigenvalues 5 0 +DEAL::Eigenvalues 5 0