mpi_f08: fix MPI_WIN_{ATTACH,DETACH} bindings

fixes INTENT from open-mpi/ompi@9600e2bc63

ompi/mpi/fortran/use-mpi-f08/mpi-f-interfaces-bind.h

@@ -2407,7 +2407,7 @@ subroutine ompi_win_attach_f(win,base,size,ierror) &
    implicit none
    OMPI_FORTRAN_IGNORE_TKR_TYPE, INTENT(IN) :: base
    INTEGER(MPI_ADDRESS_KIND), INTENT(IN) :: size
-   INTEGER, INTENT(OUT) :: win
+   INTEGER, INTENT(IN) :: win
    INTEGER, INTENT(OUT) :: ierror
 end subroutine ompi_win_attach_f
 
@@ -2416,7 +2416,7 @@ subroutine ompi_win_detach_f(win,base,ierror) &
    use :: mpi_f08_types, only : MPI_ADDRESS_KIND
    implicit none
    OMPI_FORTRAN_IGNORE_TKR_TYPE, INTENT(IN) :: base
-   INTEGER, INTENT(OUT) :: win
+   INTEGER, INTENT(IN) :: win
    INTEGER, INTENT(OUT) :: ierror
 end subroutine ompi_win_detach_f
 

ompi/mpi/fortran/use-mpi-f08/profile/pwin_attach_f08.F90

@@ -12,7 +12,7 @@ subroutine PMPI_Win_attach_f08(win,base,size,ierror)
    implicit none
    OMPI_FORTRAN_IGNORE_TKR_TYPE, INTENT(IN) :: base
    INTEGER(MPI_ADDRESS_KIND), INTENT(IN) :: size
-   TYPE(MPI_Win), INTENT(OUT) :: win
+   TYPE(MPI_Win), INTENT(IN) :: win
    INTEGER, OPTIONAL, INTENT(OUT) :: ierror
    integer :: c_ierror
 

ompi/mpi/fortran/use-mpi-f08/profile/pwin_detach_f08.F90

@@ -11,7 +11,7 @@ subroutine PMPI_Win_detach_f08(win,base,ierror)
    use :: mpi_f08, only : ompi_win_detach_f
    implicit none
    OMPI_FORTRAN_IGNORE_TKR_TYPE, INTENT(IN) :: base
-   TYPE(MPI_Win), INTENT(OUT) :: win
+   TYPE(MPI_Win), INTENT(IN) :: win
    INTEGER, OPTIONAL, INTENT(OUT) :: ierror
    integer :: c_ierror
 

ompi/mpi/fortran/use-mpi-f08/win_attach_f08.F90

@@ -12,7 +12,7 @@ subroutine MPI_Win_attach_f08(win,base,size,ierror)
    implicit none
    OMPI_FORTRAN_IGNORE_TKR_TYPE, INTENT(IN) :: base
    INTEGER(MPI_ADDRESS_KIND), INTENT(IN) :: size
-   TYPE(MPI_Win), INTENT(OUT) :: win
+   TYPE(MPI_Win), INTENT(IN) :: win
    INTEGER, OPTIONAL, INTENT(OUT) :: ierror
    integer :: c_ierror
 

ompi/mpi/fortran/use-mpi-f08/win_detach_f08.F90

@@ -11,7 +11,7 @@ subroutine MPI_Win_detach_f08(win,base,ierror)
    use :: mpi_f08, only : ompi_win_detach_f
    implicit none
    OMPI_FORTRAN_IGNORE_TKR_TYPE, INTENT(IN) :: base
-   TYPE(MPI_Win), INTENT(OUT) :: win
+   TYPE(MPI_Win), INTENT(IN) :: win
    INTEGER, OPTIONAL, INTENT(OUT) :: ierror
    integer :: c_ierror