DistinctDouble_t

type, public :: DistinctDouble_t

Components

Type	Visibility	Attributes		Name		Initial
type(ijkl_Index_t),	public		::	idx
type(DistinctDoubleType_t),	public		::	typ

Constructor

public interface DistinctDouble_t

private elemental function construct_DistinctDouble_t_ijkl(idx) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
type(ijkl_Index_t),	intent(in)			::	idx

Return Value type(DistinctDouble_t)

private elemental function construct_DistinctDouble_t_ijab(idx) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
type(ijab_Index_t),	intent(in)			::	idx

Return Value type(DistinctDouble_t)

Type-Bound Procedures

procedure, public :: get_repr_excit_info

private elemental function get_repr_excit_info(this, i_sg_start) result(res)

Return the index for the representation.

Arguments

Type	Intent	Optional	Attributes		Name
class(DistinctDouble_t),	intent(in)			::	this
integer,	intent(in)			::	i_sg_start

Return Value type(ExcitationInformation_t)

procedure, public :: get_repr_index

private elemental function get_repr_index(this) result(res)

Return the index for the representation.

Arguments

Type	Intent	Optional	Attributes		Name
class(DistinctDouble_t),	intent(in)			::	this

Return Value type(ijkl_Index_t)

procedure, public :: fuse => fuse_DistinctDouble_t

private elemental function fuse_DistinctDouble_t(this) result(res)

Fuse a Distinct Double excitation

Arguments

Type	Intent	Optional	Attributes		Name
class(DistinctDouble_t),	intent(in)			::	this

DistinctDouble_t Derived Type

Contents

Variables

Constructor

Type-Bound Procedures

type, public :: DistinctDouble_t

Components

Constructor

public interface DistinctDouble_t

private elemental function construct_DistinctDouble_t_ijkl(idx) result(res)

Arguments

Return Value type(DistinctDouble_t)

private elemental function construct_DistinctDouble_t_ijab(idx) result(res)

Arguments

Return Value type(DistinctDouble_t)

Type-Bound Procedures

procedure, public :: get_repr_excit_info

private elemental function get_repr_excit_info(this, i_sg_start) result(res)

Arguments

Return Value type(ExcitationInformation_t)

procedure, public :: get_repr_index

private elemental function get_repr_index(this) result(res)

Arguments

Return Value type(ijkl_Index_t)

procedure, public :: fuse => fuse_DistinctDouble_t

private elemental function fuse_DistinctDouble_t(this) result(res)

Arguments

Return Value integer(kind=int64)