cc_amplitude Derived Type

type, public :: cc_amplitude


Components

Type Visibility Attributes Name Initial
integer, public :: order = 0
integer, public, allocatable :: operators(:,:,:)
real(kind=dp), public, allocatable :: amplitudes(:)
integer, public, allocatable :: set_flag(:)
integer, public :: n_ops = 0

Type-Bound Procedures

procedure, public :: get_ex

  • private function get_ex(this, ind) result(ex)

    Arguments

    Type IntentOptional Attributes Name
    class(cc_amplitude), intent(in) :: this
    integer, intent(in) :: ind

    Return Value integer, (2,this%order)

procedure, public :: get_ind

  • private function get_ind(this, elec_ind, orb_ind) result(ind)

    Arguments

    Type IntentOptional Attributes Name
    class(cc_amplitude), intent(in) :: this
    integer, intent(in) :: elec_ind(this%order)
    integer, intent(in) :: orb_ind(this%order)

    Return Value integer

procedure, public :: get_amp => get_amp_ind

  • private function get_amp_ind(this, ind) result(amp)

    Arguments

    Type IntentOptional Attributes Name
    class(cc_amplitude) :: this
    integer, intent(in) :: ind

    Return Value real(kind=dp)

Source Code

    type cc_amplitude
        integer :: order = 0
        integer, allocatable :: operators(:, :, :)
        real(dp), allocatable :: amplitudes(:)
        integer, allocatable :: set_flag(:)

        integer :: n_ops = 0

    contains

        procedure :: get_ex
        procedure :: get_ind
        procedure :: get_amp => get_amp_ind

    end type cc_amplitude