From 8d0e25900b37853b18b8210b96548ef350c99546 Mon Sep 17 00:00:00 2001
From: wolf <wolf@0785d39b-7218-0410-832d-ea1e28bc413d>
Date: Wed, 12 Sep 2001 11:18:49 +0000
Subject: [PATCH] Add new example prog.

git-svn-id: https://svn.dealii.org/trunk@4964 0785d39b-7218-0410-832d-ea1e28bc413d
---
 deal.II/examples/step-10/Makefile   | 159 ++++++++++++++++++++++++++++
 deal.II/examples/step-10/step-10.cc | 127 ++++++++++++++++++++++
 2 files changed, 286 insertions(+)
 create mode 100644 deal.II/examples/step-10/Makefile
 create mode 100644 deal.II/examples/step-10/step-10.cc

diff --git a/deal.II/examples/step-10/Makefile b/deal.II/examples/step-10/Makefile
new file mode 100644
index 0000000000..c02ef0f148
--- /dev/null
+++ b/deal.II/examples/step-10/Makefile
@@ -0,0 +1,159 @@
+# $Id$
+
+
+# For the small projects Makefile, you basically need to fill in only
+# four fields.
+#
+# The first is the name of the application. It is assumed that the
+# application name is the same as the base file name of the single C++
+# file from which the application is generated.
+target = $(basename $(shell echo step-*.cc))
+
+# The second field determines whether you want to run your program in
+# debug or optimized mode. The latter is significantly faster, but no
+# run-time checking of parameters and internal states is performed, so
+# you should set this value to `on' while you develop your program,
+# and to `off' when running production computations.
+debug-mode = on
+
+
+# As third field, we need to give the path to the top-level deal.II
+# directory. You need to adjust this to your needs. Since this path is
+# probably the most often needed one in the Makefile internals, it is
+# designated by a single-character variable, since that can be
+# reference using $D only, i.e. without the parentheses that are
+# required for most other parameters, as e.g. in $(target).
+D = ../../
+
+
+# The last field specifies the names of data and other files that
+# shall be deleted when calling `make clean'. Object and backup files,
+# executables and the like are removed anyway. Here, we give a list of
+# files in the various output formats that deal.II supports.
+clean-up-files = *gmv *gnuplot *gpl *eps *pov
+
+
+
+
+#
+#
+# Usually, you will not need to change something beyond this point.
+#
+#
+# The next statement tell the `make' program where to find the
+# deal.II top level directory and to include the file with the global
+# settings
+include $D/common/Make.global_options
+
+
+# Since the whole project consists of only one file, we need not
+# consider difficult dependencies. We only have to declare the
+# libraries which we want to link to the object file, and there need
+# to be two sets of libraries: one for the debug mode version of the
+# application and one for the optimized mode. Here we have selected
+# the versions for 2d. Note that the order in which the libraries are
+# given here is important and that your applications won't link
+# properly if they are given in another order.
+#
+# You may need to augment the lists of libraries when compiling your
+# program for other dimensions, or when using third party libraries
+libs.g   = $(lib-deal2-2d.g) \
+	   $(lib-lac.g)      \
+           $(lib-base.g)
+libs.o   = $(lib-deal2-2d.o) \
+	   $(lib-lac.o)      \
+           $(lib-base.o)
+
+
+# We now use the variable defined above which switch between debug and
+# optimized mode to select the correct compiler flags and the set of
+# libraries to link with. Included in the list of libraries is the
+# name of the object file which we will produce from the single C++
+# file. Note that by default we use the extension .go for object files
+# compiled in debug mode and .o for object files in optimized mode.
+ifeq ($(debug-mode),on)
+  libraries = $(target).go $(libs.g)
+  flags     = $(CXXFLAGS.g)
+else
+  libraries = $(target).o $(libs.o)
+  flags     = $(CXXFLAGS.o)
+endif
+
+
+# Now comes the first production rule: how to link the single object
+# file produced from the single C++ file into the executable. Since
+# this is the first rule in the Makefile, it is the one `make' selects
+# if you call it without arguments.
+$(target) : $(libraries)
+	@echo ============================ Linking $@
+	@$(CXX) -o $@ $^ $(LIBS) $(LDFLAGS)
+
+
+# To make running the application somewhat independent of the actual
+# program name, we usually declare a rule `run' which simply runs the
+# program. You can then run it by typing `make run'. This is also
+# useful if you want to call the executable with arguments which do
+# not change frequently. You may then want to add them to the
+# following rule:
+run: $(target)
+	@echo ============================ Running $<
+	@./$(target)
+
+
+# As a last rule to the `make' program, we define what to do when
+# cleaning up a directory. This usually involves deleting object files
+# and other automatically created files such as the executable itself,
+# backup files, and data files. Since the latter are not usually quite
+# diverse, you needed to declare them at the top of this file.
+clean:
+	-rm -f *.o *.go *~ Makefile.dep $(target) $(clean-up-files)
+
+
+# Since we have not yet stated how to make an object file from a C++
+# file, we should do so now. Since the many flags passed to the
+# compiler are usually not of much interest, we suppress the actual
+# command line using the `at' sign in the first column of the rules
+# and write the string indicating what we do instead.
+%.go : %.cc
+	@echo ==============debug========= $(<F)
+	@$(CXX) $(CXXFLAGS.g) -c $< -o $@
+%.o : %.cc
+	@echo ==============optimized===== $(<F)
+	@$(CXX) $(CXXFLAGS.o) -c $< -o $@
+
+
+# The following statement tells make that the rules `run' and `clean'
+# are not expected to produce files of the same name as Makefile rules
+# usually do.
+.PHONY: run clean
+
+
+# Finally there is a rule which you normally need not care much about:
+# since the executable depends on some include files from the library,
+# besides the C++ application file of course, it is necessary to
+# re-generate the executable when one of the files it depends on has
+# changed. The following rule to created a dependency file
+# `Makefile.dep', which `make' uses to determine when to regenerate
+# the executable. This file is automagically remade whenever needed,
+# i.e. whenever one of the cc-(include-path-base)/baseh-files changed. Make detects whether
+# to remake this file upon inclusion at the bottom of this file.
+#
+# The dependency file is created using a perl script.  Since the
+# script prefixes the output names by `lib(include-path-base)/baseo' or `lib(include-path-base)/basego' (it was
+# written for the sublibraries' Makefile), we have to strip that again
+# since object files are placed in the present directory for this
+# application. All these things are made in the next rule:
+Makefile.dep: $(target).cc Makefile \
+              $(shell echo $(include-path-base)/base/*.h    \
+                           $(include-path-lac)/lac/*.h      \
+                           $(include-path-deal2)/*/*.h)
+	@echo ============================ Remaking Makefile
+	@perl $D/common/scripts/make_dependencies.pl  $(INCLUDE) $(target).cc \
+		| perl -pi -e 's!lib/g?o/!!g;' \
+		> Makefile.dep
+
+# To make the dependencies known to `make', we finally have to include
+# them:
+include Makefile.dep
+
+
diff --git a/deal.II/examples/step-10/step-10.cc b/deal.II/examples/step-10/step-10.cc
new file mode 100644
index 0000000000..4b36f1de1d
--- /dev/null
+++ b/deal.II/examples/step-10/step-10.cc
@@ -0,0 +1,127 @@
+/* $Id$ */
+/* Author: Wolfgang Bangerth, University of Heidelberg, 1999 */
+
+#include <base/quadrature_lib.h>
+#include <grid/tria.h>
+#include <dofs/dof_handler.h>
+#include <grid/grid_generator.h>
+#include <grid/tria_accessor.h>
+#include <grid/tria_iterator.h>
+#include <dofs/dof_accessor.h>
+#include <fe/fe_q.h>
+#include <dofs/dof_tools.h>
+#include <fe/fe_values.h>
+#include <grid/tria_boundary_lib.h>
+#include <fe/mapping_q.h>
+
+
+
+
+template <int dim>
+void compute_pi_by_area ()
+{
+  std::cout << "Computation of Pi by the area:" << std::endl
+	    << "==============================" << std::endl;
+  
+  for (unsigned int order=1; order<5; ++order)
+    {
+      cout << "Order = " << order << endl;
+      Triangulation<dim> triangulation;
+      GridGenerator::hyper_ball (triangulation);
+  
+      static const HyperBallBoundary<dim> boundary;
+      triangulation.set_boundary (0, boundary);
+
+      const MappingQ<dim> mapping (order);
+      const FE_Q<dim>     fe (1);
+
+      DoFHandler<dim> dof_handler (triangulation);
+  
+      for (unsigned int refinement=0; refinement<5; ++refinement)
+	{
+	  triangulation.refine_global (1);
+	  dof_handler.distribute_dofs (fe);
+	  
+	  QGauss4<dim> quadrature;
+	  FEValues<dim> fe_values (mapping, fe, quadrature, update_JxW_values);
+	  
+	  typename DoFHandler<dim>::active_cell_iterator
+	    cell = dof_handler.begin_active(),
+	    endc = dof_handler.end();
+	  double area = 0;
+	  for (; cell!=endc; ++cell)
+	    {
+	      fe_values.reinit (cell);
+	      for (unsigned int i=0; i<fe_values.n_quadrature_points; ++i)
+		area += fe_values.JxW (i);
+	    };
+	  std::cout << "Pi=" << area
+		    << ", error=" << fabs(area-3.141592653589793238462643)
+		    << std::endl;
+	};
+      std::cout << std::endl;
+    };
+};
+
+
+
+template <int dim>
+void compute_pi_by_perimeter ()
+{
+  std::cout << "Computation of Pi by the perimeter:" << std::endl
+	    << "===================================" << std::endl;
+
+  for (unsigned int order=1; order<5; ++order)
+    {
+      cout << "Order = " << order << endl;
+      Triangulation<dim> triangulation;
+      GridGenerator::hyper_ball (triangulation);
+  
+      static const HyperBallBoundary<dim> boundary;
+      triangulation.set_boundary (0, boundary);
+
+      const MappingQ<dim> mapping (order);
+      const FE_Q<dim>     fe (1);
+
+      DoFHandler<dim> dof_handler (triangulation);
+  
+      for (unsigned int refinement=0; refinement<5; ++refinement)
+	{
+	  triangulation.refine_global (1);
+	  dof_handler.distribute_dofs (fe);
+	  
+	  QGauss4<dim-1> quadrature;
+	  FEFaceValues<dim> fe_face_values (mapping, fe, quadrature, update_JxW_values);
+	  
+	  typename DoFHandler<dim>::active_cell_iterator
+	    cell = dof_handler.begin_active(),
+	    endc = dof_handler.end();
+	  double perimeter = 0;
+	  for (; cell!=endc; ++cell)
+	    for (unsigned int face_no=0; face_no<GeometryInfo<dim>::faces_per_cell; ++face_no)
+	      if (cell->face(face_no)->at_boundary())
+		{
+		  fe_face_values.reinit (cell, face_no);
+		  for (unsigned int i=0; i<fe_face_values.n_quadrature_points; ++i)
+		    perimeter += fe_face_values.JxW (i);
+		};
+	  std::cout << "Pi=" << perimeter/2
+		    << ", error=" << fabs(perimeter/2-3.141592653589793238462643)
+		    << std::endl;
+	};
+      std::cout << std::endl;
+    };
+};
+
+
+
+
+int main () 
+{
+  cout.precision (16);
+
+  compute_pi_by_area<2> ();
+  compute_pi_by_perimeter<2> ();
+  
+  return 0;
+};
-- 
2.39.5