DAMASK_EICMD/src/homogenization_thermal_isotemperature.f90

!--------------------------------------------------------------------------------------------------
!> @author Martin Diehl, KU Leuven
!> @brief Isotemperature homogenization
!--------------------------------------------------------------------------------------------------
submodule(homogenization:thermal) isotemperature

contains

module subroutine isotemperature_init()

  print'(/,1x,a)', '<<<+-  homogenization:thermal:isotemperature init  -+>>>'

end subroutine isotemperature_init

end submodule isotemperature