quantum-espresso/Modules/parallel_include.f90

27 lines
848 B
Fortran

!
! 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
#if defined __MPI
!
! Include file for MPI
!
INCLUDE 'mpif.h'
!
! this is only for symmetry with respect to the serial build
LOGICAL :: tparallel = .true.
#else
! an empty module can broke compilation when it is used by other modules
LOGICAL :: tparallel = .false.
#endif
END MODULE parallel_include