diff --git a/src/MNH/mesonh.f90 b/src/MNH/mesonh.f90 index 27bd93e2cc2c8f80ad698f4ae9733821ecd29f9d..349c00327c31fb5c287ecca69aeb139c6900d7de 100644 --- a/src/MNH/mesonh.f90 +++ b/src/MNH/mesonh.f90 @@ -132,6 +132,9 @@ INTEGER :: IINFO_ll ! return code of // routines ! !* 1. INITIALIZATION ! -------------- +#ifdef MNH_OPENACC + !$acc init +#endif ! Switch to model 1 variables #ifndef CPLOASIS CALL MPPDB_INIT()