diff --git a/src/CPFEM.f90 b/src/CPFEM.f90 index 6fc58ea0f..fe8c7d1b3 100644 --- a/src/CPFEM.f90 +++ b/src/CPFEM.f90 @@ -13,7 +13,6 @@ module CPFEM use discretization_marc use material use config - use crystallite use homogenization use IO use discretization diff --git a/src/CPFEM2.f90 b/src/CPFEM2.f90 index 325a8791e..636962948 100644 --- a/src/CPFEM2.f90 +++ b/src/CPFEM2.f90 @@ -21,7 +21,6 @@ module CPFEM2 use HDF5_utilities use homogenization use constitutive - use crystallite #if defined(Mesh) use FEM_quadrature use discretization_mesh diff --git a/src/commercialFEM_fileList.f90 b/src/commercialFEM_fileList.f90 index a5bbe69ca..08e7b9c1c 100644 --- a/src/commercialFEM_fileList.f90 +++ b/src/commercialFEM_fileList.f90 @@ -44,7 +44,6 @@ #include "source_damage_anisoDuctile.f90" #include "kinematics_cleavage_opening.f90" #include "kinematics_slipplane_opening.f90" -#include "crystallite.f90" #include "thermal_isothermal.f90" #include "thermal_conduction.f90" #include "damage_none.f90" diff --git a/src/crystallite.f90 b/src/crystallite.f90 deleted file mode 100644 index 662dfa316..000000000 --- a/src/crystallite.f90 +++ /dev/null @@ -1,18 +0,0 @@ -!-------------------------------------------------------------------------------------------------- -!> @author Martin Diehl, Max-Planck-Institut für Eisenforschung GmbH -!> @author Pratheek Shanthraj, Max-Planck-Institut für Eisenforschung GmbH -!> @author Franz Roters, Max-Planck-Institut für Eisenforschung GmbH -!> @author Philip Eisenlohr, Max-Planck-Institut für Eisenforschung GmbH -!> @author Christoph Kords, Max-Planck-Institut für Eisenforschung GmbH -!> @author Chen Zhang, Michigan State University -!> @brief crystallite state integration functions and reporting of results -!-------------------------------------------------------------------------------------------------- - -module crystallite - - - - - - -end module crystallite diff --git a/src/damage_nonlocal.f90 b/src/damage_nonlocal.f90 index c4426f185..ac4d8636a 100644 --- a/src/damage_nonlocal.f90 +++ b/src/damage_nonlocal.f90 @@ -7,7 +7,6 @@ module damage_nonlocal use material use config use YAML_types - use crystallite use lattice use constitutive use results diff --git a/src/homogenization.f90 b/src/homogenization.f90 index 4da567e4c..cbab8e468 100644 --- a/src/homogenization.f90 +++ b/src/homogenization.f90 @@ -11,7 +11,6 @@ module homogenization use math use material use constitutive - use crystallite use FEsolving use discretization use thermal_isothermal diff --git a/src/thermal_conduction.f90 b/src/thermal_conduction.f90 index 37a407101..d30e50677 100644 --- a/src/thermal_conduction.f90 +++ b/src/thermal_conduction.f90 @@ -8,7 +8,6 @@ module thermal_conduction use config use lattice use results - use crystallite use constitutive use YAML_types