!
! Define actual number of regions.
! Included by 'dims_grid.F90'.
!
integer, parameter  ::  nregions = 1