From: wolf Date: Wed, 6 Apr 2005 16:09:36 +0000 (+0000) Subject: New test. X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b890224f2dd18f0139c4cd6a2056640de76ff392;p=dealii-svn.git New test. git-svn-id: https://svn.dealii.org/trunk@10391 0785d39b-7218-0410-832d-ea1e28bc413d --- diff --git a/tests/base/full_tensor_08.cc b/tests/base/full_tensor_08.cc new file mode 100644 index 0000000000..0d5095c101 --- /dev/null +++ b/tests/base/full_tensor_08.cc @@ -0,0 +1,72 @@ +//---------------------------- full_tensor_08.cc --------------------------- +// $Id$ +// Version: $Name$ +// +// Copyright (C) 2005 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. +// +//---------------------------- full_tensor_08.cc --------------------------- + +// a stress test using repeated multiplication of tensors + +#include "../tests.h" +#include +#include +#include +#include + + + +template +void test () +{ + const double lambda = 1.5, + mu = 1.7; + Tensor<2,dim> t; + for (unsigned int i=0; i a, b; + for (unsigned int i=0; i (); + test<3> (); + + deallog << "OK" << std::endl; +} diff --git a/tests/results/i686-pc-linux-gnu+gcc3.2/base/full_tensor_08.output b/tests/results/i686-pc-linux-gnu+gcc3.2/base/full_tensor_08.output new file mode 100644 index 0000000000..fb0ed92a99 --- /dev/null +++ b/tests/results/i686-pc-linux-gnu+gcc3.2/base/full_tensor_08.output @@ -0,0 +1,15 @@ + +DEAL::0 0 0.276 +DEAL::0 1 0.442 +DEAL::1 0 0.452 +DEAL::1 1 0.724 +DEAL::0 0 0.111 +DEAL::0 1 0.184 +DEAL::0 2 0.258 +DEAL::1 0 0.181 +DEAL::1 1 0.302 +DEAL::1 2 0.423 +DEAL::2 0 0.252 +DEAL::2 1 0.420 +DEAL::2 2 0.587 +DEAL::OK