more appropriate name (conceptually not coupled to YAML)

src/Marc/DAMASK_Marc.f90

@@ -20,7 +20,7 @@
 #include "../parallelization.f90"
 #include "../misc.f90"
 #include "../IO.f90"
-#include "../YAML_types.f90"
+#include "../types.f90"
 #include "../YAML_parse.f90"
 #include "../HDF5_utilities.f90"
 
@@ -187,7 +187,7 @@ subroutine hypela2(d,g,e,de,s,t,dt,ngens,m,nn,kcus,matus,ndi,nshear,disp, &
   use prec
   use DAMASK_interface
   use config
-  use YAML_types
+  use types
   use discretization_Marc
   use homogenization
   use materialpoint_Marc

src/Marc/materialpoint_Marc.f90

@@ -7,7 +7,7 @@ module materialpoint_Marc
   use DAMASK_interface
   use prec
   use IO
-  use YAML_types
+  use types
   use YAML_parse
   use HDF5_utilities
   use result
@@ -70,7 +70,7 @@ subroutine materialpoint_initAll()
   call DAMASK_interface_init()
   call prec_init()
   call IO_init()
-  call YAML_types_init()
+  call types_init()
   call YAML_parse_init()
   call HDF5_utilities_init()
   call result_init(.false.)

src/YAML_parse.f90

@@ -8,7 +8,7 @@ module YAML_parse
   use prec
   use misc
   use IO
-  use YAML_types
+  use types
 #ifdef FYAML
   use system_routines
 #endif

src/config.f90

@@ -6,7 +6,7 @@ module config
   use IO
   use misc
   use YAML_parse
-  use YAML_types
+  use types
   use result
   use parallelization
 #if   defined(MESH) || defined(GRID)

src/grid/grid_damage_spectral.f90

@@ -23,7 +23,7 @@ module grid_damage_spectral
   use spectral_utilities
   use discretization_grid
   use homogenization
-  use YAML_types
+  use types
   use config
 
 #if (PETSC_VERSION_MAJOR==3 && PETSC_VERSION_MINOR>14) && !defined(PETSC_HAVE_MPI_F90MODULE_VISIBILITY)

src/grid/grid_thermal_spectral.f90

@@ -23,7 +23,7 @@ module grid_thermal_spectral
   use spectral_utilities
   use discretization_grid
   use homogenization
-  use YAML_types
+  use types
   use config
   use constants
 

src/material.f90

@@ -12,7 +12,7 @@ module material
   use IO
   use rotations
   use discretization
-  use YAML_types
+  use types
 
   implicit none(type,external)
   private

src/materialpoint.f90

@@ -11,7 +11,7 @@ module materialpoint
   use prec
   use misc
   use IO
-  use YAML_types
+  use types
   use YAML_parse
   use HDF5
   use HDF5_utilities
@@ -57,7 +57,7 @@ subroutine materialpoint_initAll()
 #elif defined(GRID)
    call base64_init()
 #endif
-  call YAML_types_init()
+  call types_init()
   call YAML_parse_init()
   call HDF5_utilities_init()
   call result_init(restart=CLI_restartInc>0)

src/math.f90

@@ -10,7 +10,7 @@ module math
   use misc
   use IO
   use config
-  use YAML_types
+  use types
   use parallelization
   use LAPACK_interface
 

src/mesh/discretization_mesh.f90

@@ -22,7 +22,7 @@ module discretization_mesh
   use discretization
   use result
   use FEM_quadrature
-  use YAML_types
+  use types
   use prec
 
 #if (PETSC_VERSION_MAJOR==3 && PETSC_VERSION_MINOR>14) && !defined(PETSC_HAVE_MPI_F90MODULE_VISIBILITY)

src/polynomials.f90

@@ -6,7 +6,7 @@ module polynomials
   use prec
   use IO
   use YAML_parse
-  use YAML_types
+  use types
 
   implicit none(type,external)
   private

src/tables.f90

@@ -7,7 +7,7 @@ module tables
   use prec
   use IO
   use YAML_parse
-  use YAML_types
+  use types
 
   implicit none(type,external)
   private

src/test/DAMASK_test.f90

@@ -13,7 +13,7 @@ program DAMASK_test
   use test_crystal
   use test_rotations
   use test_IO
-  use test_YAML_types
+  use test_types
   use test_HDF5_utilities
 
   external :: quit
@@ -63,8 +63,8 @@ program DAMASK_test
   call test_IO_run()
   write(IO_STDOUT,fmt='(a)') ok
 
-  write(IO_STDOUT,fmt=fmt, advance='no') 'YAML_types','...'
+  write(IO_STDOUT,fmt=fmt, advance='no') 'types','...'
-  call test_YAML_types_run()
+  call test_types_run()
   write(IO_STDOUT,fmt='(a)') ok
 
   write(IO_STDOUT,fmt=fmt, advance='no') 'HDF5_utilities','...'

src/test/test_YAML_types.f90

@@ -1,17 +0,0 @@
-module test_YAML_types
-  use YAML_types
-
-  implicit none(type,external)
-
-  private
-  public :: test_YAML_types_run
-
-  contains
-
-subroutine test_YAML_types_run()
-
-  call YAML_types_selfTest()
-
-end subroutine test_YAML_types_run
-
-end module test_YAML_types

src/test/test_types.f90

@@ -0,0 +1,17 @@
+module test_types
+  use types
+
+  implicit none(type,external)
+
+  private
+  public :: test_types_run
+
+  contains
+
+subroutine test_types_run()
+
+  call types_selfTest()
+
+end subroutine test_types_run
+
+end module test_types

src/types.f90

@@ -7,7 +7,7 @@
 !! to a node.
 !--------------------------------------------------------------------------------------------------
 
-module YAML_types
+module types
   use IO
   use prec
   use misc
@@ -152,8 +152,8 @@ module YAML_types
   end interface assignment (=)
 
   public :: &
-    YAML_types_init, &
+    types_init, &
-    YAML_types_selfTest, &
+    types_selfTest, &
 #ifdef __GFORTRAN__
     output_as1dStr, &                                       !ToDo: Hack for GNU. Remove later
 #endif
@@ -164,19 +164,19 @@ contains
 !--------------------------------------------------------------------------------------------------
 !> @brief Do sanity checks.
 !--------------------------------------------------------------------------------------------------
-subroutine YAML_types_init
+subroutine types_init
 
-  print'(/,1x,a)', '<<<+-  YAML_types init  -+>>>'
+  print'(/,1x,a)', '<<<+-  types init  -+>>>'
 
-  call YAML_types_selfTest()
+  call types_selfTest()
 
-end subroutine YAML_types_init
+end subroutine types_init
 
 
 !--------------------------------------------------------------------------------------------------
 !> @brief Check correctness of some type bound procedures.
 !--------------------------------------------------------------------------------------------------
-subroutine YAML_types_selfTest()
+subroutine types_selfTest()
 
   scalar: block
     type(tScalar), target :: s
@@ -315,7 +315,7 @@ subroutine YAML_types_selfTest()
   end block dict_get_as1dReal_shape
 #endif
 
-end subroutine YAML_types_selfTest
+end subroutine types_selfTest
 
 
 !---------------------------------------------------------------------------------------------------
@@ -1504,4 +1504,4 @@ recursive subroutine tItem_finalize(self)
 
 end subroutine tItem_finalize
 
-end module YAML_types
+end module types