diff --git a/model/src/w3initmd.F90 b/model/src/w3initmd.F90 index f17eb9081..053e1f406 100644 --- a/model/src/w3initmd.F90 +++ b/model/src/w3initmd.F90 @@ -1,3 +1,4 @@ + !> @file !> @brief Contains module W3INITMD. !> @@ -421,9 +422,9 @@ SUBROUTINE W3INIT ( IMOD, IsMulti, FEXT, MDS, MTRACE, ODAT, FLGRD, FLGR2, FLGD, use yowNodepool, only: npa use yowRankModule, only : rank #endif - USE W3GDATMD, ONLY: GTYPE, UNGTYPE, IOBDP_LOC + USE W3GDATMD, ONLY: GTYPE, UNGTYPE #ifdef W3_PDLIB - USE PDLIB_W3PROFSMD, ONLY : PDLIB_MAPSTA_INIT, SET_IOBDP_PDLIB, PDLIB_IOBP_INIT, SET_IOBPA_PDLIB + USE PDLIB_W3PROFSMD, ONLY : PDLIB_MAPSTA_INIT, SET_IOBDP_PDLIB, PDLIB_IOBP_INIT, SET_IOBPA_PDLIB, IOBDP_LOC USE PDLIB_W3PROFSMD, ONLY : BLOCK_SOLVER_INIT, BLOCK_SOLVER_EXPLICIT_INIT, PDLIB_INIT, DEALLOCATE_PDLIB_GLOBAL use yowDatapool, only: istatus #endif