mpp.F90 File Reference

#include <fms_platform.h>

Include dependency graph for mpp.F90:

Go to the source code of this file.

Data Types
type	mpp_mod::communicator
type	mpp_mod::event
type	mpp_mod::clock
type	mpp_mod::clock_data_summary
type	mpp_mod::summary_struct
type	mpp_mod::mpp_type
type	mpp_mod::mpp_type_list
interface	mpp_mod::mpp_error
interface	mpp_mod::array_to_char
interface	mpp_mod::mpp_type_create
interface	mpp_mod::mpp_max
interface	mpp_mod::mpp_min
interface	mpp_mod::mpp_sum
interface	mpp_mod::mpp_sum_ad
interface	mpp_mod::mpp_gather
interface	mpp_mod::mpp_scatter
interface	mpp_mod::mpp_alltoall
interface	mpp_mod::mpp_transmit
interface	mpp_mod::mpp_recv
interface	mpp_mod::mpp_send
interface	mpp_mod::mpp_broadcast
interface	mpp_mod::mpp_chksum

Modules
module	mpp_mod

Variables
integer, parameter	mpp_mod::peset_max = 10000
integer	mpp_mod::current_peset_max = 32
type(communicator), dimension(:), allocatable	mpp_mod::peset
logical	mpp_mod::module_is_initialized = .false.
logical	mpp_mod::debug = .false.
integer	mpp_mod::npes =1
integer	mpp_mod::root_pe =0
integer	mpp_mod::pe =0
integer(long_kind)	mpp_mod::tick
integer(long_kind)	mpp_mod::ticks_per_sec
integer(long_kind)	mpp_mod::max_ticks
integer(long_kind)	mpp_mod::start_tick
integer(long_kind)	mpp_mod::end_tick
integer(long_kind)	mpp_mod::tick0 =0
integer	mpp_mod::mpp_comm_private
logical	mpp_mod::first_call_system_clock_mpi =.TRUE.
real(double_kind)	mpp_mod::mpi_count0 =0
real(double_kind)	mpp_mod::mpi_tick_rate =0.d0
logical, public	mpp_mod::mpp_record_timing_data =.TRUE.
type(clock), dimension(max_clocks), save	mpp_mod::clocks
integer	mpp_mod::log_unit
integer	mpp_mod::etc_unit
character(len=32)	mpp_mod::configfile ='logfile'
integer	mpp_mod::peset_num =0
integer	mpp_mod::current_peset_num =0
integer	mpp_mod::world_peset_num
integer	mpp_mod::error
integer	mpp_mod::clock_num =0
integer	mpp_mod::num_clock_ids =0
integer	mpp_mod::current_clock =0
integer, dimension(max_clocks)	mpp_mod::previous_clock =0
real	mpp_mod::tick_rate
type(mpp_type_list)	mpp_mod::datatypes
type(mpp_type), target, public	mpp_mod::mpp_byte
integer	mpp_mod::cur_send_request = 0
integer	mpp_mod::cur_recv_request = 0
integer, dimension(:), allocatable	mpp_mod::request_send
integer, dimension(:), allocatable	mpp_mod::request_recv
integer, dimension(:), allocatable	mpp_mod::size_recv
integer, dimension(:), allocatable	mpp_mod::type_recv
character(len=32)	mpp_mod::etcfile ='._mpp.nonrootpe.msgs'
integer	mpp_mod::in_unit =100
integer	mpp_mod::out_unit =101
integer	mpp_mod::err_unit =102
integer	mpp_mod::stdout_unit
type(summary_struct), dimension(max_clocks)	mpp_mod::clock_summary
logical	mpp_mod::warnings_are_fatal = .FALSE.
integer	mpp_mod::error_state =0
integer	mpp_mod::clock_grain =CLOCK_LOOP-1
integer, parameter	mpp_mod::mpi_integer8 =MPI_INTEGER
integer, dimension(shmem_barrier_sync_size)	mpp_mod::psync
integer	mpp_mod::clock0
integer	mpp_mod::mpp_stack_size =0
integer	mpp_mod::mpp_stack_hwm =0
logical	mpp_mod::verbose =.FALSE.
integer(long_kind), dimension(1)	mpp_mod::word
integer	mpp_mod::get_len_nocomm = 0
integer, parameter, public	mpp_mod::input_str_length = 256
character(len=input_str_length), dimension(:), allocatable, target, public	mpp_mod::input_nml_file
logical	mpp_mod::read_ascii_file_on = .FALSE.
integer, parameter	mpp_mod::max_request_min = 10000
integer	mpp_mod::request_multiply = 20
logical	mpp_mod::etc_unit_is_stderr = .false.
integer	mpp_mod::max_request = 0
logical	mpp_mod::sync_all_clocks = .false.