Skip to content
Snippets Groups Projects
Commit 09b751a1 authored by ESCOBAR MUNOZ Juan's avatar ESCOBAR MUNOZ Juan
Browse files

Juan 17/11/2020: get_halo.f90, Bug , add missing "#define GPUDIRECT" in all separe routine using it

parent 0837cd69
No related branches found
No related tags found
No related merge requests found
......@@ -236,6 +236,7 @@ END MODULE MODD_HALO_D
! #########################
SUBROUTINE GET_HALO_D(PSRC,HDIR,HNAME)
! #########################
#define MNH_GPUDIRECT
!
USE MODD_HALO_D
......@@ -263,6 +264,7 @@ END SUBROUTINE GET_HALO_D
! #########################
SUBROUTINE GET_HALO_START_D(PSRC,KNB_REQ,KREQ,HDIR)
! #########################
#define MNH_GPUDIRECT
!
USE MODD_HALO_D
......@@ -464,6 +466,7 @@ END SUBROUTINE GET_HALO_START_D
! #########################
SUBROUTINE GET_HALO_STOP_D(PSRC,KNB_REQ,KREQ,HDIR)
! #########################
#define MNH_GPUDIRECT
!
USE MODD_HALO_D
......@@ -568,6 +571,7 @@ END SUBROUTINE GET_HALO_STOP_D
! ########################################
SUBROUTINE GET_HALO_DD(PSRC, HDIR, HNAME)
! ########################################
#define MNH_GPUDIRECT
!
USE MODD_HALO_D
USE MODE_ll
......@@ -694,7 +698,6 @@ END IF
INB_REQ = 0
#define MNH_GPUDIRECT
!
! Post the recieve of Zxxxx_IN buffer first via MPI(Gpu_direct)
!
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment