type_mpl Module Reference

Generic ranks, dimensions and types. More...

Data Types
type	mpl_type

Functions/Subroutines
subroutine	mpl_newunit (mpl, lunit)
	Find a free unit. More...
subroutine	mpl_init (mpl, f_comm)
	Initialize MPL object. More...
subroutine	mpl_final (mpl)
	Finalize MPI. More...
subroutine	mpl_flush (mpl, advance_flag)
	Flush listings. More...
subroutine	mpl_abort (mpl, subr, message)
	Clean MPI abort. More...
subroutine	mpl_warning (mpl, subr, message)
	Print warning message. More...
subroutine	mpl_print_instance (mpl)
	Print instance. More...
subroutine	mpl_timings (mpl)
	Print execution timings. More...
subroutine	mpl_update_tag (mpl, add)
	Update MPI tag. More...
subroutine	mpl_broadcast_string_array (mpl, var, root)
	Broadcast string array. More...
subroutine	mpl_dot_prod_r1 (mpl, fld1, fld2, dp)
	Global dot product over local fields. More...
subroutine	mpl_dot_prod_r2 (mpl, fld1, fld2, dp)
	Global dot product over local fields. More...
subroutine	mpl_dot_prod_r3 (mpl, fld1, fld2, dp)
	Global dot product over local fields. More...
subroutine	mpl_dot_prod_r4 (mpl, fld1, fld2, dp)
	Global dot product over local fields. More...
subroutine	mpl_glb_to_loc_index (mpl, n_loc, loc_to_glb, n_glb, glb_to_loc, glb_to_proc, rootproc, pool)
	Communicate global index to local index. More...
subroutine	mpl_glb_to_loc_int (mpl, nl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool)
	Global to local. More...
subroutine	mpl_glb_to_loc_real (mpl, nl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool)
	Global to local. More...
subroutine	mpl_glb_to_loc_logical (mpl, nl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool)
	Global to local. More...
subroutine	mpl_loc_to_glb_int (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast)
	Local to global. More...
subroutine	mpl_loc_to_glb_real (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast)
	Local to global. More...
subroutine	mpl_loc_to_glb_logical (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast)
	Local to global. More...
subroutine	mpl_prog_init (mpl, nprog)
	Initialize progression display. More...
subroutine	mpl_prog_print (mpl, i)
	Print progression display. More...
subroutine	mpl_prog_final (mpl, advance_flag)
	Finalize progression display. More...
integer function	mpl_nc_file_create_or_open (mpl, filename, f_comm)
	Create or open NetCDF file. More...
integer function	mpl_nc_group_define_or_get (mpl, ncid, grpname)
	Define or get group. More...
integer function	mpl_nc_dim_define_or_get (mpl, ncid, dimname, dimsize)
	Define or get (and check) NetCDF dimension. More...
integer function	mpl_nc_dim_inquire (mpl, ncid, dimname)
	Inquire NetCDF file dimension size. More...
subroutine	mpl_nc_dim_check (mpl, ncid, dimname, dimsize)
	Check if NetCDF file dimension exists and has the right size. More...
integer function	mpl_nc_var_define_or_get (mpl, ncid, varname, varkind, varshape, unitname)
	Define or get NetCDF variable. More...
subroutine	mpl_ncerr (mpl, subr, info)
	Handle NetCDF error. More...
subroutine	mpl_write_int (mpl, ncid, prefix, variables, var)
	Write int into a log file or into a NetCDF file. More...
subroutine	mpl_write_real (mpl, ncid, prefix, variables, var)
	Write real into a log file or into a NetCDF file. More...
subroutine	mpl_write_logical (mpl, ncid, prefix, variables, var)
	Write logical into a log file or into a NetCDF file. More...
subroutine	mpl_write_string (mpl, ncid, prefix, variables, var)
	Write string into a log file or into a NetCDF file. More...
subroutine	mpl_write_int_array (mpl, ncid, prefix, variables, n, var)
	Write int array into a log file or into a NetCDF file. More...
subroutine	mpl_write_real_array (mpl, ncid, prefix, variables, n, var)
	Write real array into a log file or into a NetCDF file. More...
subroutine	mpl_write_logical_array (mpl, ncid, prefix, variables, n, var)
	Write logical array into a log file or into a NetCDF file. More...
subroutine	mpl_write_string_array (mpl, ncid, prefix, variables, n, var)
	Write string array into a log file or into a NetCDF file. More...

Variables
integer, parameter	lunit_min = 10
	Minimum unit number. More...
integer, parameter	lunit_max = 1000
	Maximum unit number. More...
integer, parameter	ddis = 5
	Progression display step. More...
real(kind_real)	min_total_timing = one
	Minimum total timing to print. More...
integer	max_calls = 10
	Number of timing to print with maximum calls. More...

Detailed Description

Generic ranks, dimensions and types.

Subroutines/functions list Instrumentation functions MPI parameters derived type

Function/Subroutine Documentation

mpl_abort()

subroutine type_mpl::mpl_abort ( class(mpl_type), intent(inout)  mpl, character(len=*), intent(in)  subr, character(len=*), intent(in)  message  )

private

Clean MPI abort.

Parameters

[in,out]	mpl	MPI data
[in]	subr	Calling subroutine

Definition at line 467 of file type_mpl.F90.

mpl_broadcast_string_array()

subroutine type_mpl::mpl_broadcast_string_array ( class(mpl_type), intent(in)  mpl, character(len=*), dimension(:), intent(inout)  var, integer, intent(in)  root  )

private

Broadcast string array.

Parameters

[in]	mpl	MPI data
[in,out]	var	Logical array, 1d
[in]	root	Root task

Definition at line 669 of file type_mpl.F90.

mpl_dot_prod_r1()

subroutine type_mpl::mpl_dot_prod_r1 ( class(mpl_type), intent(in)  mpl, real(kind_real), dimension(:), intent(in)  fld1, real(kind_real), dimension(:), intent(in)  fld2, real(kind_real), intent(out)  dp  )

private

Global dot product over local fields.

Parameters

[in]	mpl	MPI data
[in]	fld1	Field 1
[in]	fld2	Field 2
[out]	dp	Global dot product

Definition at line 702 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_dot_prod_r2()

subroutine type_mpl::mpl_dot_prod_r2 ( class(mpl_type), intent(in)  mpl, real(kind_real), dimension(:,:), intent(in)  fld1, real(kind_real), dimension(:,:), intent(in)  fld2, real(kind_real), intent(out)  dp  )

private

Global dot product over local fields.

Parameters

[in]	mpl	MPI data
[in]	fld1	Field 1
[in]	fld2	Field 2
[out]	dp	Global dot product

Definition at line 742 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_dot_prod_r3()

subroutine type_mpl::mpl_dot_prod_r3 ( class(mpl_type), intent(in)  mpl, real(kind_real), dimension(:,:,:), intent(in)  fld1, real(kind_real), dimension(:,:,:), intent(in)  fld2, real(kind_real), intent(out)  dp  )

private

Global dot product over local fields.

Parameters

[in]	mpl	MPI data
[in]	fld1	Field 1
[in]	fld2	Field 2
[out]	dp	Global dot product

Definition at line 782 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_dot_prod_r4()

subroutine type_mpl::mpl_dot_prod_r4 ( class(mpl_type), intent(in)  mpl, real(kind_real), dimension(:,:,:,:), intent(in)  fld1, real(kind_real), dimension(:,:,:,:), intent(in)  fld2, real(kind_real), intent(out)  dp  )

private

Global dot product over local fields.

Parameters

[in]	mpl	MPI data
[in]	fld1	Field 1
[in]	fld2	Field 2
[out]	dp	Global dot product

Definition at line 822 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_final()

subroutine type_mpl::mpl_final ( class(mpl_type), intent(inout)  mpl )

private

Finalize MPI.

Parameters

[in,out]

mpl

MPI data

Definition at line 318 of file type_mpl.F90.

mpl_flush()

subroutine type_mpl::mpl_flush ( class(mpl_type), intent(inout)  mpl, logical, intent(in), optional  advance_flag  )

private

Flush listings.

Parameters

[in,out]	mpl	MPI data
[in]	advance_flag	Advance flag

Definition at line 343 of file type_mpl.F90.

mpl_glb_to_loc_index()

subroutine type_mpl::mpl_glb_to_loc_index ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  n_loc, integer, dimension(n_loc), intent(in)  loc_to_glb, integer, intent(in)  n_glb, integer, dimension(:), intent(out)  glb_to_loc, integer, dimension(:), intent(out)  glb_to_proc, integer, intent(in), optional  rootproc, logical, dimension(mpl%nproc), intent(in), optional  pool  )

private

Communicate global index to local index.

Parameters

[in,out]	mpl	MPI data
[in]	n_loc	Local dimension
[in]	loc_to_glb	Local to global index
[in]	n_glb	Global dimension
[out]	glb_to_loc	Global to local index
[out]	glb_to_proc	Global to processor
[in]	rootproc	Root task
[in]	pool	Tasks pool

Definition at line 863 of file type_mpl.F90.

mpl_glb_to_loc_int()

subroutine type_mpl::mpl_glb_to_loc_int ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  nl, integer, intent(in)  n_loc, integer, intent(in)  n_glb, integer, dimension(n_loc), intent(in)  loc_to_glb, integer(kind_int), dimension(:,:), intent(in)  glb, integer(kind_int), dimension(n_loc,nl), intent(out)  loc, integer, intent(in), optional  rootproc, logical, dimension(mpl%nproc), intent(in), optional  pool  )

private

Global to local.

Parameters

[in,out]	mpl	MPI data
[in]	nl	Number of levels
[in]	n_loc	Local array size
[in]	n_glb	Global array size
[in]	loc_to_glb	Local to global
[in]	glb	Global array
[out]	loc	Local array
[in]	rootproc	Root task
[in]	pool	Tasks pool

Definition at line 961 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_glb_to_loc_logical()

subroutine type_mpl::mpl_glb_to_loc_logical ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  nl, integer, intent(in)  n_loc, integer, intent(in)  n_glb, integer, dimension(n_loc), intent(in)  loc_to_glb, logical, dimension(:,:), intent(in)  glb, logical, dimension(n_loc,nl), intent(out)  loc, integer, intent(in), optional  rootproc, logical, dimension(mpl%nproc), intent(in), optional  pool  )

private

Global to local.

Parameters

[in,out]	mpl	MPI data
[in]	nl	Number of levels
[in]	n_loc	Local array size
[in]	n_glb	Global array size
[in]	loc_to_glb	Local to global
[in]	glb	Global array
[out]	loc	Local array
[in]	rootproc	Root task
[in]	pool	Tasks pool

Definition at line 1199 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_glb_to_loc_real()

subroutine type_mpl::mpl_glb_to_loc_real ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  nl, integer, intent(in)  n_loc, integer, intent(in)  n_glb, integer, dimension(n_loc), intent(in)  loc_to_glb, real(kind_real), dimension(:,:), intent(in)  glb, real(kind_real), dimension(n_loc,nl), intent(out)  loc, integer, intent(in), optional  rootproc, logical, dimension(mpl%nproc), intent(in), optional  pool  )

private

Global to local.

Parameters

[in,out]	mpl	MPI data
[in]	nl	Number of levels
[in]	n_loc	Local array size
[in]	n_glb	Global array size
[in]	loc_to_glb	Local to global
[in]	glb	Global array
[out]	loc	Local array
[in]	rootproc	Root task
[in]	pool	Tasks pool

Definition at line 1080 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_init()

subroutine type_mpl::mpl_init ( class(mpl_type), intent(inout)  mpl, type(fckit_mpi_comm), intent(in), target  f_comm  )

private

Initialize MPL object.

Parameters

[in,out]	mpl	MPI data
[in]	f_comm	FCKIT MPI communicator wrapper

Definition at line 250 of file type_mpl.F90.

mpl_loc_to_glb_int()

subroutine type_mpl::mpl_loc_to_glb_int ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  n_loc, integer, intent(in)  n_glb, integer, dimension(n_loc), intent(in)  loc_to_glb, integer(kind_int), dimension(n_loc), intent(in)  loc, integer(kind_int), dimension(:), intent(out)  glb, logical, intent(in), optional  bcast  )

private

Local to global.

Parameters

[in,out]	mpl	MPI data
[in]	n_loc	Local array size
[in]	n_glb	Global array size
[in]	loc_to_glb	Local to global
[in]	loc	Local array
[out]	glb	Global array
[in]	bcast	Broadcast option

Definition at line 1322 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_loc_to_glb_logical()

subroutine type_mpl::mpl_loc_to_glb_logical ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  n_loc, integer, intent(in)  n_glb, integer, dimension(n_loc), intent(in)  loc_to_glb, logical, dimension(n_loc), intent(in)  loc, logical, dimension(:), intent(out)  glb, logical, intent(in), optional  bcast  )

private

Local to global.

Parameters

[in,out]	mpl	MPI data
[in]	n_loc	Local array size
[in]	n_glb	Global array size
[in]	loc_to_glb	Local to global
[in]	loc	Local array
[out]	glb	Global array
[in]	bcast	Broadcast option

Definition at line 1512 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_loc_to_glb_real()

subroutine type_mpl::mpl_loc_to_glb_real ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  n_loc, integer, intent(in)  n_glb, integer, dimension(n_loc), intent(in)  loc_to_glb, real(kind_real), dimension(n_loc), intent(in)  loc, real(kind_real), dimension(:), intent(out)  glb, logical, intent(in), optional  bcast  )

private

Local to global.

Parameters

[in,out]	mpl	MPI data
[in]	n_loc	Local array size
[in]	n_glb	Global array size
[in]	loc_to_glb	Local to global
[in]	loc	Local array
[out]	glb	Global array
[in]	bcast	Broadcast option

Definition at line 1417 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_nc_dim_check()

subroutine type_mpl::mpl_nc_dim_check ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  dimname, integer, intent(in)  dimsize  )

private

Check if NetCDF file dimension exists and has the right size.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file ID
[in]	dimname	Dimension name
[in]	dimsize	Expected dimension size

Definition at line 1926 of file type_mpl.F90.

mpl_nc_dim_define_or_get()

integer function type_mpl::mpl_nc_dim_define_or_get ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  dimname, integer, intent(in)  dimsize  )

private

Define or get (and check) NetCDF dimension.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file ID
[in]	dimname	Dimension name
[in]	dimsize	Dimension size

Definition at line 1841 of file type_mpl.F90.

mpl_nc_dim_inquire()

integer function type_mpl::mpl_nc_dim_inquire ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  dimname  )

private

Inquire NetCDF file dimension size.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file ID
[in]	dimname	Dimension name

Definition at line 1888 of file type_mpl.F90.

mpl_nc_file_create_or_open()

integer function type_mpl::mpl_nc_file_create_or_open ( class(mpl_type), intent(inout)  mpl, character(len=*), intent(in)  filename, type(fckit_mpi_comm), intent(in), optional  f_comm  )

private

Create or open NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	filename	File name
[in]	f_comm	Communicator

Definition at line 1750 of file type_mpl.F90.

mpl_nc_group_define_or_get()

integer function type_mpl::mpl_nc_group_define_or_get ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  grpname  )

private

Define or get group.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file ID
[in]	grpname	Group name

Definition at line 1805 of file type_mpl.F90.

mpl_nc_var_define_or_get()

integer function type_mpl::mpl_nc_var_define_or_get ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  varname, integer, intent(in)  varkind, integer, dimension(:), intent(in)  varshape, character(len=*), intent(in), optional  unitname  )

private

Define or get NetCDF variable.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file ID
[in]	varname	Variable name
[in]	varkind	Variable kind
[in]	varshape	Variable shape
[in]	unitname	Unit name

Definition at line 1963 of file type_mpl.F90.

mpl_ncerr()

subroutine type_mpl::mpl_ncerr ( class(mpl_type), intent(inout)  mpl, character(len=*), intent(in)  subr, integer, intent(in)  info  )

private

Handle NetCDF error.

Parameters

[in,out]	mpl	MPI data
[in]	subr	Calling subroutine
[in]	info	Info index

Definition at line 2016 of file type_mpl.F90.

mpl_newunit()

subroutine type_mpl::mpl_newunit ( class(mpl_type), intent(inout)  mpl, integer, intent(out)  lunit  )

private

Find a free unit.

Parameters

[in,out]	mpl	MPI data
[out]	lunit	New unit

Definition at line 211 of file type_mpl.F90.

mpl_print_instance()

subroutine type_mpl::mpl_print_instance ( class(mpl_type), intent(inout)  mpl )

private

Print instance.

Parameters

[in,out]

mpl

MPI data

Definition at line 511 of file type_mpl.F90.

mpl_prog_final()

subroutine type_mpl::mpl_prog_final ( class(mpl_type), intent(inout)  mpl, logical, intent(in), optional  advance_flag  )

private

Finalize progression display.

Parameters

[in,out]	mpl	MPI data
[in]	advance_flag	Advance flag

Definition at line 1698 of file type_mpl.F90.

mpl_prog_init()

subroutine type_mpl::mpl_prog_init ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  nprog  )

private

Initialize progression display.

Parameters

[in,out]	mpl	MPI data
[in]	nprog	Array size

Definition at line 1610 of file type_mpl.F90.

mpl_prog_print()

subroutine type_mpl::mpl_prog_print ( class(mpl_type), intent(inout)  mpl, integer, intent(in), optional  i  )

private

Print progression display.

Parameters

[in,out]	mpl	MPI data
[in]	i	Index

Definition at line 1652 of file type_mpl.F90.

mpl_timings()

subroutine type_mpl::mpl_timings ( class(mpl_type), intent(inout)  mpl )

private

Print execution timings.

Parameters

[in,out]

mpl

MPI data

Definition at line 536 of file type_mpl.F90.

mpl_update_tag()

subroutine type_mpl::mpl_update_tag ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  add  )

private

Update MPI tag.

Parameters

[in,out]	mpl	MPI data
[in]	add	Tag update incrememnt

Definition at line 639 of file type_mpl.F90.

mpl_warning()

subroutine type_mpl::mpl_warning ( class(mpl_type), intent(inout)  mpl, character(len=*), intent(in)  subr, character(len=*), intent(in)  message  )

private

Print warning message.

Parameters

[in,out]	mpl	MPI data
[in]	subr	Calling subroutine

Definition at line 492 of file type_mpl.F90.

mpl_write_int()

subroutine type_mpl::mpl_write_int ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, integer(kind_int), intent(in)  var  )

private

Write int into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	var	Variable

Definition at line 2035 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_write_int_array()

subroutine type_mpl::mpl_write_int_array ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, integer, intent(in)  n, integer(kind_int), dimension(n), intent(in)  var  )

private

Write int array into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	n	Array size
[in]	var	Array

Definition at line 2254 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_write_logical()

subroutine type_mpl::mpl_write_logical ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, logical, intent(in)  var  )

private

Write logical into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	var	Variable

Definition at line 2146 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_write_logical_array()

subroutine type_mpl::mpl_write_logical_array ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, integer, intent(in)  n, logical, dimension(n), intent(in)  var  )

private

Write logical array into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	n	Array size
[in]	var	Array

Definition at line 2400 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_write_real()

subroutine type_mpl::mpl_write_real ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, real(kind_real), intent(in)  var  )

private

Write real into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	var	Variable

Definition at line 2093 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_write_real_array()

subroutine type_mpl::mpl_write_real_array ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, integer, intent(in)  n, real(kind_real), dimension(n), intent(in)  var  )

private

Write real array into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	n	Array size
[in]	var	Array

Definition at line 2329 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_write_string()

subroutine type_mpl::mpl_write_string ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, character(len=*), intent(in)  var  )

private

Write string into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	var	Variable

Definition at line 2201 of file type_mpl.F90.

Here is the caller graph for this function:

mpl_write_string_array()

subroutine type_mpl::mpl_write_string_array ( class(mpl_type), intent(inout)  mpl, integer, intent(in)  ncid, character(len=*), intent(in)  prefix, character(len=*), intent(in)  variables, integer, intent(in)  n, character(len=*), dimension(n), intent(in)  var  )

private

Write string array into a log file or into a NetCDF file.

Parameters

[in,out]	mpl	MPI data
[in]	ncid	NetCDF file id
[in]	variables	Variable name
[in]	n	Array size
[in]	var	Array

Definition at line 2479 of file type_mpl.F90.

Here is the caller graph for this function:

Variable Documentation

ddis

integer, parameter type_mpl::ddis = 5

Progression display step.

Definition at line 61 of file type_mpl.F90.

lunit_max

integer, parameter type_mpl::lunit_max = 1000

Maximum unit number.

Definition at line 60 of file type_mpl.F90.

lunit_min

integer, parameter type_mpl::lunit_min = 10

Minimum unit number.

Definition at line 59 of file type_mpl.F90.

max_calls

integer type_mpl::max_calls = 10

Number of timing to print with maximum calls.

Definition at line 63 of file type_mpl.F90.

min_total_timing

real(kind_real) type_mpl::min_total_timing = one

Minimum total timing to print.

Definition at line 62 of file type_mpl.F90.