set_last_tgt Interface

public interface set_last_tgt

Set the last target of a non trivial excitation.


Contents

Module Procedures


Module Procedures

private pure subroutine set_last_tgt_Excite_1_t(exc, tgt)

Arguments

Type IntentOptional Attributes Name
type(Excite_1_t), intent(inout) :: exc
integer, intent(in) :: tgt

private pure subroutine set_last_tgt_Excite_2_t(exc, tgt)

Arguments

Type IntentOptional Attributes Name
type(Excite_2_t), intent(inout) :: exc
integer, intent(in) :: tgt

private pure subroutine set_last_tgt_Excite_3_t(exc, tgt)

Arguments

Type IntentOptional Attributes Name
type(Excite_3_t), intent(inout) :: exc
integer, intent(in) :: tgt