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

Juan 14/11/2023:init_mnh.f90, add initialisation of GPU halo with INIT_HALO_D...

Juan 14/11/2023:init_mnh.f90, add initialisation of GPU halo with INIT_HALO_D , to avoid some potentiel null pointer a first GET_HALO_D call
parent a730d4ae
No related branches found
No related tags found
No related merge requests found
...@@ -103,6 +103,7 @@ USE MODI_RESET_EXSEG ...@@ -103,6 +103,7 @@ USE MODI_RESET_EXSEG
! !
#ifdef MNH_OPENACC #ifdef MNH_OPENACC
USE MODE_MNH_ZWORK USE MODE_MNH_ZWORK
USE MODD_HALO_D
#endif #endif
! !
! !
...@@ -226,6 +227,7 @@ ENDDO ...@@ -226,6 +227,7 @@ ENDDO
! !
#ifdef MNH_OPENACC #ifdef MNH_OPENACC
CALL MNH_ALLOC_ZWORK(NMODEL) CALL MNH_ALLOC_ZWORK(NMODEL)
CALL INIT_HALO_D()
#endif #endif
! !
!------------------------------------------------------------------------------- !-------------------------------------------------------------------------------
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment