From 470c86b4afb829163f98dca3bf5b0617aa5ca34e Mon Sep 17 00:00:00 2001 From: Wolfgang Bangerth Date: Wed, 6 Apr 2005 16:09:36 +0000 Subject: [PATCH] New test. git-svn-id: https://svn.dealii.org/trunk@10391 0785d39b-7218-0410-832d-ea1e28bc413d --- tests/base/full_tensor_08.cc | 72 ++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) create mode 100644 tests/base/full_tensor_08.cc 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; +} -- 2.39.5