!
! Copyright (C) 2003-2004 Carlo Cavazzoni
! This file is distributed under the terms of the
! GNU General Public License. See the file `License'
! in the root directory of the present distribution,
! or http://www.gnu.org/copyleft/gpl.txt .
!
!------------------------------------------------------------------------------!
!   SISSA Code Interface -- Carlo Cavazzoni
!------------------------------------------------------------------------------C
      MODULE parallel_include

!@@         USE kinds
         USE parameters, only: dbl, DP, i4b

         LOGICAL tparallel

#if defined __MPI || defined __SHMEM
!
!     Include file for MPI
!
         INCLUDE 'mpif.h'
         DATA tparallel /.true./
#else
         DATA tparallel /.false./
#endif

      END MODULE parallel_include