[cig-commits] [commit] devel: Remove another unused constants file. (672fb62)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Thu May 1 00:50:39 PDT 2014
Repository : ssh://geoshell/specfem3d
On branch : devel
Link : https://github.com/geodynamics/specfem3d/compare/cb32c88d6155d7974561a6f72fc17aea596e2c4d...50aa953c1db3f565d76415f5305410a529996b75
>---------------------------------------------------------------
commit 672fb62bc0084479a88824ad3257f2e0755ebfa3
Author: Elliott Sales de Andrade <esalesde at physics.utoronto.ca>
Date: Sat Apr 26 05:10:18 2014 -0400
Remove another unused constants file.
>---------------------------------------------------------------
672fb62bc0084479a88824ad3257f2e0755ebfa3
src/decompose_mesh/constants_decompose_mesh.h | 41 ---------------------------
1 file changed, 41 deletions(-)
diff --git a/src/decompose_mesh/constants_decompose_mesh.h b/src/decompose_mesh/constants_decompose_mesh.h
deleted file mode 100644
index 2808e5b..0000000
--- a/src/decompose_mesh/constants_decompose_mesh.h
+++ /dev/null
@@ -1,41 +0,0 @@
-!=====================================================================
-!
-! S p e c f e m 3 D V e r s i o n 2 . 1
-! ---------------------------------------
-!
-! Main historical authors: Dimitri Komatitsch and Jeroen Tromp
-! Princeton University, USA
-! and CNRS / University of Marseille, France
-! (there are currently many more authors!)
-! (c) Princeton University and CNRS / University of Marseille, July 2012
-!
-! 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
-! the Free Software Foundation; either version 2 of the License, or
-! (at your option) any later version.
-!
-! This program is distributed in the hope that it will be useful,
-! but WITHOUT ANY WARRANTY; without even the implied warranty of
-! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-! GNU General Public License for more details.
-!
-! You should have received a copy of the GNU General Public License along
-! with this program; if not, write to the Free Software Foundation, Inc.,
-! 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
-!
-!=====================================================================
-
-! Number of slices for mesh partitioning
-integer, parameter :: nparts = 4
-
-! Useful kind types
-integer ,parameter :: short = SELECTED_INT_KIND(4), long = SELECTED_INT_KIND(18)
-
-! Number of nodes per elements.
-integer, parameter :: ESIZE = 8
-
-! Number of faces per element.
-integer, parameter :: nfaces = 6
-
-! very large and very small values
- double precision, parameter :: HUGEVAL = 1.d+30,TINYVAL = 1.d-9
More information about the CIG-COMMITS
mailing list