This commit is contained in:
Martin Diehl 2020-02-04 23:52:10 +01:00
parent 13ce372684
commit cab000f4b4
1 changed files with 1 additions and 3 deletions

View File

@ -42,9 +42,7 @@ contains
!--------------------------------------------------------------------------------------------------
!> @brief reads the geometry file to obtain information on discretization
!--------------------------------------------------------------------------------------------------
subroutine mesh_init(ip,el)
integer, intent(in), optional :: el, ip ! for compatibility reasons
subroutine mesh_init
include 'fftw3-mpi.f03'
real(pReal), dimension(3) :: &