fix build errors

Author: JessicaMeixner-NOAA

model/src/w3iorsmd.F90

@@ -318,7 +318,7 @@ SUBROUTINE W3IORS ( INXOUT, NDSR, DUMFPI, IMOD, FLRSTRT )
     USE W3ODATMD, ONLY: NRQRS, NBLKRS, RSBLKS, IRQRS, IRQRSS,  &
          VAAUX
     USE W3ADATMD, ONLY: MPI_COMM_WCMP
-    USE MPI 
+    USE mpi_f08 
 #endif
     !/
     USE W3SERVMD, ONLY: EXTCDE, EXTIOF
@@ -335,9 +335,6 @@ SUBROUTINE W3IORS ( INXOUT, NDSR, DUMFPI, IMOD, FLRSTRT )
     USE W3SERVMD, ONLY: STRACE
 #endif
     !
-#ifdef W3_MPI
-    use mpi_f08
-#endif
     IMPLICIT NONE
     !
     !/