get_cumulative_list Interface

private interface get_cumulative_list

Contents

Module Procedures


Module Procedures

private function get_cumulative_list_Excite_1_t(GAS_list, nI, incomplete_exc) result(cSum)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: GAS_list(:)
integer, intent(in) :: nI(nel)
type(Excite_1_t), intent(in) :: incomplete_exc

Return Value real(kind=dp), (size(GAS_list))

private function get_cumulative_list_Excite_2_t(GAS_list, nI, incomplete_exc) result(cSum)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: GAS_list(:)
integer, intent(in) :: nI(nel)
type(Excite_2_t), intent(in) :: incomplete_exc

Return Value real(kind=dp), (size(GAS_list))