diff --git a/code/spectral_damage.f90 b/code/spectral_damage.f90 index e2bb80b31..27d513175 100644 --- a/code/spectral_damage.f90 +++ b/code/spectral_damage.f90 @@ -176,10 +176,6 @@ type(tSolutionState) function spectral_damage_solution(guess,timeinc,timeinc_old itmax, & err_damage_tolAbs, & err_damage_tolRel - use spectral_utilities, only: & - tBoundaryCondition, & - Utilities_maskedCompliance, & - Utilities_updateGamma use mesh, only: & grid, & grid3 diff --git a/code/spectral_thermal.f90 b/code/spectral_thermal.f90 index 83e290a4c..985bdf0c6 100644 --- a/code/spectral_thermal.f90 +++ b/code/spectral_thermal.f90 @@ -178,10 +178,6 @@ type(tSolutionState) function spectral_thermal_solution(guess,timeinc,timeinc_ol itmax, & err_thermal_tolAbs, & err_thermal_tolRel - use spectral_utilities, only: & - tBoundaryCondition, & - Utilities_maskedCompliance, & - Utilities_updateGamma use mesh, only: & grid, & grid3