Merge branch 'sabyadk/EPWv5.9_small_fix' into 'develop'

small fix in EPW/src/io/io for serial compilation

See merge request QEF/q-e!2439
This commit is contained in:
giannozz 2024-09-17 06:08:39 +00:00
commit 661774209f
1 changed files with 2 additions and 0 deletions

View File

@ -352,9 +352,11 @@
!! Type of IOlength
REAL(KIND = DP) :: dummy
!! Dummy variable
#if defined(__MPI)
INTEGER(KIND = MPI_OFFSET_KIND) :: epmatwp_recl
!! Record length for parallel reading epmatwp
INTEGER(KIND = MPI_OFFSET_KIND) :: epmatwp_offset
#endif
!! Offset for parallel reading epmatwp
INTEGER :: irn
!! Mode*WS-vector Index