added missing use statement in _init

This commit is contained in:
Philip Eisenlohr 2007-04-13 15:37:10 +00:00
parent 4718abfc70
commit b26704c23f
1 changed files with 1 additions and 1 deletions

View File

@ -131,7 +131,7 @@
SUBROUTINE mesh_init () SUBROUTINE mesh_init ()
use prec, only: pInt use prec, only: pInt
use IO, only: IO_open_InputFile use IO, only: IO_error,IO_open_InputFile
implicit none implicit none
integer(pInt), parameter :: fileUnit = 222 integer(pInt), parameter :: fileUnit = 222