Open MPI logo

Open MPI User's Mailing List Archives

  |   Home   |   Support   |   FAQ   |  

This web mail archive is frozen.

This page is part of a frozen web archive of this mailing list.

You can still navigate around this archive, but know that no new mails have been added to it since July of 2016.

Click here to be taken to the new web archives of this list; it includes all the mails that are in this frozen archive plus all new mails that have been sent to the list since it was migrated to the new archives.

Subject: Re: [OMPI users] MPI_Allreduce on local machine
From: Anton Shterenlikht (mexas_at_[hidden])
Date: 2010-07-27 08:23:22


On Tue, Jul 27, 2010 at 08:11:39AM -0400, Jeff Squyres wrote:
> On Jul 26, 2010, at 11:06 PM, Hugo Gagnon wrote:
>
> > 8 integer, parameter :: dp = kind(1.d0)
> > 9 real(kind=dp) :: inside(5), outside(5)
>
> I'm not a fortran expert -- is kind(1.d0) really double precision? According to http://gcc.gnu.org/onlinedocs/gcc-3.4.6/g77/Kind-Notation.html, kind(2) is double precision (but that's for a different compiler, and I don't quite grok the ".d0" notation).

*quote*
kind (x) has type default integer and value equal to the kind
type parameter value of x.
*end quote*

p. 161 from Metcalf et al (2007) Fortran 95/2003 explained.

% cat tmp.f90
        program z

        integer, parameter :: dp = kind(1.d0)
        real(kind=dp) :: inside(5), outside(5)

        write(*,*)dp

        end program z
% g95 -L/usr/local/lib tmp.f90
% ./a.out
 8
%

Kind 8 is (on most arch) 8-byte real, i.e. typically
double precision.

-- 
Anton Shterenlikht
Room 2.6, Queen's Building
Mech Eng Dept
Bristol University
University Walk, Bristol BS8 1TR, UK
Tel: +44 (0)117 331 5944
Fax: +44 (0)117 929 4423