Documentation for module dbcsr_data_methods_low

DBCSR data methods

source: dbcsr_data_methods_low.F
Loading...

Generic procedures:

dbcsr_data_get_sizes
dbcsr_data_set_pointer
dbcsr_get_data
dbcsr_get_data_p
dbcsr_scalar
dbcsr_scalar_get_value

public Subroutines/Functions:

Clears pointers from the data area.
FUNCTION
LOGICAL
dbcsr_data_exists (area)
Checks whether a data pointer exists
...
FUNCTION
INTEGER
dbcsr_data_get_size (area)
Returns the allocated data size
FUNCTION
INTEGER PURE
dbcsr_data_get_size_referenced (area)
Get actual data storage used for matrix
FUNCTION
INTEGER PURE
dbcsr_data_get_type (area)
Returns data type of a data area
SUBROUTINE
dbcsr_data_hold (area)
Registers another use of the data area
SUBROUTINE
dbcsr_data_init (area)
Initializes a data area
Sets the referenced size of the data area
FUNCTION
LOGICAL ELEMENTAL
dbcsr_data_valid (area)
Checks whether a data area is valid
Verifies bounds of a data area
SUBROUTINE
dbcsr_data_zero (area, lb, ub)
Clears a part of the data area
FUNCTION
COMPLEX(real_4)
dbcsr_get_data_p_2d_c (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_c
FUNCTION
REAL(real_8)
dbcsr_get_data_p_2d_d (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_d
FUNCTION
REAL(real_4)
dbcsr_get_data_p_2d_s (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_s
FUNCTION
COMPLEX(real_8)
dbcsr_get_data_p_2d_z (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_z
FUNCTION
COMPLEX(real_4)
dbcsr_get_data_p_c (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_c
FUNCTION
REAL(real_8)
dbcsr_get_data_p_d (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_d
FUNCTION
REAL(real_4)
dbcsr_get_data_p_s (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_s
FUNCTION
COMPLEX(real_8)
dbcsr_get_data_p_z (area, lb, ub)
Returns the single/double precision real/complex data. dbcsr_get_data_c_z
FUNCTION
LOGICAL ELEMENTAL
dbcsr_scalar_are_equal (s1, s2)
Returns whether an encapsulated scalar is equal to another value
SUBROUTINE ELEMENTAL
dbcsr_scalar_fill_all (scalar)
Fills all data and precision types from the set one
FUNCTION
INTEGER ELEMENTAL
dbcsr_scalar_get_type (scalar)
Returns data type of a scalar
FUNCTION
TYPE(dbcsr_scalar_type) ELEMENTAL
dbcsr_scalar_negative (s)
Returns an encapsulated scalar as a negation of the given
FUNCTION
TYPE(dbcsr_scalar_type) ELEMENTAL
dbcsr_scalar_one (data_type)
Returns an encapsulated scalar "1"
SUBROUTINE ELEMENTAL
dbcsr_scalar_set_type (scalar, data_type)
Sets data type of a scalar
FUNCTION
TYPE(dbcsr_scalar_type) ELEMENTAL
dbcsr_scalar_zero (data_type)
Returns an encapsulated scalar "0"
FUNCTION
INTEGER PURE
dbcsr_type_1d_to_2d (data_type)
Returns 2-D data type corresponding to the given 1-D one.
FUNCTION
INTEGER PURE
dbcsr_type_2d_to_1d (data_type)
Returns 1-d data type corresponding to the given 2-D one.
FUNCTION
LOGICAL PURE
dbcsr_type_is_2d (data_type)
Checks whether the data type is 2-D.
Allocates pointers in the data type
Allocates pointers in the data type

Generic procedure dbcsr_data_get_sizes

Returns the allocated data size

INTENT(in)
:: area × × ×
INTEGER,
INTENT(out)
:: sizes(:) ×
LOGICAL,
INTENT(out)
:: valid × × ×
INTEGER,
INTENT(out)
:: total_size ×
INTEGER,
INTENT(out)
:: row_size ×
INTEGER,
INTENT(out)
:: col_size ×

Generic procedure dbcsr_data_set_pointer

...

INTENT(inout)
:: area × × × × × × × × ×
REAL(real_4),
POINTER
:: p(:) ×
REAL(real_8),
POINTER
:: p(:) ×
COMPLEX(real_4),
POINTER
:: p(:) ×
COMPLEX(real_8),
POINTER
:: p(:) ×
REAL(real_4),
POINTER
:: p(:,:) ×
REAL(real_8),
POINTER
:: p(:,:) ×
COMPLEX(real_4),
POINTER
:: p(:,:) ×
COMPLEX(real_8),
POINTER
:: p(:,:) ×
INTEGER,
INTENT(in)
:: rsize ×
INTEGER,
INTENT(in)
:: csize ×
INTENT(in)
:: pointee ×
INTEGER,
INTENT(in),
OPTIONAL
:: source_lb ×

Generic procedure dbcsr_get_data

Returns the single/double precision real/complex data

INTENT(in)
:: area × × × × × × × ×
REAL(real_4),
POINTER
:: data(:) ×
REAL(real_8),
POINTER
:: data(:) ×
COMPLEX(real_4),
POINTER
:: data(:) ×
COMPLEX(real_8),
POINTER
:: data(:) ×
REAL(real_4),
POINTER
:: data(:,:) ×
REAL(real_8),
POINTER
:: data(:,:) ×
COMPLEX(real_4),
POINTER
:: data(:,:) ×
COMPLEX(real_8),
POINTER
:: data(:,:) ×
INTEGER,
INTENT(in),
OPTIONAL
:: lb × × × ×
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) × × × ×
INTEGER,
INTENT(in),
OPTIONAL
:: ub × × × ×
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) × × × ×

Generic procedure dbcsr_get_data_p

Returns the single/double precision real/complex data

INTENT(in)
:: area × × × ×
REAL(real_4),
INTENT(in)
:: select_data_type ×
COMPLEX(real_4),
INTENT(in)
:: select_data_type ×
REAL(real_8),
INTENT(in)
:: select_data_type ×
COMPLEX(real_8),
INTENT(in)
:: select_data_type ×
INTEGER,
INTENT(in),
OPTIONAL
:: lb × × × ×
INTEGER,
INTENT(in),
OPTIONAL
:: ub × × × ×

Generic procedure dbcsr_scalar

Sets a scalar in an encapsulated data structure

REAL(real_4),
INTENT(in)
:: scalar ×
REAL(real_8),
INTENT(in)
:: scalar ×
COMPLEX(real_4),
INTENT(in)
:: scalar ×
COMPLEX(real_8),
INTENT(in)
:: scalar ×

Generic procedure dbcsr_scalar_get_value

Sets a scalar in an encapsulated data structure

INTENT(in)
:: encapsulated_scalar × × × ×
REAL(real_4),
INTENT(out)
:: value ×
REAL(real_8),
INTENT(out)
:: value ×
COMPLEX(real_4),
INTENT(out)
:: value ×
COMPLEX(real_8),
INTENT(out)
:: value ×

SUBROUTINEdbcsr_data_clear_pointer(area)

Clears pointers from the data area.

Arguments:
INTENT(inout)
:: area data area

FUNCTIONdbcsr_data_exists(area)

Checks whether a data pointer exists

Return Value ::
LOGICAL
whether the data pointer exists
Arguments:
INTENT(in)
:: area data area

FUNCTIONdbcsr_data_get_memory_type(area)

...

Return Value ::
Arguments:
INTENT(in)
:: area ...

FUNCTIONdbcsr_data_get_size(area)

Returns the allocated data size

Return Value ::
INTEGER
size of data
Arguments:
INTENT(in)
:: area data area

PURE FUNCTIONdbcsr_data_get_size_referenced(area)

Get actual data storage used for matrix

Return Value ::
INTEGER
Data size used by matrix
Arguments:
INTENT(in)
:: area Count data of this matrix

PURE FUNCTIONdbcsr_data_get_type(area)

Returns data type of a data area

Return Value ::
INTEGER
data type of the data area
Arguments:
INTENT(in)
:: area data area

SUBROUTINEdbcsr_data_hold(area)

Registers another use of the data area

Arguments:
INTENT(inout)
:: area data area

SUBROUTINEdbcsr_data_init(area)

Initializes a data area

Arguments:
INTENT(inout)
:: area data area

PURE SUBROUTINEdbcsr_data_set_size_referenced(data_area, referenced_size)

Sets the referenced size of the data area

Arguments:
INTENT(inout)
:: data_area area for which to set referenced data size
INTEGER,
INTENT(in)
:: referenced_size set referenced data size to this value

ELEMENTAL FUNCTIONdbcsr_data_valid(area)

Checks whether a data area is valid

Return Value ::
LOGICAL
whether the data area is valid
Arguments:
INTENT(in)
:: area data area

SUBROUTINEdbcsr_data_verify_bounds(area, lb, ub)

Verifies bounds of a data area

Arguments:
INTENT(in)
:: area Data area
INTEGER,
INTENT(in)
:: lb(:) lower bounds
INTEGER,
INTENT(in)
:: ub(:) upper bounds

SUBROUTINEdbcsr_data_zero(area, lb, ub)

Clears a part of the data area

Arguments:
INTENT(inout)
:: area data area
INTEGER,
INTENT(in)
:: lb(:) ...
INTEGER,
INTENT(in)
:: ub(:) ...

FUNCTIONdbcsr_get_data_p_2d_c(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_c

Return Value ::
COMPLEX(real_4)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

FUNCTIONdbcsr_get_data_p_2d_d(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_d

Return Value ::
REAL(real_8)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

FUNCTIONdbcsr_get_data_p_2d_s(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_s

Return Value ::
REAL(real_4)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

FUNCTIONdbcsr_get_data_p_2d_z(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_z

Return Value ::
COMPLEX(real_8)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

FUNCTIONdbcsr_get_data_p_c(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_c

Return Value ::
COMPLEX(real_4)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

FUNCTIONdbcsr_get_data_p_d(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_d

Return Value ::
REAL(real_8)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

FUNCTIONdbcsr_get_data_p_s(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_s

Return Value ::
REAL(real_4)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

FUNCTIONdbcsr_get_data_p_z(area, lb, ub)

Returns the single/double precision real/complex data

dbcsr_get_data_c_z

Return Value ::
COMPLEX(real_8)
pointer to data
Arguments:
INTENT(in)
:: area data area
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

ELEMENTAL FUNCTIONdbcsr_scalar_are_equal(s1, s2)

Returns whether an encapsulated scalar is equal to another value

Return Value ::
LOGICAL
whether values are equal
Arguments:
INTENT(in)
:: s1 one value
INTENT(in)
:: s2 another value

ELEMENTAL SUBROUTINEdbcsr_scalar_fill_all(scalar)

Fills all data and precision types from the set one

Arguments:
INTENT(inout)
:: scalar data area

ELEMENTAL FUNCTIONdbcsr_scalar_get_type(scalar)

Returns data type of a scalar

Return Value ::
INTEGER
data type of the scalar
Arguments:
INTENT(in)
:: scalar scalar

ELEMENTAL FUNCTIONdbcsr_scalar_negative(s)

Returns an encapsulated scalar as a negation of the given

Return Value ::
negated value
Arguments:
INTENT(in)
:: s given value

ELEMENTAL FUNCTIONdbcsr_scalar_one(data_type)

Returns an encapsulated scalar "1"

Return Value ::
encapsulated value of one
Arguments:
INTEGER,
INTENT(in)
:: data_type use the data type

ELEMENTAL SUBROUTINEdbcsr_scalar_set_type(scalar, data_type)

Sets data type of a scalar

Arguments:
INTENT(inout)
:: scalar scalar
INTEGER,
INTENT(in)
:: data_type ...

ELEMENTAL FUNCTIONdbcsr_scalar_zero(data_type)

Returns an encapsulated scalar "0"

Return Value ::
encapsulated value of zero
Arguments:
INTEGER,
INTENT(in)
:: data_type use the data type

PURE FUNCTIONdbcsr_type_1d_to_2d(data_type)

Returns 2-D data type corresponding to the given 1-D one.

Return Value ::
INTEGER
2-D data type
Arguments:
INTEGER,
INTENT(in)
:: data_type ...

PURE FUNCTIONdbcsr_type_2d_to_1d(data_type)

Returns 1-d data type corresponding to the given 2-D one.

Return Value ::
INTEGER
1-D data type
Arguments:
INTEGER,
INTENT(in)
:: data_type ...

PURE FUNCTIONdbcsr_type_is_2d(data_type)

Checks whether the data type is 2-D.

Return Value ::
LOGICAL
Data type is 2-D.
Arguments:
INTEGER,
INTENT(in)
:: data_type ...

SUBROUTINEinternal_data_allocate(area, sizes)

Allocates pointers in the data type

Arguments:
INTENT(inout)
:: area internal structure holding array pointers
INTEGER,
INTENT(in)
:: sizes(:) sizes to allocate to

SUBROUTINEinternal_data_deallocate(area)

Allocates pointers in the data type

Arguments:
INTENT(inout)
:: area internal structure holding array pointers

SUBROUTINEdbcsr_data_get_sizes_any(area, sizes, valid)

Returns the allocated data size

Arguments:
INTENT(in)
:: area data area to query for size
INTEGER,
INTENT(out)
:: sizes(:) array with the data sizes
LOGICAL,
INTENT(out)
:: valid whether the data is actually allocated

SUBROUTINEdbcsr_data_get_sizes_1(area, total_size, valid)

Returns the allocated data size

Arguments:
INTENT(in)
:: area data area to query for size
INTEGER,
INTENT(out)
:: total_size size of array
LOGICAL,
INTENT(out)
:: valid whether the data is actually allocated

SUBROUTINEdbcsr_data_get_sizes_2(area, row_size, col_size, valid)

Returns the allocated data size

Arguments:
INTENT(in)
:: area data area to query for size, should be 2-D
INTEGER,
INTENT(out)
:: row_size row size
INTEGER,
INTENT(out)
:: col_size column size
LOGICAL,
INTENT(out)
:: valid whether the data is actually allocated

SUBROUTINEset_data_p_s(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
REAL(real_4),
POINTER
:: p(:) source data pointer

SUBROUTINEset_data_p_d(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
REAL(real_8),
POINTER
:: p(:) source data pointer

SUBROUTINEset_data_p_c(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
COMPLEX(real_4),
POINTER
:: p(:) source data pointer

SUBROUTINEset_data_p_z(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
COMPLEX(real_8),
POINTER
:: p(:) source data pointer

SUBROUTINEset_data_p_2d_s(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
REAL(real_4),
POINTER
:: p(:,:) source data pointer

SUBROUTINEset_data_p_2d_d(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
REAL(real_8),
POINTER
:: p(:,:) source data pointer

SUBROUTINEset_data_p_2d_c(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
COMPLEX(real_4),
POINTER
:: p(:,:) source data pointer

SUBROUTINEset_data_p_2d_z(area, p)

Sets a data pointer.

Arguments:
INTENT(inout)
:: area target data area
COMPLEX(real_8),
POINTER
:: p(:,:) source data pointer

SUBROUTINEset_data_area_area(area, rsize, csize, pointee, source_lb)

Points data area data pointers to another data area

Arguments:
INTENT(inout)
:: area data area to repoint
INTEGER,
INTENT(in)
:: rsize size of data area to point to
INTEGER,
INTENT(in)
:: csize size of data area to point to
INTENT(in)
:: pointee data area to point to
INTEGER,
INTENT(in),
OPTIONAL
:: source_lb point to this offset in pointee

SUBROUTINEget_data_s(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
REAL(real_4),
POINTER
:: data(:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

SUBROUTINEget_data_d(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
REAL(real_8),
POINTER
:: data(:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

SUBROUTINEget_data_c(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
COMPLEX(real_4),
POINTER
:: data(:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

SUBROUTINEget_data_z(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
COMPLEX(real_8),
POINTER
:: data(:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

SUBROUTINEget_data_2d_s(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
REAL(real_4),
POINTER
:: data(:,:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

SUBROUTINEget_data_2d_d(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
REAL(real_8),
POINTER
:: data(:,:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

SUBROUTINEget_data_2d_c(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
COMPLEX(real_4),
POINTER
:: data(:,:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

SUBROUTINEget_data_2d_z(area, data, lb, ub)

Returns the single/double precision real/complex data

Arguments:
INTENT(in)
:: area data area
COMPLEX(real_8),
POINTER
:: data(:,:) pointer to data
INTEGER,
INTENT(in),
OPTIONAL
:: lb(2) lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub(2) upper bound for pointer

FUNCTIONdbcsr_get_data_c_s(area, select_data_type, lb, ub)

Returns the single/double precision real/complex data

Return Value ::
REAL(real_4)
pointer to data
Arguments:
INTENT(in)
:: area data area
REAL(real_4),
INTENT(in)
:: select_data_type force datatype
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

FUNCTIONdbcsr_get_data_c_c(area, select_data_type, lb, ub)

Returns the single/double precision real/complex data

Return Value ::
COMPLEX(real_4)
pointer to data
Arguments:
INTENT(in)
:: area data area
COMPLEX(real_4),
INTENT(in)
:: select_data_type force datatype
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

FUNCTIONdbcsr_get_data_c_d(area, select_data_type, lb, ub)

Returns the single/double precision real/complex data

Return Value ::
REAL(real_8)
pointer to data
Arguments:
INTENT(in)
:: area data area
REAL(real_8),
INTENT(in)
:: select_data_type force datatype
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

FUNCTIONdbcsr_get_data_c_z(area, select_data_type, lb, ub)

Returns the single/double precision real/complex data

Return Value ::
COMPLEX(real_8)
pointer to data
Arguments:
INTENT(in)
:: area data area
COMPLEX(real_8),
INTENT(in)
:: select_data_type force datatype
INTEGER,
INTENT(in),
OPTIONAL
:: lb lower bound for pointer
INTEGER,
INTENT(in),
OPTIONAL
:: ub upper bound for pointer

ELEMENTAL FUNCTIONdbcsr_scalar_s(scalar)

Sets a scalar in an encapsulated data structure

Return Value ::
encapsulated scalar
Arguments:
REAL(real_4),
INTENT(in)
:: scalar scalar to encapsulate

ELEMENTAL FUNCTIONdbcsr_scalar_d(scalar)

Sets a scalar in an encapsulated data structure

Return Value ::
encapsulated scalar
Arguments:
REAL(real_8),
INTENT(in)
:: scalar scalar to encapsulate

ELEMENTAL FUNCTIONdbcsr_scalar_c(scalar)

Sets a scalar in an encapsulated data structure

Return Value ::
encapsulated scalar
Arguments:
COMPLEX(real_4),
INTENT(in)
:: scalar scalar to encapsulate

ELEMENTAL FUNCTIONdbcsr_scalar_z(scalar)

Sets a scalar in an encapsulated data structure

Return Value ::
encapsulated scalar
Arguments:
COMPLEX(real_8),
INTENT(in)
:: scalar scalar to encapsulate

ELEMENTAL SUBROUTINEdbcsr_scalar_get_value_s(encapsulated_scalar, value)

Sets a scalar in an encapsulated data structure

Arguments:
INTENT(in)
:: encapsulated_scalar encapsulated scalar
REAL(real_4),
INTENT(out)
:: value value of the scalar

ELEMENTAL SUBROUTINEdbcsr_scalar_get_value_d(encapsulated_scalar, value)

Sets a scalar in an encapsulated data structure

Arguments:
INTENT(in)
:: encapsulated_scalar encapsulated scalar
REAL(real_8),
INTENT(out)
:: value value of the scalar

ELEMENTAL SUBROUTINEdbcsr_scalar_get_value_c(encapsulated_scalar, value)

Sets a scalar in an encapsulated data structure

Arguments:
INTENT(in)
:: encapsulated_scalar encapsulated scalar
COMPLEX(real_4),
INTENT(out)
:: value value of the scalar

ELEMENTAL SUBROUTINEdbcsr_scalar_get_value_z(encapsulated_scalar, value)

Sets a scalar in an encapsulated data structure

Arguments:
INTENT(in)
:: encapsulated_scalar encapsulated scalar
COMPLEX(real_8),
INTENT(out)
:: value value of the scalar