missing use from IO

This commit is contained in:
Martin Diehl 2019-01-31 17:01:26 +01:00
parent bcd9908a88
commit b9c834f86a
1 changed files with 5 additions and 1 deletions

View File

@ -543,6 +543,10 @@ contains
!> @brief check if the input file for Abaqus contains part info !> @brief check if the input file for Abaqus contains part info
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
logical function hasNoPart(fileUnit) logical function hasNoPart(fileUnit)
use IO, only: &
IO_stringPos, &
IO_stringValue, &
IO_lc
implicit none implicit none
integer(pInt), intent(in) :: fileUnit integer(pInt), intent(in) :: fileUnit