array_operations_mod – the SCATTERING code

This module provides supplementary functions and subroutines to handle matrix allocation, invertion, appending etc.

Uses

- iso_fortran_env
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. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Used by

Interfaces

add_scalar_to_diagonal allocate_1d allocate_2d allocate_3d append fill_symmetric_matrix invert_symmetric_matrix

Interfaces

public interface add_scalar_to_diagonal

public module subroutine add_scalar_to_diagonal_dp(matrix_, scalar_)

! add a scalar value to the matrix diagonal (double precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(inout)			::	matrix_(:,:)
real(kind=dp),	intent(in)			::	scalar_

public module subroutine add_scalar_to_diagonal_int32(matrix_, scalar_)

add a scalar value to the matrix diagonal (integer version)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(inout)			::	matrix_(:,:)
integer(kind=int32),	intent(in)			::	scalar_

public module subroutine add_scalar_to_diagonal_sp(matrix_, scalar_)

add a scalar value to the matrix diagonal (single precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(inout)			::	matrix_(:,:)
real(kind=sp),	intent(in)			::	scalar_

public interface allocate_1d

public pure module subroutine allocate_1d_dp(array_, size_)

allocate a 1d array and fill it with 0s (double precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(inout),		allocatable	::	array_(:)
integer(kind=int32),	intent(in)			::	size_

public pure module subroutine allocate_1d_int32(array_, size_)

allocate a 1d array and fill it with 0s (integer version)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(inout),		allocatable	::	array_(:)
integer(kind=int32),	intent(in)			::	size_

public pure module subroutine allocate_1d_sp(array_, size_)

allocate a 1d array and fill it with 0s (single precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(inout),		allocatable	::	array_(:)
integer(kind=int32),	intent(in)			::	size_

public interface allocate_2d

public pure module subroutine allocate_2d_dp(array_, size1_, size2_)

allocate a 2d array and fill it with 0s (double precision version)

Arguments

Type	Intent	Attributes		Name
real(kind=dp),	intent(inout),	allocatable	::	array_(:,:)
integer(kind=int32),	intent(in)		::	size1_
integer(kind=int32),	intent(in)		::	size2_

public pure module subroutine allocate_2d_int32(array_, size1_, size2_)

allocate a 2d array and fill it with 0s (integer version)

Arguments

Type	Intent	Attributes		Name
integer(kind=int32),	intent(inout),	allocatable	::	array_(:,:)
integer(kind=int32),	intent(in)		::	size1_
integer(kind=int32),	intent(in)		::	size2_

public pure module subroutine allocate_2d_sp(array_, size1_, size2_)

allocate a 2d array and fill it with 0s (single precision version)

Arguments

Type	Intent	Attributes		Name
real(kind=sp),	intent(inout),	allocatable	::	array_(:,:)
integer(kind=int32),	intent(in)		::	size1_
integer(kind=int32),	intent(in)		::	size2_

public interface allocate_3d

public pure module subroutine allocate_3d_dp(array_, size1_, size2_, size3_)

allocate a 3d array and fill it with 0s (double precision version)

Arguments

Type	Intent	Attributes		Name
real(kind=dp),	intent(inout),	allocatable	::	array_(:,:,:)
integer(kind=int32),	intent(in)		::	size1_
integer(kind=int32),	intent(in)		::	size2_
integer(kind=int32),	intent(in)		::	size3_

public pure module subroutine allocate_3d_int32(array_, size1_, size2_, size3_)

allocate a 3d array and fill it with 0s (integer version)

Arguments

Type	Intent	Attributes		Name
integer(kind=int32),	intent(inout),	allocatable	::	array_(:,:,:)
integer(kind=int32),	intent(in)		::	size1_
integer(kind=int32),	intent(in)		::	size2_
integer(kind=int32),	intent(in)		::	size3_

public pure module subroutine allocate_3d_sp(array_, size1_, size2_, size3_)

allocate a 3d array and fill it with 0s (single precision version)

Arguments

Type	Intent	Attributes		Name
real(kind=sp),	intent(inout),	allocatable	::	array_(:,:,:)
integer(kind=int32),	intent(in)		::	size1_
integer(kind=int32),	intent(in)		::	size2_
integer(kind=int32),	intent(in)		::	size3_

public interface append

public pure module subroutine append_dp(array_, element_)

append element to an array (double precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(inout),		allocatable	::	array_(:)
real(kind=dp),	intent(in)			::	element_

public pure module subroutine append_int32(array_, element_)

append element to an array (integer version)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(inout),		allocatable	::	array_(:)
integer(kind=int32),	intent(in)			::	element_

public pure module subroutine append_sp(array_, element_)

append element to an array (single precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(inout),		allocatable	::	array_(:)
real(kind=sp),	intent(in)			::	element_

public interface fill_symmetric_matrix

public module subroutine fill_symmetric_matrix_dp(matrix_, upper_lower_)

fill the upper/lower triangle of a symmetric matrix (double precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(inout)			::	matrix_(:,:)
character(len=1),	intent(in)			::	upper_lower_

public module subroutine fill_symmetric_matrix_int32(matrix_, upper_lower_)

fill the upper/lower triangle of a symmetric matrix (integer version)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(inout)			::	matrix_(:,:)
character(len=1),	intent(in)			::	upper_lower_

public module subroutine fill_symmetric_matrix_sp(matrix_, upper_lower_)

fill the upper/lower triangle of a symmetric matrix (single precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(inout)			::	matrix_(:,:)
character(len=1),	intent(in)			::	upper_lower_

public interface invert_symmetric_matrix

public module subroutine invert_symmetric_matrix_dp(matrix_)

invert a symmetric matrix using DSYTRI method (double precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(inout)			::	matrix_(:,:)

public module subroutine invert_symmetric_matrix_int32(matrix_)

invert a symmetric matrix using DSYTRI method (integer version)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(inout)			::	matrix_(:,:)

public module subroutine invert_symmetric_matrix_sp(matrix_)

invert a symmetric matrix using DSYTRI method (single precision version)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(inout)			::	matrix_(:,:)

array_operations_mod Module

Contents

Interfaces

Uses

Used by

Descendants:

Contents

Interfaces

Interfaces

public interface add_scalar_to_diagonal

public module subroutine add_scalar_to_diagonal_dp(matrix_, scalar_)

Arguments

public module subroutine add_scalar_to_diagonal_int32(matrix_, scalar_)

Arguments

public module subroutine add_scalar_to_diagonal_sp(matrix_, scalar_)

Arguments

public interface allocate_1d

public pure module subroutine allocate_1d_dp(array_, size_)

Arguments

public pure module subroutine allocate_1d_int32(array_, size_)

Arguments

public pure module subroutine allocate_1d_sp(array_, size_)

Arguments

public interface allocate_2d

public pure module subroutine allocate_2d_dp(array_, size1_, size2_)

Arguments

public pure module subroutine allocate_2d_int32(array_, size1_, size2_)

Arguments

public pure module subroutine allocate_2d_sp(array_, size1_, size2_)

Arguments

public interface allocate_3d

public pure module subroutine allocate_3d_dp(array_, size1_, size2_, size3_)

Arguments

public pure module subroutine allocate_3d_int32(array_, size1_, size2_, size3_)

Arguments

public pure module subroutine allocate_3d_sp(array_, size1_, size2_, size3_)

Arguments

public interface append

public pure module subroutine append_dp(array_, element_)

Arguments

public pure module subroutine append_int32(array_, element_)

Arguments

public pure module subroutine append_sp(array_, element_)

Arguments

public interface fill_symmetric_matrix

public module subroutine fill_symmetric_matrix_dp(matrix_, upper_lower_)

Arguments

public module subroutine fill_symmetric_matrix_int32(matrix_, upper_lower_)

Arguments

public module subroutine fill_symmetric_matrix_sp(matrix_, upper_lower_)

Arguments

public interface invert_symmetric_matrix

public module subroutine invert_symmetric_matrix_dp(matrix_)

Arguments

public module subroutine invert_symmetric_matrix_int32(matrix_)

Arguments

public module subroutine invert_symmetric_matrix_sp(matrix_)

Arguments