CGpop mini-Application (2-sided MPI 1D data structure version) 0.1
kinds_mod.F90
Go to the documentation of this file.
00001 !==============================================================================
00002 ! Copyright (C) 2010, University Corporation for Atmospheric Research,
00003 !                     Colorado State University,
00004 !                     Los Alamos National Security, LLC,
00005 !                     United States Department of Energy
00006 !
00007 ! All rights reserved.  See ../COPYING for copyright details
00008 !==============================================================================
00009 
00010 !|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
00011 
00012 !>
00013 !! Default numerical data types for all common data
00014 !! types like integer, character, logical, real4 and real8.
00015 !<
00016  module kinds_mod
00017 
00018 ! !USES:
00019 !  uses no other modules
00020 
00021    implicit none
00022    private
00023    save
00024 
00025 ! !DEFINED PARAMETERS:
00026 
00027    integer, parameter, public ::          
00028       char_len  = 100                    ,
00029       log_kind  = kind(.true.)           ,
00030       i4        = selected_int_kind(6)   ,
00031       i8        = selected_int_kind(13)  ,
00032       r4        = selected_real_kind(6)  ,
00033       r8        = selected_real_kind(13)
00034 
00035 !***********************************************************************
00036 
00037  end module kinds_mod
00038 
00039 !|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
 All Classes Namespaces Files Functions Variables