allocate_field_mod Module

Uses

- paramet_mod_h
- dimensions_mod
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Contents

Interfaces

allocate_u switch_u switch_v allocate_v allocate2d_u allocate2d_v switch2d_u switch2d_v

Subroutines

Init_nan

Interfaces

public interface allocate_u

private subroutine allocate1d_u1d(field, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:)
type(distrib),	intent(in)			::	d

private subroutine allocate2d_u1d(field, dim1, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
integer				::	dim1
type(distrib),	intent(in)			::	d

private subroutine allocate3d_u1d(field, dim1, dim2, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
integer				::	dim1
integer				::	dim2
type(distrib),	intent(in)			::	d

public interface switch_u

private subroutine switch1d_u1d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch2d_u1d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch3d_u1d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

public interface switch_v

private subroutine switch1d_v1d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch2d_v1d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch3d_v1d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

public interface allocate_v

private subroutine allocate1d_v1d(field, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:)
type(distrib),	intent(in)			::	d

private subroutine allocate2d_v1d(field, dim1, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
integer				::	dim1
type(distrib),	intent(in)			::	d

private subroutine allocate3d_v1d(field, dim1, dim2, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
integer				::	dim1
integer				::	dim2
type(distrib),	intent(in)			::	d

public interface allocate2d_u

private subroutine allocate1d_u2d(field, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
type(distrib),	intent(in)			::	d

private subroutine allocate2d_u2d(field, dim1, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
integer				::	dim1
type(distrib),	intent(in)			::	d

private subroutine allocate3d_u2d(field, dim1, dim2, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:,:)
integer				::	dim1
integer				::	dim2
type(distrib),	intent(in)			::	d

public interface allocate2d_v

private subroutine allocate1d_v2d(field, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
type(distrib),	intent(in)			::	d

private subroutine allocate2d_v2d(field, dim1, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
integer				::	dim1
type(distrib),	intent(in)			::	d

private subroutine allocate3d_v2d(field, dim1, dim2, d)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:,:)
integer				::	dim1
integer				::	dim2
type(distrib),	intent(in)			::	d

public interface switch2d_u

private subroutine switch1d_u2d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch2d_u2d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch3d_u2d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

public interface switch2d_v

private subroutine switch1d_v2d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch2d_v2d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

private subroutine switch3d_v2d(field, old_dist, new_dist, up, down)

Arguments

Type	Intent	Optional	Attributes		Name
real,			POINTER	::	field(:,:,:,:)
type(distrib),	intent(in)			::	old_dist
type(distrib),	intent(in)			::	new_dist
integer,	intent(in),	optional		::	up
integer,	intent(in),	optional		::	down

Subroutines

public subroutine Init_nan()

Arguments

None