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

Juan 07/03/2024:prep_real_case.f90 , add CALL INIT_HALO_D for OPENACC(DEFONLY) compilation

parent bd0147e0
No related branches found
No related tags found
No related merge requests found
......@@ -441,6 +441,7 @@ USE MODE_IO_MANAGE_STRUCT, only: IO_File_add2list, IO_File_find_byname
USE MODE_ll
#ifdef MNH_OPENACC
USE MODE_MNH_ZWORK, only: MNH_ALLOC_ZWORK
USE MODD_HALO_D, ONLY: INIT_HALO_D
#endif
USE MODE_MODELN_HANDLER
USE MODE_MPPDB
......@@ -907,6 +908,7 @@ CALL CLEANLIST_ll(TZFIELDS_ll)
#ifdef MNH_OPENACC
CALL MNH_ALLOC_ZWORK(1)
CALL INIT_HALO_D()
#endif
CALL SECOND_MNH(ZTIME2)
......
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